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PREFACE 



This publication provides the IBM system 
hardware and software support personnel 
with the information needed to analyse 
problems that may occur on the IBM Virtual 
Machine Facility/370 (VM/370) . 

CMS/DOS is part of the CMS system and is 
not a separate system. The term CMS/DOS is 
used in this publication as a concise way 
of stating that the DOS simulation mode of 
CMS is currently active; that is, the CMS 
command 

SET DOS ON 



"Section 4. Diagnostic Aids" contains 
debugging commands for problem solving, 
wait state and ABEND codes, error codes, 
ret,urn codes, and information about the 
DASD Dump Restore Program. 

"Section 5. Appendixes" contains 
reference information that may be useful 
when debugging VM/370, such as: the VM/370 
progi:amming restrictions, the CMS ZAP 
Service Program, and the VM/370 coding 
conventions and eguate symbols. 



has been previously issued. 

The phrase "CMS file system" refers to 
disk files that are in CMS»s 800-byte block 
format; CMS's VSAM data sets are not 
included. 

A system failure is usually accompanied 
by a dump of processor storage. The dump 
can occur by means of an automatically 
invoked dump program, or a standalone dump 
program. An example of a standalone dump 
program is: 

BPS Storage Print Program, No. 360-UT-056 



HOW THIS MANUAL IS ORGANIZED 



This manual contains five sections: 



"Section 1. 
debugging inf 
conditions that 
This debugging 
to do about ABEN 
incorrect output 
a brief descript 
components. T 
described are: 
(CP) , the Conv 
(CMS) , and 
Communications s 



Introduction" contains 
ormation about error 

may occur within VM/370. 
information tells you what 
Ds, loops, wait states, and 
Section 1 also contains 
ion of three of the VM/370 
he components that are 
the VM/370 Control Program 
ersational Monitor System 

the Remote Spooling 
ubsystem (RSCS) . 



"Section 2. Method of Operation and 
Program Organization" contains the 
functions and relationships of the program 
routines in VM/370. Section 2 indicates 
the program operation and organization in a 
general way to serve as a guide in 
understanding the programming of VM/370. 
It is not meant to be a detailed analysis 
of VM/370 programming and cannot be used as 
such. 

"Section 3. Directories" contains a 
description of all the assemble modules in 
CP, CMS, and RSCS. It also contains 
extensive cross-references between modules 
and labels within a VM/370 component. 



HOW TO USE THIS MANUAL 



Use the problem determination part of 
Section 1 to help you to determine what 
type of error has occurred. Write down 
all error messages, ABEND codes and 
return codes, and obtain a storage 
dump. 

Consult the VM/370: System Messages for 
information about the error message, 
ABEND code, or return code. The VM^^70: 
System Messages also contains extensive 
cross-reference information that may be 
helpful to you. 

Isolate the component of VM/370 in which 
the problem occurred. 

Use the list of restrictions in "Section 
5. Appendixes" to be certain that the 
operation that was being performed was 
valid. 

Use "Section 3. Directories" and use the 
VM/370: Data Areas and Control Block 
LSSiS to help you to isolate the 
problem. 

Use "Section 2. Method of Operation and 
Program Organization" if necessary, to 
understand the operation that was being 
performed. 
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SECTION 1. INTRODUCTION 



INTRODUCTION TO DEBUGGING 



The VM/370 Control Program (CP) manages the 
resources of a single computer such that 
multiple computing systems appear to exist. 
Each "virtual computing system", or virtual 
machine, is the functional equivalent of an IBM 
System/370. The person trying to determine the 
cause of a VM/370 software problem must consider 
three separate areas: 

• The Control Program (CP) , which controls the 
resources of the real machine. 

• The virtual machine operating system running 
under the control of CP, such as CMS, RSCS, 
OS, DOS, or VM/370. 

• The problem program, which executes under the 
control of a virtual machine operating 
system. 

Note: For information about the Interactive 
Problem Control System refer to the yM^370: 
ISi§£3:2iiZ§ i£Oblem Control System (IPCS) Dser^s 
Guide, Order No. GC20-1823. 

Once the area causing the problem is 
identified, the appropriate person should use 
all available information and determine the 
cause of the problem. The IBM Program Systems 
Representative (PSR) or a system programmer 
handles all problems with CP, Conversational 
Monitor System (CMS) , Remote Spooling 
Communication Subsystem (RSCS) , and Interactive 
Problem Control System (IPCS) ; information that 
is helpful in debugging CP, CMS, and RSCS is 
contained in this publication. The applications 
programmer handles all problem program errors; 
techniques for applications program debugging 
are found in the yM/^370 : CMS User^s Guide. 



identify the problem, collect information and 
determine the cause so that the problem can be 
fixed. When running VM/370, you must also 
decide whether the problem is in CP, the virtual 
machine, or the problem program. 

A good approach to debugging is: 

1. Recognize that a problem exists. 

2. Identify the problem type and the area 
affected. 

3. Analyze the data you have available, 
collect more data if you need it, then 
isolate the data that pertains to your 
problem. 

U. Finally, determine the cause of the problem 
and correct it. 



DOES A PROBLEM EXIST? 



There are four types of problems: 

• ABEND (Abnormal End) 

• Unexpected results 

• Loop 

• Wait state 



ABEND (Abnormal End) 



The abnormal end is the most easily identified 
problem. An abnormal termination causes an 
error message. 



If the problem is cause 
operating system other tha 
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]^Ii§XE§cted Results 



Unexpected results, such as missing or incorrect 
output, or incorrect format, is another easily 
identified problem. 



I;22E ^H^ Hlit. State 



If it becomes necessary to apply a PTF 
(Program Temporary Fix) to a component of 
VM/370, refer to "Appendix J: Applying PFTs" for 
detailed information on applying PTFs. 



HOW TO START DEBUGGING 



Before you can correct any problem, you must 
recognize that one exists. Next, you must 



Unproductive processing time is a problem not 
easily recognized, especially in a time-sharing 
environment. When you are using VM/370, you are 
usually sitting at a terminal and do not have 
the lights of the CPU control panel to help you 
recognize this type of problem. 

You may have a looping condition if your 
program takes longer to execute than you 
anticipated. Check your output. If the number of 
output records or print lines is greater than 
expected, the output may really be the same 
information repeated many times. Repetitive 
output usually indicates a program loop. 
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Another way to identify a loop is to 
periodically examine the current PSW. If the PSW 
instruction address always has the same value, 
or if the instruction address has a series of 
repeating values, the program probably is 
looping. 

A wait state may exist if your program is 
talcing longer to execute then expected. To 
identify a probable wait state, display the 
current PSH on the terminal. Periodically, 
issue the CP command 

QUERX TIME 

and compare the elapsed processing time. When 
the elapsed processing time does not increase, 
the wait state probably exists. 

Figures 1-10 help you to identify problem 
types and the areas where they may occur. 



ANALYZING THE PfiOBLEM 



Once the type 
cause of it 
recommended p 
procedures are 
cause of the 
resourceful, 
available. If 
found after the 
are followed, 
the tedious job 
your desk. 



of problem is identified, the 

ust be determined. There are 
rocedures to follow. These 
helpful, but do not identify the 
problem in every case. Be 
Use whatever data you have 
the cause of the problem is not 

recommended debugging procedures 
it may be necessary to undertake 

of checking through listings at 



See the VM^370: CMS User^s Guide for 
information on using VM/370 facilities to debug 
a problem program. 



USING VH/370 FACILITIES TO DEBUG 



Once the problem and the area where it occurs is 
identified, you can gather the information 
needed to determine the cause of the problem. 
The type of information you want to use varies 
with the type of problem. The tools used to 
gather the information vary depending upon the 
area in which the problem occurs. For example, 
if looping is the problem, you should examine 
the PSW. For a CP loop, you must use the 
operator's console to display the PSW, but for a 
virtual machine loop you can display the PSW via 
the CP DISPLAY command. 

The following shows specific debugging 
procedures for the various error conditions. 
The procedures tell you what to do and what 
debugging tool to use. For details on how to 
invoke and use the debugging tools refer to "CP 
Commands For Debugging", "CMS Commands For 
Debugging", and "Debugging With CMS" in Section 
4. 



CP ABNORMAL TERMINATION 



When CP abnormally terminates, a dump is taken. 
This dump can be directed to a tape or printer 
or dynamically allocated to a DASD. The output 
device for a CP ABEND dump is specified by the 
CP SET command. See "ABF.ND Dumps" in this 
section for a description of the SET and VMFDUMP 
commands. 

Use the dump to find what caused CP to 
terminate. Find why the system abnormally 
terminated and then see how the condition can be 
corrected. See "Reading CP ABEND Dumps" in this 
section for detailed information on reading a CP 
ABEND dump. 

REASON FOR THE ABEND: CP terminates and takes an 
abnormal termination dump under three 
conditions: 

• Program Check in CP 

Examine the PROPSW and INTPR fields in the 
Prefix Storage Area (PSA) to determine the 
failing module. 

• Module Issuing an SVC 

Examine the SVC old PSW (SVCOPSW) and ABEND 
code (CPABEND) fields in the prefix storage 
area to determine the module that issued the 
SVC and the reason it was issued. 

CPABEND contains an abnormal termination 
code. The first three characters identify 
the failing module (for example, ABEND code 
BLD001 indicates DMKBLD is the failing 
module) . 

• Pressing SYSTEM RESTART on CPU Console 

Examine the old PSW at location X'08' to find 
the location of the instruction that was 
executing when SYSTEM RESTART was pressed. 
The operator presses SYSTEM RESTART when CP 
is in a disabled wait state or loop. 



PROCEDURE WHEN CP ABEND OCC 
in low storage tells you 
system at the time CP 
information is stored in the 
PSA. You should be able to 
was executing by looking at 
Area Conventions" in this s 
the appropriate save area 
or FHEESAVE) to see how tha 
execute. 



URS: The information 

the status of the 

terminated. Status 

CPSTAT field of the 

tell the module that 

the PSA. See "Save 

ection and refer to 

(SAVEAREA, BALRSAVE, 

t module started to 



Examine the real and virtual control blocks 
to find the status of I/O operations. The PSA 
is described in the VM/37,0: Data Areas and 
^2&i£2l llsck Loflic. 

Examine the CP internal trace table. This 
table can be extremly helpful in determining the 
events that preceded the ABEND. The CP internal 
trace table description in Section U tells you 
how to use the trace table. 
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Does a problem exist?- 



Is there an ABEND condition ? ^^^^-^— ^— 

I If the message 
DMKDMP908I SYSTEM FAILURE, CODE XXX XXX 

appears on the console and 

the alarm rings, 

this is a CP ABEND. 

The system dumps to disk or to the 

printer if the set dump E command 

has been issued, and automatically | 1 

performs I PL. "H^^C I 

I If the messages 
DMKDMP908I SYSTEM FAILURE, CODE XXXXXX 
DMKCKP960I SYSTEM WARMSTART DATA SAVED 
PMKCKP961W SYSTEM SHUTDOWN COMPLETE 

appear on the console, 

this is a CP ABEND. 

The system dumps to tape 

or printer and stops. 

■ ^C 

If the message 

DMSABNI48T SYSTEM ABEND XXX 

CALLED FROM YYYYYY 

appears on the terminal, 

this is a CMS ABEND. -^'r^. 



If an ABEND message 

from the virtual machine appears 

on the terminal, 

this is an ABEND in the 
operating system controlling 
this virtual machine. » 



Otherwise, an ABEND 
condition does not exist. 



o 




■ Unexpected Results? 



I If an operating system which 
executes property on a real machine 
fails to execute properly under VM/370, 
there are unexpected results 
in CP. »^ 

If a program which executes under 
the control of an operating system on 
a real machine fails to execute correctly 
with the same operating system under 
VM/370, 

there are unexpected results 
in the virtual machine. 

I If the program's output is 
inaccurate or missing, 

there are unexpected results 
in the problem program. 



^l^^B 



If the output is redundant 
check for a loop. 



■0 



Otherwise, check for a wait or 



© 



■ Is there a wait or Loop?. 



I If pressing the REQUEST key on the operator's 
console leaves the REQUEST PENDING lighten 
a CP disabled wait state exists. 
The CPU console light will be on ». | 4 



If the CPU console wait light is on, 

the system is in a CP enabled wait state. 



If the real PSW problem bit is OFF, 

there is a CP loop. »- I 4^ 



If any of the following messages 
I DMKDSP450W CP ENTERED; DISABLED WAIT PSW 
DMKDSP451W CP ENTERED; INVALID PSW 
DMKDSP452W CP ENTERED; EXTERNAL INTERRUPT 

LOOP 
DMKDSP453W CP ENTERED; PROGRAM INTERRUPT 

LOOP 
appears on the terminal, 

there is a disabled wait or an interrupt loop in the 



virtual machir 



If pressing the ATTN key once does not cause 
an interrupt, 

there is a disabled loop in the virtual machine. 



If processing has ceased in the virtual 
machine without reaching end-of-job, 
the virtual machine is in an 
enabled wait state and no I/O interrupt 
has occurred. — 



^ 
^ 

1 
^ 



If processing time exceeds normal expectations, 

the virtual machine may have an enabled loop. 



^ 



© 



Figure 1 . Does a Problem Exist? 
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Debug Procedures for a Wait 
CP Disabled Wait 



Use ALTER/DISPLAY console mode (if available), to display real PSW and CSW. Also, 
display general and extended control registers and storage locations X'OO'— X'100'. 



Press SYSTEM RESTART button to cause a CP ABEND 
dunnp to be taken. 



Ka iPL. 

-CP Enabled Wait - 



Press SYSTEM RESTART button to cause a 
CP ABEND dump to be taken. 



Use the dump to check the status of each VMBLOK. Also, 
check RCHBLOK, RCUBLOK, and RDEVBLOK for each device. 



- Virtual Machine Disabled Wait - 



Use CP commands (CMS users may use the CMS DEBUG command) to display 
the PSW, CSW, general registers, and control registers. 



Use the CP DUMP command (or CMS DUMP subcommand) to 
take a dump. 



' Virtual Machine Enabled Wait - 



Take a dump. 



Debug Procedures for a Loop 



■ CP Loop - 



Use ALTER/DISPLAY console mode (if available) to 
display real PSW, general'registers, control 
registers, and storage locations X'OO'-X'IOO'. 

Press SYSTEM RESTART button to cause a CP 
ABEND dump to be taken. 

Examine the CP internal trace table to see where the loop is. 



-Virtual Machine Disabled Loop - 



EH Use the CP TRACE command to trace the loop. 

a Display the general registers and control registers 
via the CP DISPLAY command. 

^U Take a dump using the CP DUMP command. 

^H Examine the source code. 

■ Virtual Machine Enabled Loop 



Trace the loop. Display the PSW, general registers, 
and extended control registers. 



Take a dump. 



Examine source code. 



Figure 2. Debug Procedures for Halts and Loops 
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Debug Procedures for Unexpected Results 
— Unexpected Results in CP ———^^^— 



Check that the program is not violating any 
CP restrictions. 

Check that the program and operating system running 
on the virtual machine are exactly the same as those 
that ran on the real machine. 

Use the CP TRACE command to trace CCWs, SIOs. and Interrupts. 
Look for an error In CCW translation or Interrupt reflection. 

If disk I/O error, use the CP DDR (DASD Dump Restore) 
program to print the contents of any disk. 



' Unexpected results in a virtual machine - 



Check that the program executing on the virtual machine is 
exactly the same as the one that ran on the real machine. 



Make sure that operating system restrictions 
are not violated. 



Use CP TRACE to trace all I/O operations. 



Debug Procedures for an ABEND 
CP ABEIMD 



Find out why CP abnormally terminated. Examine the 
PROPSW, INTPR, SVCOPSW, and CPABEND fields In the PSA 
from the dump. 

Identify the module that caused the ABEND. 

Examine the SAVEAREA, BALRSAVE, and FREESAVE areas of the dump. 

If I/O operation, examine the real and virtual I/O 
control blocks. 



-CMS ABEND - 



Determine reason for ABEND from code In ABEND 
message DMSABN148T. 

Enter debug environment or CP console function mode 

to use the commands, to display the PSW, and to examine 

low storage areas: 

LASTLMOD and LASTTMOD 
LASTCMND and PREVCMND 
LASTEXEC and PREVEXEC and DEVICE 

Look at the last Instruction executed. 

Take dump If need be. 



- Virtual Machine ABEND (other than CMS) ' 



Examine dump. If there is one. 



Use CP commands to examine registers and 
control words. 



Use CP TRACE to trace the processing up to 
the point where the error occurred. 



Figure 3. Debug Procedures for Unexpected Results and an ABEND 
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The values in the general registers can help 
you to locate the lOBLOK, VMBLOK, and the save 
area. Befer to "Reading CP ABEND Dumps" in this 
section for detailed information on the contents 
of the general registers. 

In the PSA, if the program check old PSn 
(PEOPSW) or the SVC old PSH (SVCOPSW) points to 
an address beyond the end of the resident 
nucleus, the module that caused the ABEND is a 
pageable module. Refer to "Reading CP ABEND 
Dumps" in this section to find out how to 
identify that pageable module. Use the CP load 
map that was created when the VM/370 system was 
generated to find the address of the end of the 
resident nucleus. 



CP TERMINATION WITHOUT A DUMP 



Two types of severe machine checks can cause the 
VH/370 control program to terminate: 

• An unrecoverable machine check in the control 
program 

• A machine check that cannot be diagnosed 

A machine check error cannot be diagnosed if 
either the machine check old PSH or the machine 
check interruption code is invalid. These 
severe machine checks cause CP to terminate, but 
no dump is taken since the error is recorded on 
the error recording cylinders. The system is 
automatically restarted and a message is issued 
identifying the machine check error. 

If an unrecoverable machine check occurs in 
CP, the message 

DMKMCH610I MACHINE CHECK SUPERVISOR DAMAGE 

appears on the CPU console. CP is terminated and 
automatically restarted. 

If the machine check handler cannot diagnose 
a certain machine check, the integrity of the 
system is guestionable. The message 

DMKMCH611I MACHINE CHECK SYSTEM INTEGRITY 
LOST 

appears on the CPU console, CP is terminated and 
automatically restarted. 

Hardware errors are probably the cause of 
these severe machine checks. The system 
operator should run the CPERSP program'to print 
the previous error and save the output for the 
installation hardware maintenance personnel. 



CHS ABNORMAL TERMINATION 



Nhen CMS abnormally terminates, the following 
error message appears on the terminal: 

DHSABN148T SYSTEM ABEND XXX CALLED 

FROM yyyyyy 



where xxx is the ABEND code and yyyyyy is the 
address of the instruction causing the ABEND. 
The DMSABN module issues this message. Then, CMS 
waits for a command to be entered from the 
terminal. 

Because CHS is an interactive system, you may 
want to use its debugging facilities to examine 
status. You may be able to determine the cause 
of the ABEND without taking a dump. 



The debug program is located i 
nucleus of CHS and has its own 
areas. Because the debug program 
the status of the system, you 
options knowing that routines and 
overlaid unless you specifically 
Likewise, you can use the CP comm 
when you know that you cannot 
overlay storage because the CP an 
areas are completely separate. 



n the resident 
save and work 
does not alter 

can use its 
data cannot be 
request it. 
ands to debug 

inadvertently 
d CMS storage 



REASON FOB THE ABEND: First determine the 
reason CMS abnormally terminated. There are four 
types of CMS abnormal terminations: 

• Program Exception 

The DMSITP routine gets control whenever a 
hardware program exception occurs. If a 
routine other than a SPIE exit routine is in 
control, DMSITP issues the message 

DMSITP141T XXXXXXXX EXCEPTION OCCURRED 

AT xxxxxx IN ROUTINE xxxxxxxx 

and invokes DMSABN (the ABEND routine) . The 
ABEND code is OCx, where x is the program 
exception number (0-F) . The possible 
programming exceptions are: 

Code Meanina 

Imprecise 

1 Operation 

2 Privileged operation 

3 Execute 

U Protection 

5 Addressing 

6 Specification 

7 Decimal data 

8 Fixed-point overflow 

9 Fixed-point divide 
A Decimal overflow 

B Decimal divide 

C Exponent overflow 

D Exponent underflow 

E Significance 

F Floating-point divide 

• ABEND Macro 

Control is given to the DMSSAB routine 
whenever a user routine executes the ABEND 
macro. The ABEND code specified in the ABEND 
macro appears in the abnormal termination 
message DHSABN148T. 

• Halt Execution (HX) 

Whenever the virtual machine opertor signals 
an attention interruption and enters HX, CMS 
terminates and issues "CMS". 
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• system ABEND 

A CHS system routine can abnormally teriinate 
by issuing the DMSABN aacro. The first three 
hexadecimal digits of the system ABEND code 
appear in the CHS ABEND message, DHSABNIUST. 

The format of the DHSABN macro is: 



i I i r r -1-1 

|[label]|DHSABN|code | ,TYPCALL=| SVC || 
I I I (reg) I |BALH| | 

I I I •■ L JJ 



wher e : 
label 

code 
(reg) 



is any valid 
label. 



Assembler language 



is the abnormal termination code 
(0-FFF) that appears in the DHSABNIUST 
system termination message. 



is the register containing 
abnormal termination code. 



TYPCALL= specifies how control passes to the 
T¥PCAIL=BALB abnormal termination 
routine, DHSABN. 

TYPCALL=SVC 

Routines that do not reside in the 
nucleus should use TYPECALL=SVC to 
generate CHS SVC 203 linkage. 



TYPCALL=BALH 

Nucleus-resident routines 
TYPCA1L=BALH to generate 
branch to DHSABN. 



specify 
a direct 



The ABEND recovery function performs the 
following: 

• The SVC handler, DHSITS, is re-initialized, 
and all stacked save areas are released. 

• "FINIS ♦ * ♦M is invoked by means of SVC 202, 
to close all files, and to update the master 
file directory. 

• If the EXECTOR module is in real storage, it 
is released. 

• All link blocks allocated by DHSSLN are 
freed. 

• All FCB pointers are set to zero. 

• All user storage is released. 

• The amount of system free storage which 
should be allocated is computed. This value 
is compared to the amount of free storage 
that is actually allocated. 



the • The console input stack is purged. 



When the amount of storage actually allocated 
is less than the amount that should be 
allocated, the message 

DHSABNia9T xxxx DOUBLEHORDS OF SYSTEH 
STORAGE HAVE BEEN DESTROYED 

appears on the terminal. If the amount of 
storage actually allocated is greater than the 
amount that should be allocated, the message 

DHSABN150W nnn (HEX XXX) DOUBLEHORDS OF 
SYSTEH STORAGE WERE NOT 
RECOVERED 



If a CHS SVC handler abnormally terminates, it 
sets an ABEND flag and stores an ABEND code in 
NUCON (the CHS nucleus constant area) . After 
the SVC handler has finished processing, the 
ABEND condition is recognized. The DHSABN ABEND 
routine issues the ABEND message, DHSABN148T, 
with the ABEND code stored in NUCON. 



PROCEDURE WHEN CHS ABEND OCCURS: After a CHS 
ABEND, CHS provides two courses of action. In 
addition, you can enter the CP command mode and 
use CP's debugging facilities by signalling 
attention. 

The two courses of action available in CHS 



Issue the DEBUG command and enter the debug 
environment. After using all the DEBUG 
subcommands that you need, exit from the 
debug environment. Then, either issue the 
RETURN command to return to DHSABN so that 
ABEND recovery occurs, or issue the GO 
command to resume processing at the point the 
ABEND occurred. 

Issue a CHS command other than DEBUG and the 
ABEND routine, DHSABN, performs its ABEND 
recovery and then passes control to the 
DHSINT routine to process the command just 
entered. 



appears on the terminal. 



A DEBUGGING PROCEDURE: Hhen a CHS ABEND occurs, 
you probably want to use the DEBUG subcommands 
or CF commands to examine the PSH and certain 
areas of low storage. Refer to "CHS Debugging 
Commands" in Section U for detailed description 
of how to use the CMS DEBUG subcommands. See 
"CP Commands Used to Debug the Virtual Machine" 
and "CP Commands Used to Debug CP" in Section U 
for a detailed description of how to use the CP 
commands. Also refer to Figure 12 for a 
comparison of the CP and CHS debugging 
facilities. 

The following procedure may be useful in 
determining the cause of a CHS ABEND: 

1. Display the PSW. (Use the CP DISPLAY 
command or CHS DEBUG PSH subcommand.) 
Compare the PSW instruction address to the 
current CHS load map to determine the 
module that caused the ABEND. The CHS 
storage-resident nucleus routines are in 
fixed storage locations. 

Also check the interruption code in the 
PSH. 

2. Examine areas of low storage. The 
information in low storage can tell you 
more about the cause of the ABEND. 



Section 1 . Introduction 
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£i§i^ Contents 

LASTLHOD Contains the name of the last 

module loaded into storage via 

the LOADHOD command. 

LASTTMOD Contains the name of the last 

module loaded into the 
transient area. 

LASTCNND Contains the name of the last 
command issued. 



If a dump was taken, it was sent to the 
virtual printer. Issue a CLOSE command to the 
virtual printer to print the dump on the real 
printer. 

If you choose to run a standalone dump 
program to dump the storage in your virtual 
machine, be sure to specify the NOCLEAR option 
when you issue the CP IPL command. At any rate, 
a portion of your virtual storage is overlaid by 
CP's virtual IPL simulation. 



PREVCMND Contains the name of the 
next-to-the-last command 
issued. 

LASTEXEC Contains the name of the last 
EXEC procedure. 

PHEVEXEC Contains the name of the 
next-to-last EXEC procedure. 

DEVICE Identifies the device that 
caused the last I/O 
interrupt. 

The low storage areas examined depend on 
the type of ABEND. 



3. Once you have identified the module that 
caused the ABEND, examine the specific 
instruction. Refer to your listing. 



4. If you have not identified the problem at 
this time, take a dump by issuing the DEBOG 
DUMP subcommand. Refer to "Reading CMS 
ABEND Dumps" in this section for 
information on reading a CHS dump. If you 
can reproduce the problem, try the CP or 
CMS tracing facilities. 



If the problem can be reproduced, it is 
helpful to trace the processing using the CP 
TRACE command. Also, you can set address stops, 
and display and alter registers, control words 
(such as the PSN) , and data areas. The CP 
commands can be very helpful in debugging 
because you can gather information at various 
stages in processing. A dump is static and 
represents the system at only one particular 
time. Debugging on a virtual machine can often 
be more flexible than debugging on a real 
machine. 

VM/370 may terminate or reset a virtual 
machine if a nonrecoverable channel check or 
machine check occurs in that virtual machine. 
Hardware errors usually cause this type of 
virtual machine termination. 

One of the following messages appears on the CPU 
console: 

DMKMCH616I MACHINE CHECK; USER userid 
TERMINATED 

DMKCCH604I CHANNEL ERROR; DEV xxx ; 

USER userid; MACHINE RESET 



VIRTUAL MACHINE ABEND (OTHER THAN CMS) 



The abnormal termination of an operating system 
(such as OS or DOS) running under VM/370 appears 
the same as a similar termination on a real 
machine. Refer to publications for the 
specified operating system for debugging 
information. However, all of the CP debugging 
facilities may be used to help you gather the 
information you need. Because certain operating 
systems (OS/VSI, 0S/VS2, and DOS/VS) manage 
their own virtual storage, CP commands that 
examine or alter virtual storage locations 
should be used only in virtual=real storage 
space with OS/VSI, 0S/VS2, and DOS/VS. 
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Message 

(Alari rings) 
DMKDI1P908I SYSTEM FAILURE CODE zzxxxx 

DHKDHP905H SYSTEM DUMP FAILURE; 

PROGRAM CHECK 
DMKDMP906H SYSTEM FAILURE; MACHINE 

CHECK, RUM SEREP 
DHKDMP907H SYSTEM DUMP FAILURE; FATAL 

I/O ERROR 



DMKCKF900W SYSTEM RECOVERY FAILURE; 

PROGRAM CHECK 
DMKCKP901H SYSTEM RECOVERY FAILURE; 

MACHINE CHECK, RUN SEREP 
DMKCKP902H SYSTEM RECOVERY FAILURE; 

FATAL I/O ERROR - NUCL CYL 
- WARM CYL 
DMKCKP90mJ SYSTEM RECOVERY FAILURE; 

INVALID WARM START DATA 
DMKCKP910W SYSTEM RECOVERY FAILURE; 

INVALID HARM START CYLINDER 
DMKCKP911W SYSTEM RECOVERY FAILURE; 

HARM START AREA FULL 

DMKWRM902H SYSTEM RECOVERY FAILURE; 

FATAL I/O ERROR 
DMKNRM903W SYSTEM RECOVERY FAILURE; 

VOLID XXXXX ALLOCATION 

ERROR CYLINDER XXX 
DMKHRM904W SYSTEM RECOVERY FAILURE; 

INVALID HARM START DATA 
DMKHRM909H SYSTEM RECOVERY FAILURE; 

VOLID xxxxxx NOT MOUNTED 
DMKHRH909H SYSTEM DUMP DEVICE; 

NOT-READY 

DMKDMP908I SYSTEM FAILURE, CODE XXXXXX 
DMKCKP960I SYSTEM WARM START DATA SAVED 
DMKCKP961H SYSTEM SHUTDOWN COMPLETE 



Type of ABEND 

CP ABEND, system duips 
Restart is autooatic. 



to disk. 



If the dump program encounters a 
a program check, machine check or 
fatal I/O error, a message is 
issued indicating the error. CP 
enters the wait state with code 3 
in the PSW. 

If the checkpoint program 
encounters a program check, a 
machine check, a fatal I/O error or 
an error relating to a certain warm 
start cylinder or warm start 
data conditions, a message is 
issued indicating the error and CP 
enters the wait state with code 7 
in the PSW. 



If the warm start program 
encounters a severe error, a 
message is issued indicating the 
error and CP enters the wait state 
code 9 in the PSW. 



CP ABEND, system dumps to tape or 
printer. The system stops; the 
operator must IPL the system to 
start again. 



Figure 4. ABEND Messages (Part 1 of 2) 
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Message | Type of ABEND | 


OEtiSSSi Hessa^es I 1 

DMKDMP905H SYSTEM DOMP FAILURE; | If the duap prograiB encounters a | 
PROGRAM CHECK | prograa check, a aachine check or | 

DMKDMP9061J SYSTEM DUMP FAILURE; | fatal I/O error, a message is | 
MACHINE CHECK, RUN SEREP \ Issued indicating the error. CP | 

DMKDMP907H SYSTEM DUMP FAILURE; FATAL | enters the wait state with code 3 | 
I/O ERROR 1 in the PSH. I 

1 If the duap cannot find a defined | 
1 dump device and if no printer is j 
1 defined for the dump, CP enters a | 
1 disabled wait state with code U in | 
1 the PSH. 1 


1 CP termination with autoiaatic | 
1 restart when the two messages in | 
1 the "Messages" column are issued: | 

DMKMCH610I MACHINE CHECK; SUPERVISOR | The machine check handler encoun- | 
DAMAGE 1 tered an unrecoverable error with | 

1 the VM/370 control program. | 

DMKMCH611I MACHINE CHECK; SYSTEM | The machine Check handler encoun- | 
INTEGRITY LOST | tered an error that connot be diag- | 

1 nosed; systeo integrity, at this | 
1 point, is not reliable. | 

1 CP termination occurs without auto- | 
1 aatic restart when the two | 
1 messages in the "Messages" column | 
1 are issued: 1 

DMKCCH603W CHANNEL ERROR, RUN SEREP, | There was a channel check condition | 
RESTART SYSTEM | from which the channel check | 

1 handler could not recover. CP | 
1 enters the wait state with condi- | 
1 tion code 2 in the PSB. | 

DMKCPI955W INSUFFICIENT STORAGE FOR | The generated system requires more | 
VM/370 1 real storage than is available., CP | 

1 enters the disabled wait state with | 
1 code GOD in the PSH. | 


DMSABHU8T SYSTEM ABEND XXX | CMS ABEND; the system accepts com- | 
CALLED FROM xxxxxx | mands from the terminal. Enter the | 

1 DEBUG command and then the DUMP | 
1 subcommand to have CMS dump storage | 
1 on the printer. 1 


Others 1 When OS or DOS abnormally termi- 1 
Refer to OS and DOS publication | nates on a virtual machine, the 1 
for the abnormal termination | messages issued and the dumps taken | 
messages. I are the same as they would be if OS | 

1 or DOS abnormally terminated on a | 
1 real machine. I 



Figure 4. ABEND Messages (Part 2 of 2) 
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Problem 
Type 

&BEND 



Where 
ABEND Occurs 

CP ABEHD 



CP ABEND 



Distinguishing Characteristics 

The alarm rings and the message 

DHKDHP908I SYSTEM FAILORE, CODE XXXXXX 

appears on the CPO console. In this instance, the 
system dump device is a disk, so the system dumps to 
disk and automatically restarts. If an error occurs 
in the dump, checkpoint, or warmstart program, CP 
enters the wait state after issuing one or more of 
the following messages: 

DMKDMP905W SYSTEM DUMP FAILUBE; PROGEAM CHECK 
DMKDMP906H SYSTEM DUMP FAILORE; MACHINE CHECK, HON 

SEREP 
DMKDMP907W SYSTEM DOMP FAILORE; FATAL I/O ERROR 
DMKCKP900W SYSTEM RECOVERY FAILORE; PROGRAM CHECK 
DMKCKP90HJ SYSTEM RECOVERY FAILORE; MACHINE CHECK, 

RON SEREP 
DMKCKP902W SYSTEM RECOVERY FAILORE; FATAL I/O ERROR 
DMKCKP904M SYSTEM RECOVERY FAILORE; INVALID WARM 

START DATA 
DMKCKP910W SYSTEM RECOVERY FAILORE; INVALID WARM 

START CYLINDER 
DMKCKP911W SYSTEM RECOVERY FAILORE; WARM START AREA 

FOLL 
DMKWRM902W SYSTEM RECOVERY FAILORE; FATAL I/O ERROR 
DMKWRM903H SYSTEM RECOVERY FAILORE; VOLID XXXXXX 

ALLOCATION ERROR CYLINDER XXX 
DMKWRM90aW SYSTEM RECOVERY FAILORE; INVALID WARM 

START DATA 
DMKWRM909W SYSTEM RECOVERY FAILORE; VOLID XXXXXX 

NOT MOUNTED 

The following messages appear on the CPO console: 

DMKDMP908I SYSTEM FAILORE, CODE XXXXXX 
DMKDHP960I SYSTEM WARM START DATA SAVED 
DMKDMP961W SYSTEM SHOTDOWN COMPLETE 

The system dumps to tape or printer and stops. The 
operator must IPL the system to restart. If an 
error occurs in the dump or checkpoint program CP 
enters the wait state after issuing one or more of 
the following messages: 

DMKDMP905W SYSTEM DOMP FAILORE; PROGRAM CHECK 
DMKDMP906W SYSTEM DOMP FAILORE; MACHINE CHECK, RON 

SEREP 
DMKDMP907W SYSTEM DOMP FAILORE; FATAL I/O ERROR 
DMKCKP900W SYSTEM RECOVERY FAILORE; PROGRAM CHECK 
DMKCKP901W SYSTEM RECOVERY FAILORE; MACHINE CHECK, 

BON SEREP 
DMKCKP902W SYSTEM RECOVERY FAILORE; FATAL I/O ERROR 
DMKCKP910W SYSTEM RECOVERY FAILORE; INVALID WARM 

START CYLINDER 
DMKCKP911W SYSTEM RECOVERY FAILORE; WARM START AREA 

FOLL 



Figure 5. ABEND Problem Type (Part 1 of 2) 
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Problen 
Type 



ABEND 
(Cont.) 



I 



Where 
ABEND Occurs 



CP termina- 
tion with 
automatic 
restart 



CP termina- 
tion without 
automatic 
restart 



Virtual ma- 
chine ABEND 
(CMS) 



Virtual ma- 
chine ABEND 
(other than 
CHS) 



Distinguishing Characteristics 

An unrecoverable machine check error has occurred. 
One of the following messages: 

DMKMCH610I MACHINE CHECK SUPERVISOR DAMAGE 
DMKMCH611I MACHINE CHECK INTEGRITY LOST 

appears on the CPU console. The system is automat- 
ically restarted. 

An unrecoverable channel check error has occurred. 
The message: 

DMKCCH603H CHANNEL ERROR, RUN SEREP, RESTART 
SYSTEM 

appears on the CPU console, and CP enters the wait 
state. 



The CMS message 

DMSABM1il8T SYSTEM ABEND XXX CALLED FROM XXXXXX 

appears on the terminal. The system stops and 
waits for a command to be entered on the terminal. 
To have a dump taken, issue the CMS DEBUG command 
and then the DUMP subcommand. 

When OS or DOS abnormally terminates on a virtual 
machine, the messages issued and the dumps taken 
are the same as they would be if OS or DOS abnor- 
mally terminated on a real machine. 

VM/370 may terminate or reset a virtual machine if 
a nonrecoverabele channel check or machine check 
occurs in that virtual machine. One of the 
following messages appear to the system operator 
at the CPU console: 

DMKMCH616I MACHINE CHECK; USER userid TERMINATED 
DMKCCH604I CHANNEL ERROR; DEV xxx; USER userid; 
MACHINE RESET 

Also, the virtual machine user is notified, by one 
of the following messages, that his machine was 
terminated or reset: 

DMKMCH619I MACHINE CHECK; OPERATOR TERMINATED 
DMKCCH606I CHANNEL ERROR; OPERATOR TERMINATED 



Figure 5. ABEND Problem Type (Part 2 of 2) 
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OHEXPECTED RESULTS 



The unexpected results type of errors vary, from 
operating systems improperly functioning under 
VM/370 to output printed in the wrong format. 



DNEXPECTED RESULTS IN CP 



If an operating system executes properly on a 
real machine but does not execute properly with 
VM/370, a problem exists. Also, if a program 
executes properly under the control of a 
particular operating system on a real machine 
but does not execute correctly under the same 
operating system with VIl/370, a problem exists. 

There are programs (such as time-dependent 
programs) that CP does not support. Be sure that 
one of these programs is not causing the 
unexpected results in CP. Refer to "CP 
Restrictions" in Section 5 for a list of the 
restrictions. 

Ensure that the program and operating system 
running on the virtual machine are exactly the 
same as the one that ran on the real machine. 
Check for the same: 

• Job stream 

• Copy of the operating system (and program) 

• Libraries 

If the problem still is not found, look for 
an I/O problem. Try to reproduce the problem, 
tracing all CCHs, SIOs, and interruptions via 
the CP TRACE command. Compare the real and 
virtual CCWs from the trace. A discrepancy in 
the CCWs may indicate that one of the CP 
restrictions was violated, or that an error 
occurred in CP. 



UNEXPECTED RESULTS IN A VIRTUAL MACHINE 



When a program executes correctly under the 
control of a particular operating system on a 
real machine but has unexpected results 
executing under the control of the same 
operating system with VM/370, a problem exists. 
You usually find that something was changed in 
the operating system or problem programs. Check 
that the job stream, the operating system, and 
the system libraries are the same. 



by the CHS DDR command in a virtual machine 
controlled by CHS. The DDR program has five 
functions: 

• DUHP — dumps part, or all of the data from a 
DASE device to magnetic tape. 

• RESTORE — transfers data from tapes created 
by DDR DUHP to a direct access device. The 
direct access device that the data is being 
restored to must be the same type of device 
as the direct access device originally 
containing that data. 

• COPY — copies data from one device to 
another device of the same type. Data may be 
reordered, by cylinder, when copied from disk 
to disk. To copy one, tape to another, the 
original tape must have been created by the 
DDR DUHP function. 

• PRINT — selectively prints the hexadecimal 
and EBCDIC representation of DASD and tape 
records on the virtual printer. 

• TYPE — selectively displays the hexadecimal 
and EBCDIC representation of DASD and tape 
records on the terminal. 

CMS users should refer to "Debugging with 
CMS" in Section 4 for instructions on using the 
DDR command. "CP Commands for Debugging" in 
Section 4 contains information about executing 
the DDR program in a real or virtual machine and 
a description of the DDR control statements. 



CP 



Unexpected Results Problem Type 



If an operating system, executes 
properly on a real machine but not 
properly with CP, a problem exists. 
Inaccurate data on disk or system 
files (such as spool files) could 
be the cause of the error. 



Virtual 
Machine 



If a program executes correctly 
under the control of a particular 
operating system on a real 
machine, but does not execute 
correctly under the same operating 
system with VM/370, a problem 
exists. 



Figure 6. Unexpected Results Problem Type 



If unexpecte 
records interspe 
examine the cont 
files. Non-CMS 
utility program 
operating system 
rearrange files, 
utility programs 
publication for 
the virtual mach 



d results occur (such as TEXT 
rsed in printed output) , you can 
ents of the system or user disk 

users may execute any of the 

s, which are included in the 

they are using to examine and 

For more details on using the 

refer to the specific utilities 
the operating system running in 
ine. 



CMS users should use the DASD Dump Restore 
(DDR) service program to print or move the data 
stored on direct access devices. The VM/370 
DASD Dump Restore (DDE) program can be invoked 



LOOPS 



The real cause of a loop usually is an 
instruction that sets or branches on the 
condition code incorrectly. The existence of a 
loop can usually be recognized by the ceasing of 
productive processing and a continual return of 
the PSH instruction address to the same address. 
If I/O operations are involved, and the loop is 
a very large one, it may be extremely difficult 
to define, and may even include nested loops. 
One of the most difficult types of loops to 
determine is entry to the loop from a wild 
branch. The problem in loop analysis is finding 
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either the instruction that should open the loop 
or the instruction that passed control to the 
set of looping instructions. 



CP DISABLED LOOP 



The system operator should perform the following 
sequence when gathering information to find the 
cause of a CP disabled loop. 

1. Use the ALIEB or DISPLAY commands to 
display the real PSH, general registers, 
control registers, and storage locations 
X«00« - X'lOO'. 



Note: You can IPL a standalone dump program such 
as~the BPS Storage Print to dump the storage of 
your virtual machine. If you choose to use a 
standalone dump program, be sure to specify 
MOCLEAR on the IPL command. Also, be aware that 
the CP IPL simulation destroys a page of storage 
in your virtual machine and the standalone dump 
alters your virtual storage while the CP DUMP 
command does not. 



However, if the operating system in the 

virtual machine manages virtual storage, it is 

usually better, to use that operating system's 

dump program. CP does not retrieve pages that 

exist only on the virtual machine's paging 
device. 



2. 



Press the SYSTEM RESTART button to cause an 
ABEND dump to be taken. 



3. Save the information collected for the 
system programmer or IBM Programming 
Support Representative. 

After the system operator has collected the 
information, the system programmer or Field 
Engineering representative examines it. If the 
cause of the loop is not apparent: 

1. Examine the CP internal trace table to 
determine the modules that may be involved 
in the loop. 

2. If the cause is not yet determined, assume 
that a wild branch caused the loop entry, 
and search the source code for this wild 
branch. 



VIRTUAL MACHINE DISABLED LOOP 



Nhen a disabled loop is in a virtual machine you 
cannot communicate with the virtual machine's 
operating system. This means that signaling 
attention does not cause an interruption. 



To find the cause of 
disabled loop: 



a virtual machine 



1. Enter the CP console function mode. 

2. Use the CP TRACE command to trace the 
entire loop. Display general and extended 
control registers via the CP DISPLAY 
command. 

3. Take a dump via the CP DUMP command. 

4. Examine the source code. 

Use the information gathered, along with 
listings, to try to find the entry into the 
loop. 



VIRTUAL MACHINE ENABLED LOOP 



You should perform the following sequence when 
locating the cause of an enabled loop: 



1. Use the CP TRACE command to trace the 
entire loop. Display the PSW and the 
general registers. 

2. If your virtual machine has the extended 
control (EC) mode and the EC option, also 
display the control registers. 

3. Use the CP DUMP command to dump your 
virtual storage. CMS users can use the 
DEBUG DUMP subcommand. A standalone dump 
may be used, but be aware that such a dump 
destroys the contents of some areas of 
storage. 

U. Consult the source code to search for the 
faulty instructions, examining previously 
executed modules, if necessary. Begin by 
scanning for instructions that set the 
condition code or branch on it. 

5. If the way in which the loop was entered is 
still undetermined, assume that a wild 
branch has occurred and begin a search for 
its origin. 



WAIT 



No processing occurs in the virtual machine when 
it is in a wait state. When the wait state is 
enabled, an I/O interruption causes processing 
to resume. Likewise, when the Control Program 
is in a wait state, its processing ceases. 
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r 

1 loop Problem Type 


1 CP 1 The CPU console wait light is 
1 disabled | off. The problem state bit of the 
1 loop 1 real PSH is off. No I/O 
1 1 interruptions are accepted. 


1 CP 1 Condition does not exist. 
1 enabled | 
1 loop 1 


1 Virtual 1 The program is taking longer to 
1 machine | execute than anticipated. 
1 disabled j Signaling attention from the 
1 loop 1 terminal does not cause an 
1 1 interruption in the virtual 
i i machine. You cannot communicate 
1 1 with the virtual machine's opera- 
1 1 ting system by signaling atten- 
1 1 tion. 


1 Virtual 1 Excessive processing time often 
1 machine | indicates a loop. Use the CP 
1 enabled | QUERY TIME command to check the 
j loop 1 elapsed processing time. In CMS, 
1 1 the continued typing of the blip 
1 1 characters indicates that 
1 1 time is elapsing. If time has 
1 1 elapsed, periodically display the 
1 1 virtual PSH and check the 
1 1 instruction address. If the same 
1 1 instruction, or series of 
1 1 instructions continues to appear 
1 1 in the PSH, a loop probably 
1 1 exists. 



Figure 7. Loop Problem Type 



CP DISABLED HAIT 



A disabled wait state usually results from a 
hardware malfunction. During IPL, normally 
correctable hardware errors may cause a wait 
state because the operating system error 
recovery procedures are not accessible at this 
point. These conditions are recorded in the 
current PSH. 

CP may be in an enabled wait state with 
channel disabled when it is attempting to 
acguire more free storage. Examine extended 
control register 2 to see whether or not the 
multiplexer channel is disabled. A severe 
machine check could also cause a CP disabled 
wait state. 



If a severe machine check or channel check 
caused a CP disabled wait state, one of the 
following messages appear: 

DMKMCH612H MACHINE CHECK TIMING FACILITIES 
DAMAGE; BUN SEBEP 

DHKCCH603H CHANNEL ERROR, RUN SEBEP, 
RESTART SYSTEM 



Type 



Hait Problem Type 

I Distinguishing Characteristics 



Disabled CP 
wait 



The CPU wait light is on. 

Pressing the REQUEST key, or 
the equivalent action, on the 
operator's console, leaves the 
REQUEST PENDING light on. If 
the message 

DMKMCH612H MACHINE CHECK TIMING 
FACILITIES DAMAGE, 
RUN SEREP 

appears on the CPU console, 
a machine check (probable 
hardware error) caused the 
CP disabled wait state. If the 
message 

DMKCCH603H CHANNEL ERROR, RUN 
SEREP, RESTART 
SYSTEM 

appears on the CPU console, 
a channel check (probable 
hardware error) caused the 
CP disabled wait state. If the 
message 

DMKCPI955H INSUFFICIENT STORAGE 
FOR VM/370 

appears on the CPU console, 
the control program has 
entered a disabled wait state 
with code OOD in the PSH. 

Either the generated system 
is larger than the real 
machine size, or a hardware 
machine malfunction prevents 
VM/370 from using the 
necessary amount of storage. 
If the message 

DMKPAGUISE CONTINUOUS PAGING 
ERRORS FROM 
DASD XXX 

appears on the CPU console, 
the control program (CP) has 
entered a disabled wait with 
code OOF in the PSH. 

Consecutive hardware errors 
are occurring on one or more 
VM/370 paging devices. 



Enabled CP | The CPU console light is on, 
wait I but the system accepts 
interruptions from I/O devices. 

Figure 8. CP Hait Problem Type 
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If the generated system cannot run on the 
real machine because of insufficient storage, CP 
enters the disabled wait state with code OOD in 
the PSH. The insufficient storage condition 
occurs if: 

• The generated system is larger than the real 
machine size 



Using the dump, examine the VMBLOK for each 
user and the real device, channel, and control 
unit blocks. If each user is waiting because of 
a reguest for storage and no more storage is 
available, there is an error in CP . There may be 
looping in a routine that reguests storage. 
Befer to "Beading CP ABEND Dumps" in this 
section for specific information on how to 
analyze a CP dump. 



• A hardware malfunction occurs which reduces 
the available amount of real storage to less 
than that reguired by the generated system. 

The message 

DMKCPI955H INSUFFICIENT STORAGE FOR VH/370 

appears on the CPU console. 

If CP cannot continue because consecutive 
hardware errors are occurring on one or more 
VM/370 paging devices, the message 

DMKPAGmSE CONTINUOUS PAGING ERRORS FROM 
DASD XXX 

appears on the CPU console and CP enters the 
disabled wait state with code OOF in the PSH. 

If more than one paging device is available, 
disable the device on which the hardware errors 
are occurring and IPL the system again. If the 
VM/370 system is encountering hardware errors on 
its only paging device, move the paging volume 
to another physical device and IPL again. 

Note: This error condition may occur if the 
VM/370 paging volume was not properly 
formatted. 

The following procedure should be used by the 
system operator to record the needed 
information. 

1. Use the alter/display mode of the CPU 
console to display the real PSH and CSH. 
Also, display the general registers and the 
control registers. 



button to get a 



2. Press the SYSTEM RESTART 
system ABEND dump. 

3. IPL the system. 



Examine this information to find what caused 
the wait. If you cannot find the cause, try to 
reconstruct the situation that existed before 
the wait state was entered. 



CP ENABLED HAIT 



If you determine that CP is in an enabled wait 
state, but that no I/O interrupts are occurring, 
there may be an error in a CP routine or CP may 
be failing to get an interrupt from a hardware 
device. Press the SYSTEM RESTART button on the 
operator's console to cause an ABEND dump to be 
taken. Use the ABEND dump to determine the cause 
of the enabled (and noninterrupted) wait state. 
After the dump is taken, IPL the system. 



VIRTUAL MACHINE DISABLED HAIT 



The VM/370 Control Program does not allow the 
virtual machine to enter a disabled wait state 
or certain interrupt loops. Instead, CP 
notifies the virtual machine operator of the 
condition with one of the following messages: 

DMKDSPUSOH CP ENTERED; DISABLED HAIT 
PSH 

DMKDSPaSIH CP ENTERED; INVALID PSH 

DMKDSP452H CP ENTERED; EXTERNAL 
INTERRUPT LOOP 

DMKDSPU53H CP ENTERED; PROGRAM 
INTERRUPT LOOP 

and enters the console function mode. Use the CP 
commands to display the following information on 
the terminal. 

• Program status word 

• Channel status word 

• General registers 

• Control registers 

Then use the CP DUMP command to take a dump. 

If you cannot find the cause of the wait or 
loop from the information just gathered, try to 
reproduce the problem, this time tracing the 
processing via the CP TRACE command. 

If CMS is running in the virtual machine, the 
CMS debugging facilities may also be used to 
display information, take a dump, or trace the 
processing. The CMS SVCTRACE and the CP TRACE 
commands record different information. Figure 
11 compares the two. 



VIRTUAL MACHINE ENABLED HAIT 



If the virtual machine is in an enabled wait 
state, try to find out why an I/O interruption 
has not occurred to allow processing to resume. 

CP treats the following enabled wait in a 
virtual machine the same as a disabled wait. If 
the virtual machine does not have the real timer 
option and loads a PSH enabled only for external 
interrupts, CP issues the message 

DMKDSPaSOH CP ENTERED; DISABLED HAIT STATE 



Because the virtual timer is not decremented 
while the virtual machine is in a wait state, it 
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cannot cause the external interrupt. A real 

tlner runs In both the problea state and wait 

state and an external interruption can cause a 
virtual machine to resume processing. 



WAIT STATE CODE Xi.OOJi: If no RSCS message was 
issued, a program check interrupt occurred 
during the execution of the program check 
handler. A programming error is the probable 
cause. 



Problem 
Type 



Wait Problem Type 

Distinguishing 
Characteristics 



Disabled | The VM/370 Control Program does 
virtual | not allow a virtual machine to 
machine | enter a disabled wait state or 
wait I certain program loops. Instead, 

CP issues one of the following 

message: 

DMKDSPaSOW CP ENTERED; DISABLED 

WAIT PSW 
DMKDSP451W CP ENTERED; INVALID 

PSW 
DMKDSPa52W CP ENTERED; EXTERNAL 

INTERRUPT LOOP 
DMKDSPUSaw CP ENTERED; PROGRAM 

INTERRUPT LOOP 

Enabled | A PSW enabled for I/O 
virtual | interruptions is loaded. Nothing 
machine | happens if an I/O device fails to 
wait I issue an I/O interruption. If a 
program is taking longer to 
execute than expected, 
periodically issue the CP command, 
QUERY TIME. If the processing 
time remains unchanged, probably 
a virtual machine enabled wait 
exists. 

CMS types a blip character for 
every two seconds of elapsed 
processing time. If the program 
does not end and blip characters 
stop typing, an enabled wait 
state probably exists. 

L 1 

Figure 9. Virtual Machine Wait Problem Type 



RSCS VIRTUAL MACHINE DISABLED WAIT 



Three disabled wait conditions can occur during 
the operation of the RSCS component of VM/370. 
They can result from either hardware 
malfunctions or system generation errors. CP 
notifies the RSCS operator of the wait condition 
by issuing the message 



DMKDSP450W CP ENTERED; DISABLED WAIT 
PSW 



to the RSCS operator's console. Using CP 
commands, the operator can display the virtual 
machine's PSW. The rightmost 3 hexadecimal 
characters indicate the error condition. 



If the RSCS message 



DMTREX091T INITIALIZATION FAILURE 
— RSCS SHUTDOWN 



was issued, RSCS operation was terminated 
because of an error in the loading of DMTAXS or 
DMTLAX. A dump of virtual storage is 
automatically taken. Verify that the CMS files 
•DMTAXS TEXT' and 'DMTLAX TEXT' are correctly 
written and that they reside on the RSCS system 
residence device. 



If the RSCS message 



DMTREX090T PROGRAM CHECK IN SUPERVISOR 
— RSCS SHUTDOWN 



was issued, the program check handler has 
terminated RSCS because of a program check 
interrupt in other than a dispatched line 
driver. A dump of virtual storage is 
automatically taken. A programming error is the 
probable cause. 

The wait state code is loaded by DMTHEX at 
RSCS termination or automatically during program 
check handling. 

If neither of the last two messages was 
issued, use the CP DUMP command to dump the 
contents of virtual storage. Do an initial 
program load to restart the system. If the 
problem persists, notify your system support 
personnel. 

WAIT STATE CODE X10071: A program check 
interrupt has occurred during initial 
processing, before the program check handler 
could be activated. This may be caused by a 
programming error or by an attempt to load RSCS 
into an incompatible virtual machine. The 
latter case can occur if the virtual machine has 
(1) an incomplete instruction set, (2) less than 
512K of virtual storage, or (3) does not have 
the required VM/370 DIAGNOSE interface support. 
The wait state code is loaded automatically 
during the initial loading and execution of the 
RSCS supervisor, DMTINI, DMTREX, DMTAXS or 
DMTLAX. 

Verify that the RSCS virtual machine 
configuration has been correctly specified and 
that the "retrieve subsequent file descriptor" 
function of DIAGNOSE code X'lU' is supported. 
Dump the contents of virtual storage via the CP 
DUMP command. If the problem persists, notify 
your system support personnel. 

iJAIT STATE CODE X2.0112.: An unrecoverable error 
occurred when reading the RSCS nucleus from DASD 
storage. This may be caused by a hardware 
malfunction of the DASD device. It may also be 
the result of an incorrect virtual DASD device 
definition, an attempt to use a system residence 
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device unsupported by BSCS, incorrect RSCS 
system generation procedures, or the subsequent 
overlaying of the RSCS nucleus on the system 
residence device. The wait state code is loaded 
by DHTim after an attempt, successful or not, 
to issue the message: 



DBTINI402T IPL DEVICE READ I/O ERROR 



Verify that the RSCS system residence device 
has been properly defined as a virtual DASD 
device and that the real CASE device is mounted 
and operable. If the problem persists, dump 
virtual storage via the CP DUMP command and 
notify your system support personnel. The RSCS 
system residence device may have to be restored 
or the RSCS system may have to be regenerated. 



BSCS VIRTUAL MACHINE ENABLED WAIT 



Whenever RSCS has no task ready for execution, 
CMTDSP loads a masked-on wait state PSW with a 
code of hexadecimal zeros. This occurs during 
normal RSCS operation and does not indicate an 
error condition. An external interrupt caused 
by command entry or an I/O interrupt due to the 
arrival of files automatically causes processing 
to resume. 



RSCS Wait Problem Type 



Problem 
Type 

Disabled 

RSCS 

wait 



Enabled 

RSCS 

wait 



Distinguishing Characteristics 

The RSCS operator is notified of 
the wait state because CP issues 
the message 

DHKDSPHSOW CP ENTERED; DISABLED 
WAIT PSW 

If, in addition, the message 

DHTIIII402T IPL DEVICE READ I/O 
ERROR 

appears on the RSCS console, an 
unrecoverable error has occurred 
while reading the RSCS nucleus 
from DASD storage. RSCS enters 
a disabled wait state with a code 
of X«011' in the PSW. 

If a program check occurs before 
the program dheck handler is 
activated, RSCS enters a disabled 
wait state with a code of X'007' 
in the PSW. 

If a program check occurs after 
the program check handler is 
activated, RSCS enters a disabled 
wait state with a code of X'001' 
in the PSW. One of the following 
messages also appear on the RSCS 
console: 

DMTREX090T PROGRAM CHECK IN 

SUPERVISOR RSCS 

SHUTDOWN 

DMTREX091T INITIALIZATION FAILURE 
RSCS SHUTDOWN 

RSCS has no task ready for 
execution. A PSW, enabled for 
external and I/O interruptions, 
is loaded with a wait code of all 
zeros. 



Figure 10. RSCS Wait Problem Type 
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SUjlMARY OF VB^370 DEBUGGING TOOLS 



Figure 11 sumBari2es the VM/370 commands that are useful in debugging, 
commands are classified by the function they perform. 



The CP and CMS 



1 ' - '- — — — — — — 1 

1 Function | Coanents | CP Command | CMS Command j 


1 Stop exe- 1 Set the | ADSTOP f hexloc ) | DEBUG | 
1 cution at | address j \ OFF j j | 
1 a speci- | stop be- | j BReak id | symbol^ | 
1 fied lo- 1 fore the | I \ hexloc/ | 
1 cation | program | | | 
1 1 reaches a j j I 
i 1 specified | | | 
1 1 address. | j i 
1 1 CHS allows 1 1 1 
1 1 16 address j j I 
1 1 stops to 1 1 1 
1 1 be active j 1 j 
1 1 while CP 1 1 1 
1 1 allows on- j I I 
1 1 ly one. j I j 


1 Resume | Resume | Begin | DEBUG | 
1 execution | execution | I GO | 
1 1 where pro— | I | 
1 1 gram was | 1 j 
1 1 interrupted! 1 j 


1 1 Continue | Begin [ hexloc ] j DEBUG | 
1 1 execution ! | | 
1 1 at a spe- | I GO r symbol^ | 
1 1 cific Ic- 1 1 \ hexloc j | 
1 1 cation | I | 

1 Dump data | Dump the | r r -i il DEBUG ! 
1 1 contents | DUMP / hexloci )| /-nhexloc2| || r i r i 1 
1 1 of speci- 1 \Lhexloc1/| t = /USD | ||DUmp Isymbolll !symbol2| | 
1 1 fie sto- 1 1 L -"I! Ihexlocll |hexloc2| | 
1 1 rage loca- | | r -ill 1 | | * i | 
1 1 tions. 1 |{. }|bytecount| || «- J | 32 | | 
1 1 1 II END III *■ -• 1 
1 1 1 *■ *■ -■ J 1 [ident] | 
i 1 1 [>»dumpid] 1 1 



Figure 11. Summary of VM/370 Debugging Tools (Part 1 of 4) 
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Function 

Display 
data 



1 CoBments 




CP Command 




CMS Command | 


1 Display 




r r T 1 


DEBUG / 


r "• 1 1 


1 contents 


Display 


hexlocl |(-\| hexloc2| | 
lt:|IMP 1 1 


X 1 


symbol! n | | | 


1 of storage 




) 


lienathl / 1 


1 locations 




1 •- -"I 




L J 1 j 


1 in hexade— 




1 r T 1 




r -} ( 1 


1 cimal) 




|{ . }|bytecount 1 | 
1 IMP II 


/ 


1 n 1 \ 1 
hexlocl a 1 1 1 






L L JJ 


^ 


L J ^ 1 


1 Display 




r r t 1 






1 contents 


Display 


Thexloci 1 f-\ |hexloc2| | 
liniMP 1 1 






1 of storage 








1 locations 




1 L J 1 






1 (in hexa— 




1 r -I 1 






1 decimal 




|{ . )|bytecount| | 






1 and EBCDIC) 




1 IMP 1 1 










L L J J 






1 Display 




r r T 1 






1 storage 


Display 


Khexloci |/-||hexloc2| | 
11: /IMP 1 1 






1 key of 








1 specific 




1 •- -"1 






i storage 




1 r T 1 






1 locations 




|{ . }|bytecount | | 






1 in hex- 




1 IMP II 






1 adecimal 





L L J J 






1 Display 


r r 1 -1 


DEBUG 




1 general 


Display 


Greg1||-||reg2| | 
it = /IMP 1 1 
1 r T 1 


GPR r€ 


igl [reg2] | 


1 registers 












|{ . }|regcount 1 | 










1 1 MP 1 1 










L L J J 






1 Display 




r r T 1 






1 floating- 
1 point 


Display 


yreg1|f-\|reg2| | 
it: /IMP 1 1 






1 registers 




1 •- -" 1 1 
1 r -1 1 
|{ . }|regcount| | 

1 IMP 1 1 










L I. JJ 






1 Display 




r r -1 T 






1 control 


Display 


Xreg1|/-||reg2| | 

it M IMP 1 1 1 
1 •■ -• II 






1 registers 












1 r tI 

|{ . }|regcount 1 | | 










1 IMP II 1 








Display 


L L JJ 






1 Display 


PSH 1 


DEBUG 




1 contents 






PSH 




1 of current 










1 virtual 










1 PSH in 










1 hexadecioal 










1 format 


Display 


CAH 1 






1 Display 


DEBUG 




1 CAH con- 






CAH 




1 tents 










1 Display 


Display 


CSH 1 


DEBUG 




1 CSW con- 






CSH 




1 tents 











Figure 11. Summary of VM/370 Debugging Tools (Part 2 of H) 
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Function | Comments j 



CP Command 



CHS Command 



Store 
data 



Store 1 1 

specified ISTore Shexloc hexdata... j DEBOG 

informa- | I STore T symbol ) hexinfo 

tion into j | \ hexloc j" 

consecu- j I 

tive sto- 1 1 

rage loca- j I 

tions with-| j 

out align- | | 

Bent. 1 1 


Store 1 1 
specified | STore ("hexloc \ | 
words of 1 (Lhexlocj I 
information! | 
into con- | { hexHord1[ hexword2. . . ] } I 
secutive | 1 
fullword 1 1 
storage | I 
locations 1 j 

Store ISTore Greg hexwordi (DEBUG 

specified | [ hexword2. . . ] |SET GPB reg hexinfo[ hexinfo ] 

words of 1 1 

information! ! 

into con- | 1 

secutive | 1 

general I I 

registers j | 

Store ISTore Yreg hexwordi | 
specified 1 [ hexword2. . . ] j 
words of 1 1 
information! I 
into con— | | 
secutive | ! 
floating- | | 
point ! 1 
registers 1 ! 


Store ISTore Xreg hexwordi ! 
specified | [ hexword2. . . ] | 
words of 1 1 
data into | ! 
consecutive! I 
control 1 ! 
registers | | 


Store ISTore PSH [ hexwordi ] hexword2 | DEBOG 

information! | SET PSW hexinfo [hexinfo] 

into PSH 1 ! 


Store 1 1 DEBOG 

information! |SET CSB hexinfo [hexinfo] 

in CSW ! ! 

Store I 1 DEBUG 
information! JSET CAW hexinfo 
in CAN ! ! 



Figure 11. Summary of Vll/370 Debugging Tools (Part 3 of U) 
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Function 



Trace 
execution 



CoDBents 



Trace real 

machine 

events 



Trace all 
instruc- 
tions, 
interrupts, 
and 
branches 



I CP CoDBand 

TBace ALL 



CHS CoBioand 



Trace SVC 
interrupts 

Trace I/O 
interrupts 

Trace 

program 

interrupts 



Trace 

external 

interrupts 



Trace 

privileged 
instruc- 
tions 



Trace all 
user I/O 
operations 

Trace 

virtual and 
real CCHs 

Trace 
all user 
interrupts 
and suc- 
cessful 
branches 

Trace 
all in- 
structions 



TRACE SVC 



TRace I/O 
TRace PROgram 



TRace EXTernal 



TRace PRIV 



TRace SIO 



TRace SIO 
TRace CCH 



TRace BRANCH 



TRace INSTruct 



End all | TRace END 

tracing 

activity 

Trace 
events in 
real 
machine 

Stop trac- 
ing events 
the real 
machine 

Figure 11. Summary of VM/370 Debugging Tools (Part U of 4) 



MONitor STArt CPTRACE 



MONitor STOP CPTRACE 



SVCTrace ON 



SVCTrace OFF 
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COMPARISON OF CP AND CHS FACILITIES FOR DEBDGSING 



If you are debugging problems while your 
virtual machine is running CMS, you can 
choose the CP or CHS debugging tools. See 



Figure 12 for a comparison 
CMS debugging tools. 



of the CP and 



1 Function | CP | CHS | 


1 Setting | Can set only one address | Can set up to 16 address | 
1 address | stop at a time. | stops at a time. | 
1 stops 1 1 1 


1 Dumping | The dump is printed in hexa- | The dump is printed in j 
1 contents j decimal format with EBCDIC | hexadecimal format. The | 
1 of stor- 1 translation. The storage ad- | storage address of the | 
1 age to | dress of the first byte of | first byte of each line is | 
1 the 1 each line is identified at | identified at the left. | 
1 printer j the left. The control blocks | The contents of the gen- | 
1 1 are formatted. | eral and floating-point | 
1 1 1 registers are printed at | 
1 I 1 the beginning of the dump, j 


1 Display 1 The display occurs in hexa- | The display occurs in hex- | 
1 the con- | decimal format with EBCDIC | adecimal format. The CMS | 
1 tents of I translation. The CP command | commands do not dis- | 
1 storage j displays storage keys, | play storage keys, | 
1 and con- | floating-point registers and | floating-point registers | 
1 trol re- j control registers. | or control registers as | 
1 gisters | I as the CP command does. j 
1 at the 1 1 1 
1 terminal j 1 1 


1 Storing | The amount of information | The CHS command stores up | 
1 informa- | stored by the CP command is | to 12 bytes of information | 
1 tion 1 limited only by the length | and can store data in the | 
1 i of the input line. The in- | general registers but not | 
1 1 formation can be fullword | in the floating-point or | 
1 1 aligned when stored. CP | control registers. CMS | 
1 1 stores data in the PSW, but | stores data in the PSW, | 
1 1 not in the CAW or CSW. How- | CAW, and CSW. | 
1 1 ever, data can be stored in | | 
1 i the CSW or CAW by specifying | I 
1 1 the hardware address in the | I 
1 1 STORE command. CP also | I 
1 1 stores the status of the | 1 
1 I virtual machine in the | 1 
1 j extended logout area. | I 


1 Tracing | CP traces: | CMS traces all SVC inter- | 
1 informa- j I rupts. CHS displays the | 
1 tion 1 • All interrupts, instruc- | rupts. CMS displays the | 
1 1 tions and branches | contents of general and | 
1 1 • SVC interrupts | floating-point registers | 
1 I • I/O interrupts | before and after a routine | 
1 1 • Program interrupts | is called. The parameter | 
1 1 • External interrupts | list is recorded before a | 
1 1 • Privileged instructions | routine is called. j 
1 1 • All user I/O operations | 1 
1 1 • Virtual and real CCW's | 1 
1 1 • All instructions | 1 

1 1 The CP trace is interactive. | 1 
t 1 You can stop and display | 1 
1 1 other fields. | I 



Figure 12. Comparison of CP and CMS Facilities for Debugging 
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DEBUGGING CP ON A VIRTUAL MACHINE 



Many CP problems can be isolated without 
standalone machine testing. It is possible to 
debug CP by running it in a virtual machine. In 
most instances, the virtual machine system is an 
exact replica of the system running on the real 
machine. To set up a CP system on a virtual 
machine, use the same procedure that is used to 
generate a CE system on a real machine. 
However, remember that the entire procedure of 
running service programs is now done on a 
virtual machine. Also, the virtual machine must 
be described in the real VM/370 directory. See 
the VM^370: Sy;stem P£oarammerj;.s Guide for 
directions for setting up the virtual machine. 



CP 
ALL 



dump data must fit on one reel; VM/370 
does not support multiple tape 
volumes. 

dumps only the CP storage area. 

dumps all of real storage. 



USING THE VBFDUMP COMMAND 



Use the CMS VMFDUMP command to print the dump on 

the real printer, when the CP ABEND dump is sent 

to a disk. The format of the VMFDUMP command 
is: 



ABEND DUMPS 



There are three 
dumps possible 
occurs when the 
It terminates a 
issue a dump, 
operating system 
continue. It 
attempts to is 
environment, bot 
virtual machine' 
the virtual prin 
the virtual prin 
the real printer 



kinds of abnorma 

when using CP. T 

problem program ca 

nd in some case 

The second occ 

for your virtual 
terminates and i 
sue a dump. I 
h the problem pr 
s operating syste 
ter. A CLOSE must 
ter to have either 



1 termination 
he first kind 
nnot continue, 
s attempts to 
urs when the 
machine cannot 
n some cases 
n the VM/370 
ogram and the 
m dumps go to 
be issued to 
dump print on 



A third 
system ca 
termination 
or tape or 
the dump is 
must fit o 
volumes ar 
historical 
format and 
programs or 



kind of dump occurs 
nnot continue. The 

dumps can be directed 
be dynamically allocate 

directed to a tape, t 
n one reel of tape, 
e not supported by 
data on the tape is 
can be processed by 

via CMS commands. 



when the CP 

CP abnormal 

to a printer 

d to DASD. If 

he dumped data 

Multiple tape 

VM/370. The 

in print line 

user-created 



Use the CP SET command to specify the output 
device for CP ABEND dumps. The format of the 
SET command is: 




VMFDUMP 






where : 
DUMPxx 



ERASE 



NOHAP 



NOHEX 



NOFORH 



NOVIHT 



I I 

I DUMPXX I 

I I 



I ERASE 

I NOHAP 

I NOHEX 

I NOFORH 

I NOVIRT 



specifies the name of the CP dump file 
to be formatted and printed. xx may 
be any value from 00 to 09. Class D 
spool files contain only CP dump 
files. These files are searched for 
the indicated dump file. When the 
file is found, it is used to create a 
CMS file which, in turn, is formatted 
and printed. 

specifies that the CMS file which is 
being formatted and printed is to be 
erased at the conclusion of the 
program. 

specifies that a load map is not to be 
printed. 

specifies that a hexadecimal dump is 
not to be printed. 

specifies that no formatted control 
blocks are to be printed. 

specifies that only the real machine 
control blocks are to be formatted. 
This option is ignored if NOFORH is 
also specified. 



where ; 

DUMP 

AUTO 

raddr 



specifies the ABEND Dump. 

automatically directs the ABEND dump 
to disk. 

directs the ABEND dump to the 

specified unit address (either a 

printer or a tape unit) . If the 

address specifies a tape device, the 



Use the VMFDUMP command to format and print a 
current or previous VM/370 system ABEND dump. 
Specify 

VHFDDHP 

to obtain a complete formatted, hexadecimal 
printout. 

Hhen the dump has been printed, one of two 
messages is printed: 
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DUMP FILE - DUMP XX - PRINTED AND KEPT 

— or — 
DUMP FILE - DUMP XX - PRINTED AND ERASED 



"Load Nap" later in this section 
instructions for generating a load Dap. 



REASON FOR THE ABEND 



for 



HOW TO PRINT A CP ABEND DUMP FROM TAPE 

Nhen the CP ABEND dump is sent to a tape, the 
records are 133 characters unblocked, and 
include carriage control characters. 

To print the tape, first make sure the tape 
drive is attached to your system. Next, define 
the printer and tape file: 

FILEDEF ddnamel PRINTER (RECFM F LRECL 133) 

FILEDEF ddname2 ( TAP2 ) (9-track DEN 1600 



(TAP2 ) (9-tr< 
\TAP1 / 
RECFM F LRECL 133 BLOCK 133) 



Then use the MOVEFILE command to print the 
tape: 

MOVEFILE ddname2 ddnamel 



READING CP ABEND DUMPS 



Two types of printed dumps occur when CP 
abnormally ends, depending on the options 
specified in the CP SET DUMP command. When the 
dump is directed to a direct access device, 
VMFDUMP must be used to format and print the 
dump. VMFDUMP formats and prints: 

• Control blocks 

• General registers 

• Floating-point registers 

• Control registers 

• TOD (Time-of-Day) clock 

• CPU timer 

• Storage 

Note: Storage is printed in hexadecimal 
notation, eight words to the line, with EBCDIC 
translation at the right. The hexadecimal 
address of the first byte printed on each line 
is indicated at the left. 

If the CP SET DUMP command directed the dump 
to tape or the printer, the printed format of 
the dump is the same as with VMFDUMP, except 
that the control blocks are not formatted and 
printed. 



When CP can no longer continue and abnormally 
terminates, you must first determine the 
condition that caused the ABEND, and then find 
the cause of that condition. You should know 
the structure and function of the Control 
Program. The following discussion on reading CP 
dumps includes many references to CP control 
blocks and control block fields. Refer to 
VM^370: Data Areas and Control Block Loaic for a 
description of the CP control blocks. You will 
need the current load map for CP to be able to 
identify the modules from their locations. See 



Determine the immediate reason for the ABEND. 
You need to examine several fields in the PSA 
(Prefix Storage Area) which is located in low 
storage, to find the reason for the ABEND. 

• Examine the program old PSH and program 
interrupt code to find out if a program check 
occurred in CP. The program old PSW (PROPSU) 
is located at X'28» and the program interrupt 
code (INTPR) is at X*8E'. If a program check 
has occurred in supervisor mode, use the CP 
system load map to identify the module. If 
you cannot find the module using the load 
map, refer to "Identifying a Pageable 
Module." 



Examine the SVC old PSW, the SVC interrupt 
code, and the ABEND code to find out if a CP 
routine issued an SVC 0. The SVC old PSW 
(SVCOPSW) is located at X'20', the SVC 
interrupt code (INTSVC) is at X'8A', and the 
ABEND code (CPABEND) is at X'37a«. 

The modules that may issue an SVC are: 



DMKBLD 
DMKCFG 
DMKCKS 
DMKCPI 
DMKCVT 
DMKDRD 
DMKDSP 
DMKFRE 
DMKHVD 
DMKIOS 
DHKNLD 
DMKPGS 
DMKPGT 
DHKPRG 



DMKPSA 
DMKPTH 
DMKRGA 
DHKRNH 
DMKRPA 
DMKSCH 
DMKTDK 
DMKUDR 
DMKVDB 
DMKVDR 
DMKVIO 
DHKVMA 
DMKVSP 



The ABEND code (CPABEND) is a fullword in 
length. The first three bytes identify the 
module that issued the SVC and the fourth 
byte is a binary field whose value 
indicates the reason for issuing an SVC 0. 
See "CP ABEND Codes, Reason and Action" in 
Section 3. 

Use the CP system load map to identify the 
module issuing the SVC 0. If you cannot 
find the module using the CP system load 
map, refer to "Identifying a Pageable 
Module" in this Section. 



Examine the old PSW at X'OB'. If the 
operator has pressed the SYSTEM RESTART 
button on the CPU console, the old PSW 
indicates the instruction executing when the 
ABEND (caused by pressing the SYSTEM RESTART 
button) was recognized. 



For a machine check, examine the machine 
check old PSW and the logout area. The 
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machine check old PSH (HCOPSH) is found at 
X'30' and the fixed logout area is at X'lOO*. 
Also examine the machine check interrupt code 
(INTMC) at X'E8«. 



COLLECT INFOEMATIOM 



Examine several other fields in the PSA to 
analyze the status of the system. As you 
progress in reading the dump, you may return to 
the PSA to pick up pointers to specific areas 
(such as pointers to the real control blocks) or 
to examine other status fields. 

The following areas of the PSA may contain 
useful debugging information. 



• CP Running Status Field 

The CP running status is stored in CPSTAT at 
location X'3a8«. The value of this field 
indicates the running status of CP since the 
last entry to the dispatcher. 



REGISTER USAGE 



To trace control blocks and 
necessary to know the CP 
conventions. 



modules, 
register 



it is 
usage 



The 16 general registers have many uses that 
vary depending upon the operation. The contents 
of some of the general registers follows: 

GR1 The virtual address to be translated 
GR2 The real address or parameters 
GR6,7,8 The address of the active VBBLOK and 

device control blocks 
GHIO The address of the active lOBLOK 
GRlt,15 The external branch linkage 

The following general registers always contain 
the same information: 

S^aister Contents 

GE11 The address of the active VMBLOK 

GR12 The base register for the module 

executing 
GR13 The address of the current save area, 

if the module was called via an SVC 



CPSTAT Values and Meaning 

X»80« CP~is in wait state 

X«40« CP is running the user in RUNUSER 

X'20' CP is executing a stacked reguest 



Use these registers, the CP control blocks, 
and the data in the prefix storage area to 
determine the error that caused the CP ABEND. 



• Current User 

The PSW that was most recently loaded by the 
dispatcher is saved in RUHPSH at location 
X'330', and the address of the dispatched 
VMBLOK is saved in RUNUSER at location 
X'338'. Also, examine the contents of 
control registers and 1 as they were when 
the last PSH was dispatched. See RUNCEO 
(X'340') and RUNCR1 (X'344') for the control 
registers. 

Also, examine the CP internal trace table to 
determine the events that preceded the abnormal 
termination. Start with the last event recorded 
in the trace table and proceed backward through 
the trace table entries. The last event recorded 
is the last event that was completed. 



The trace 
bytes) long, 
table for ea 
storage aval 
entry is 16 

(location X' 
start of the 

(location X' 
byte followin 
address of th 
is found i 
X ' 1 4 ' ) . 



table is at least one page (4096 
One page is allocated to the trace 
ch block of 256K bytes of real 
Each trace table 
The TEACSTRT field 
the address of the 
The TRACEND field 
the address of the 
the trace table. The 



lable at IPL. 

bytes long. 
OC) contains 

trace table. 
10') contains 
g the end of 



e next 
n the 



available trace table entry 
THACCURR field (location 



Subtract 16 (XMC) bytes from the value at 
X'14' (TRACCURR) to find the address of the last 
trace table entry recorded. 



SAVE AREA CONVENTIONS 



There are three save areas that may be helpful 
in debugging CP. If a module was called by an 
SVC, examine the SAVEAREA. SAVEAREA is not in 
the PSA; the address of the SAVEAREA is found 
in general register 13. If a module was called 
by a BALR, the general registers are saved in 
the PSA in an area called BALRSAVE (X«240»). 
The DHKFRE save area and work area is also in 
the PSA: these areas are only used by the 
DMKFREE and DMKFRET routines. The DMKFRE save 
area (FREESAVE) is at location X«280« and its 
work area (FREEHORK) follows at location 
X«2C0« . 

Use the save areas to trace back and find the 
previous module executed. 

• SAVEAREA 

An active save area contains the caller's 
return address in SAVERETN (displacement 
X'OO'). The caller's base register is saved 
in SAVEE12 (displacement X'04') , and the 
address of the save area for the caller is 
saved in SAVER13 (displacement X'08'). Using 
SAVER13, you can trace back again. 



36 



IBM VM/370: System Logic and Problem Determination Guide 



BALRSAVE 

All the general registers are saved in 
BALRSAVE after branching and linking (via 
BALH) to another routine. If you look at 
BALR14 for the return address saved, BALR13 
for the caller's save area, and BALR12 for 
the caller's base register, you can trace 
module control backwards. 

FREESAVE 



Examine the virtual PSW and the last virtual 
machine privileged instruction. The virtual 
machine PSN is saved in VHPSH (displacement 
X'A8') and the virtual machine privileged or 
tracing instruction is saved in TMINST 
(displacement X'98'). 



Find the name of the last CP command that 
executed in VMCOMND (displacement X'lUS'). 



All the general registers are saved in 
FREESAVE before DMKFRE executes. Dse the 
address of FREESAVE to trace module control 
backwards. 

£i§lil Contents 

FREER15 The "entry point (DMKFREE or 

DMKFRET) 
FREER14 The saved return address 
FREER13 The caller's save area (unless the 

caller was called via BALR) 
FREER12 The caller's base register 
FREER1 Points to the block returned (for 

calls to DMKFRET) 
FREERO Contains the number of doublewords 

reguested or returned 



VIRTUAL AND HEAL CONTROL BLOCK STATOS 



Examine the virtual and real control blocks for 
more information on the status of the CP 
system. 



Check the status of I/O activity. The 
following fields contain pertinent 
information . 

— VHPEND (displacement X'63') contains the 
interrupt pending summary flag. The value 
of VMPEND identifies the type of 
interrupt. 

VHPEND 

X'UO' Virtual PER (Program Event 

Recording) interrupt pending 

X'20' Virtual program interrupt deferred 

X'10' Virtual SVC interrupt deferred 

X'08' Virtual pseudo page fault pending 

X'02' Virtual I/O interrupt pending 

X'01' Virtual external interrupt pending 

— VMIOINT (displacement X'6A') contains the 
I/O interrupt pending flag. Each bit 
represents a channel (0-15). An interrupt 
pending is indicated by a 1 in the 
corresponding bit position. 



VHBLOK 



The address of the VHBLOK is in general register 
11. Examine the following VHBLOK fields: 

• The virtual machine running status is 
contained in VHRSTAT (displacement X'58<) . 
The value of this field indicates the running 
status: 

VHRSTAT 

Status JHeanin^ 

X'80' Waiting, executing console function 

X"»0' Raiting, page operation 

X'20' Waiting, scheduled lOBLOK start 

X'10' Waiting, virtual PSW wait state 

X'08' Waiting, instruction simulation 

X'OU' User not yet logged on 

X'02' User logging off 

X'01' Virtual machine in idle wait state 



VHIOINT 
Values 
loo 00000 

01000000 



00000000 



Heanina 

00000000 Interrupt pending 

on channel 
00000000 Interrupt pending 

on channel 1 



00000001 Interrupt pending 
on channel 15 



~ VHIOACTV (displacement X'36') is the 
active channel mask. An active channel is 
indicated by a 1 in the corresponding bit 
position. 



VCHBLOK 



The virtual machine dispatching status is 
contained in VMDSTAT (displacement X'59'). 
The value of this field indicates the 
dispatching status: 



VHDSTAT 

Values 

x'5"80' 



X"»0' 
X'20' 

X'10' 
X'08' 

x'oa' 



Heanina 

Virtual machine is dispatched 

BUNUSER 

Virtual machine is compute bound 
Virtual machine in-gueue time slice 

end 

Virtual machine in TIO/SIO busy loop 

Virtual machine is runable 

Virtual machine in a gueue 



The address of the VCHBLOK table is found in the 
VHCHSTRT field (displacement X'18') of the 
VHBLOK. General register 6 contains the address 
of the active VCHBLOK. Examine the following 
VCHBLOK fields: 



The virtual channel address is 
VCHADD (displacement X'OO') . 



contained in 



The status of the virtual channel is found in 
the VCHSTAT field (displacement X'06'). The 
value of this field indicates the virtual 
channel status: 
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TCHSTAT 
Values 
X'80' 
X«40« 

X«01« 



Meaning 

Virtual channel busy 

Virtual channel class 

pending 
Virtual channel dedicated 



interrupt 



The value of the VCHTYPE field (displacement 
X'07') indicates the virtual channel type: 

VCHTYPE 

Y§:iS§s Meaning 

X"80' Virtual selector channel 

X«40« Virtual block multiplexer 



VCUBLOK 



The address of the VCUBLOK table is found in the 
VCUSTHT field (displacement XMC) of the 
VMBLOK. General register 7 contains the address 
of the active VCUBLOK. Useful information is 
contained in the following VCUBLOK fields: 



The virtual control unit address is found in 
the VCUADD field (displacement X»00«). 

The value of the VCUSTAT field (displacement 
X»06') indicates the status of the virtual 
control unit: 

VCUSTAT 

Z^ilues Meanina 

X»80' Virtual subchannel busy 

X'40« Interrupt pending in subchannel 

X"20' Virtual control unit busy 

X'10* Virtual control unit interrupt 

pending 

X'08' Virtual control unit end pending 

The value of the VCUTIPE field (displacement 
X'07') indicates the type of the virtual 
control unit: 



VCUTIPE 

Values 

X'80' 



X»40' 



Meaning 

Virtual control unit on shared 

subchannel 
Virtual control unit is a 

channel-to-channel adapter 



VDEVSTAT 

Values Usaniaa 

X«80' virtual subchannel busy 

X'40' Virtual channel interrupt pending 

X"20' Virtual device busy 

XMO' Virtual device interrupt pending 

X'08" Virtual control unit end 

X'04' Virtual device not ready 

X'02' Virtual device attached by console 

function 
X'OT VDEVREAL is dedicated to device 

BDEVBLOK 



The value of the VDEVFLAG field (displacement 
X'07') indicates the following device 
dependent information: 

VDEVFLAG 

I§i23§§ yeaning 

X'80' DASD — read-only device 

X'80' Virtual 2701/2702/2703 device— line 

enabled 
X'40' DASD— TDISK space allocated by CP 
X'UO' Virtual 2701/2702/2703 device— line 

connected 
X'40' Console — activity spooled 
X'20' DASD — 2311 device simulated on top 

half of 23ia 
X'10' DASD— 2311 device simulated on 

bottom half of 23 1U 
X'10' Console and spooling 

device — processing first CCH 
X'08' DASD — executing standalone seek 
X'02' RESERVE/RELEASE are valid CCW 

operation codes. 
X'01' Virtual device sense bytes present 



The VDEVCSH field (displacement X'08') 
contains the virtual channel status word for 
the last interrupt. 

The VDEVREAL field (displacement X'2a') 
contains the pointer to the real device 
block, BDEVBLOK. 

The VDEVIOB field (displacement X'34') 
contains the pointer to the active lOBLOK. 

For console devices, the value of the 
VDEVCFLG field (displacement X'26') describes 
the virtual console flags: 



VDEVBLOK 



The address of the VDEVBLOK table is found in 
the VMDVSTRT field (displacement X'20') of the 
VMBLOK. General register 8 contains the address 
of the active VDEVBLOK. Useful information is 
contained in the following VDEVBLOK fields: 



VDEVCFLG 

Values 

X'80' 



X'40' 
X'20' 

X'10' 

X'08' 



Meaning 

User signaled attention too many 

times 
Last CCH processed was a TIC 
Data transfer occurred during this 

channel program 
Virtual console function in progress 
Automatic carriage return on first 

read 



The virtual device address is found 
VDEVADD field (displacement X'OO'). 



in the 



For spooling devices, the value of the 
VDEVSFLG field (displacement X'27') describes 
the virtual spooling flags: 



The value of the VDEVSTAT field (displacement 
X'06') describes the status of the virtual 
device: 
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VDEVSFLG 




Values 
X»80« 


Meaning 

Spool reader- 




feed 


X'80' 

x'ao* 


Spool output- 
Spool device — < 


X«20' 


Hold output — s 


X'10« 


Spool outpu 




distribution 


X'08' 


Spool input — 
EOF 


X«08' 


Terminal outpu 




console 


x»oa« 


Device closed 


X'02« 
X«02« 


Spool output — ; 
Spool input- 
DIAGNOSE 


X'01» 


Spool output — 1 



-last command was a 

transfered to VSPXXUSH 
continuous operation 
ave input 
t — for user and 

set unit exception at 

t required for spooled 

by console function 
purge file at close 
-device opened by 

DMKVSP entered via SVC 



For output spooling devices, the VDEVEXTN 
field (displacement X'10') contains the 
pointer to the virtual spool extension block, 
VSPXBLOK. 



BCD6L0K 



The address of the first RCUBLOK is found in the 
ARIOCU field (displacement X«3b8«) of the PSA. 
General register 7 points to the current 
BCUBLOK. Examine the following RCUBLOK fields: 

• The RCDADD field (displacement X«00«) 
contains the real control unit address. 



The value of the 
X«OU«) describes 
unit: 



HCUSTAT field (displacement 
the status of the control 



RCDSTAT 

Values 

X»80' 

X'UO' 

X'20« 

X'OV 



Beaninof 

Control unit busy 

lOB scheduled on control unit 

Control unit disabled 

Control unit dedicated 



The value of the HCUTYPE field (displacement 
X'05') describes the type of the real control 
unit: 



flCHBLOK 



The address of the first RCHBLOK is found in the 
ARIOCH field (displacement X'3BU«) of the PSA 
(Prefix Storage Area) . General register 6 
contains the address of the active RCHBLOK. 
Examine the following RCHBLOK fields: 



The real channel address is found in the 
RCHADD field (displacement X«00«). 



RCOTYPE 

Values 

X'80'5' 



X«01« 
X«02» 
X«03' 
X'OU' 



Meaning 

This control unit can attach to only 

one subchannel 
TCU is a 2701 
TCU is a 2702 
TCU is a 2703 
Subordinate control unit 



The RCUFIOB field (displacement X»08') points 
to the first lOBLOK in the queue and the 
RCULIOB field (displacement X'OC) points to 
the last lOBLOK in the queue. 



The value of the RCHSTAT field (displacement 
X'OU') describes the status of the real 
channel. 



RDEVBLOK 



RCHSTAT 




Values 
X'80'J" 


Meaning 
Channel busy 


X»40' 


JOB scheduled on channel 


X'20' 


Channel disabled 


X'01« 


Channel dedicated 



The address of the first RDEVBLOK is found in 
the ARIODV field (displacement X«3BC«) of the 
PSA. General register 8 points to the current 
RDEVBLOK. Also, the VDEVBEAL field (displacement 
X'2'»') of each VDEVBLOK contains the address of 
the associated RDEVBLOK. Examine the following 
fields of the RDEVBLOK: 



The value of the RCHTYPE field (displacement 
X'05') describes the real channel type: 

RCHTYPE 

X'80« Selector channel 
X'40* Block multiplexer channel 
X'20' Byte multiplexer channel 
X'01' System/370 type channel (System/370 
instruction support) 



The RCHFIOB field (displacement X'08') is the 
pointer to the first lOBLOK in the queue and 
the RCHLIOB field (displacement X'OC) is the 
pointer to the last lOBLOK in the queue. 



The RDEVADD field (displacement 
contains the real device address. 



X«00') 



The values of the RDEVSTAT (displacement 
X'OU') and RDEVSTA2 (displacement X«U3«) 
fields describe the status of the real 
device: 

RDEVSTAT 

ISiues Heaninq 

X«80^ Device busy 

X'40« lOB scheduled on device 

X»20« Device disabled (offline) 

X' 10' Device reserved 

X'08' Device in intensive error recording 

mode 
X'OU' Device intervention required 
X'02' GRAF - lOBLOK pending; queue 

requests 
X'OT Dedicated device (attached to a 

user) 
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RDEVSTA2 

Z§i!i§§ leaning 

X'80« Active device is being reset 

X'40» Device is busy with the channel 

X'20' Contingent connection present 

The value of the RDEVFLAG field (displacenent 
X«05«) indicates device flags. The following 
flags are device dependent. 



RDEVFLAG 
Values 



X 


80' 


X 


•40» 


X 


20" 


X 


10» 


X 


'08' 


X 


80* 


X 


•40' 


X 


20" 


X 


10« 


X 


08» 


X 


04' 


X 


02' 


X 


01' 


X 


80' 


X 


40' 


X 


20' 


X 


10" 


X 


08' 


X 


04' 


X 


02' 


X 


01' 


X 


80' 


X 


40' 


X 


20' 


X 


10' 


X 


08' 


X 


04' 


X 


02' 


X' 


01' 



Meaning 

DASD — ascending order seek gueueing 

DASD — volume preferred for paging 

DASD — volume attached to system 

DASD — CP owned volume 

DASD — volume mounted but not 

attached 
Console — terminal has print suppress 

feature 
Console — terminal executing prepare 

command 
Console — lOBLOK pending; queue 

request 
Console — 2741 terminal code 

identified 
Console — device is enabled 
Console — next interrupt from a halt 

I/O 
Console — device is to be disabled 
Console — 3704/3705 NCP resource in 

EP mode 
Spooling — device output drained 
Spooling — device output terminated 
Spooling — device busy with 

accounting 
Spooling — force printer to single 

space 
Spooling — restart current file 
Spooling — backspace the current file 
Spooling — print/punch job separator 
Spooling — UCS buffer verified 
Special — network control program is 

active 
Special — 270 1/2702/2703 emulation 

program is active 
Special — 3704/3705 is in buffer 

slowdown mode 
Special — automatic dump/load is 

enabled 
Special — lOBLOK is pending; queue 

reguests 
Special — emulator lines are in use 

by system 
Special — automatic dump/load process 

is active 
Special--basic terminal unit trace 

requested 



The RDEVIOER field (displacement X'48') 
contains the address of the lOERBLOK for the 
last CP error. 

For spooling unit record devices, the RDEVSPL 
field (displacement X'18') points to the 
active HSPLCTL block. 

For real 3704/3705 Communications 
Controllers, several pointer fields are 
defined. The RDEVEPDV field (displacement 
X'lC) points to the start of the free 
RDEVBLOK list for EP lines. The RDEVNICL 
field (displacement X'38') points to the 
network control list and the RDEVCKPT field 
(displacement X'3C') points to the CKPBLOK. 
Also, the RDEVHAX field (displacement X'2B') 
is the highest valid MCP resource name and 
the RDEVNCP field (displacement X»30') is the 
reference name of the active 3705 NCP. 

For terminal devices, additional flags are 
defined. The value of the RDEVTFLG field 
(displacement X'3A') describes the additional 
flags: 

RDEVTFLG 

JiSlSes Meaning 

X'80' Terminal — logon process has been 

initiated 
X'40' Terminal — terminal in reset process 
X'20' Terminal — suppress attention signal 
X'80' Graphic — logon process initiated 
X'40' Graphic — screen full, more data 

waiting 
X'20' Graphic — screen in running status 
X'10' Graphic — read pending for screen 

input 
X'08' Graphic — last input not accepted 
X'04' Graphic — timer request pending 
X'02' Graphic — control function 

interruption pending 
X'01' Screen full, hold status 

For terminals, an additional flag is defined. 
The value of the RDEVTMCD field (displacement 
X'46') describes the line code translation to 
be used: 



RDEVTMCD 




Values 


Meaning 


X' 10' 


OASCII — 8 level 


X'OC 


APL correspondence 


X'08' 


APL PTTC/EBCD 


X'04' 


Correspondence 


X'OO' 


PTTC/EBCD 



IDENTIFYING A PAGEABLE MODULE 



The value of the RDEVTYPC field (displacement 
X'06') describes the device type class and 
the value of the RDEVTYPE field (displacement 
X'07') describes the device type. 

The RDEVAIGB field (displacement X'24') 
contains the address of the active lOBLOK. 

The RDEVUSEB field (displacement X'28') 
points to the VMBLOK for a dedicated user. 

The RDEVATT field (displacement X'2C') 
contains the attached virtual address. 



If a program check PSW or SVC PSW points to an 
address beyond the end of the CP resident 
nucleus, the failing module is a pageable 
module. The CP system load map indicates where 
the end of the resident nucleus is located. 

Go to the address indicated in the PSW. 
Backtrack to the beginning of that page frame. 
The first eight bytes of that page frame (the 
page frame containing the address pointed to by 
the PSW) contain the name of the failing 
module. If multiple modules exist within the 
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same page frame, identify the module using the 
load map and failing address displacement within 
the page frame. 



READING CMS ABEND DUMPS 



When ens abnormally terminates, the terminal 
operator must issue the DEBUG command and then 
the DUMP subcommand if an ABEND dump is desired. 
The DUMP formats and prints the following: 

• General registers 

• Extended control registers 

• Floating-point registers 

• Storage boundaries with their corresponding 
storage protect key 

• Current PSH 

• selected storage 



Storage is printed in hexadecimal, eight 
words to the line with EBCDIC translation at the 
right. The hexadecimal storage address 
corresponding to the first byte of each line is 
printed at the left. 

When CMS can no longer continue, it 
abnormally terminates. You must first determine 
the condition that caused the ABEND and then 
find why the Condition occurred. In order to 
find the cause of a CMS problem, you must be 
familiar with the structure and functions of 
CMS. The discussion about reading CMS dumps 
refers to several CMS control blocks and fields 
in the control blocks. Befer to the YM/370; 
5i:t§ A£§M and Control Block Lo^ic for a 
description of each CMS control block. Figure 
13 shows the relationships of CMS control 
blocks. You also need a current CMS nucleus 
load map to analyze the dump. 



REASON FOR THE ABEND 



Determine the immediate reason for the ABEND and 
identify the failing module. The ABEND message 
DMSABNmST contains an ABEND code and failing 
address. "CMS ABEND Codes" in Section 3 lists 
all the CMS ABEND codes, identifies the module 
that caused the module to abnormally terminate, 
and describes the action that should be taken 
whenever CMS abnormally terminates. 



You may have to examine several fields in the 
nucleus constant area (NUCON) of low storage. 



1. Examine the program old PSH (PGHOPSN) at 
location X»28». Using the PSM and current 
CHS load map, determine the failing 
address. 



3. Examine the external old PSW (EXTOPSH) at 
location X'18'. If the virtual machine 
operator terminated CMS, this PSH points to 
the instruction executing when the 
termination request was recognized. 

4. For a machine check, examine the machine 
check old PSH (MCKOPSH) at location X»30». 



COLLECT INFORMATION 



Examine several other fields in NUCCN to analyze 
the status of the CMS system. As you proceed 
with the dump, you may return to NUCON to find 
pointers to specific areas (such as pointers to 
file tables) or to examine other status fields. 
The complete contents of NUCON and the other CMS 
control blocks are described in the YM^370 ; Data 
*£§§§ aO.^ Control Block Locfic. The following 
areas of NUCON may contain useful debugging 
information . 



NUCON AREAS 



• Save Area For Low Storage. 

Before executing, DEBUG saves the first 160 
bytes of low storage in a NUCON field called 
LOHSAVE. LOHSAVE begins at X'CC. 



• Register Save Area. 

DHSABN, the ABEND routine, saves the user's 
floating-point and general registers. 



Field Location Contents 



FPRLOG X«160« 

GPHLOG X«180« 

ECRLOG X«1C0» 

Device. 



User's floating-point 

registers 

User's general 

registers 

User's extended control 

registers 



2. Examine the SVC old 
location X'20'. 



PSH (SVCOPSH) at 



The name of the device causing the last I/O 
interrupt is in the DEVICE field at X'26C'. 



Last Two Commands or Procedures Executed. 

Ii§l^ li22ltion Consents 
LAsfcMND X'2A0^ Last CMS command 

issued 
PREVCMND X'2A8' Next to last CMS 

command issued 
LASTEXEC X'2B0' Last EXEC procedure 

invoked 
PREVEXEC X'2B8' Next to last EXEC 

procedure invoked 
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U1 



DMSNUC 



600 
608 
610 
618 
620 
628 
630 
638 
640 
648 
650 
658 
660 
668 
670 
678 
680 
688 
690 
698 
6A0 
6A8 
6B0 
6B8 
6C0 
6C8 
6D0 
6D8 
6E0 
6E8 
6F0 
6F8 



SYSREF 



A{FVS) 


A{OPSECTli 




A(DEVTAB) 


V(FSTLKP) 




V(OMSINM) 


V(FSTLKW) 




A{PIE) 


A(IADT) 




A(USERSECT) 


V(OMSDIOR) 




V(DMSSCNN) 


A(0) 




A(TABEND) 


A(SUBSECT) 




V{DMSSBDFR) 


V(DMSDIOW) 




V{DMSSMNST) 


A(ADTSECT) 


, 


V(FREE) 


V(FRET) 




V(DMSPIOCC) 


A(PGIVISECT) 




A(IOSECT) 


V(DMSDBD) 




A{DIOSECT) 


V(OSTABLE) 




A(DMSERL) 


A(DMSCRD) 




V(DMSFREB) 


A(SVCSECT) 




A(ADTLKP) 


V(DMSAUDUB) 




A(0) 


V(OSRET) 




V(CMSRET) 


V(DMSSCNO) 




V(DMSEXC) 


V{DMSLDRA) 




V(ADTLKW) 


V(USABRV) 




A(EXTSECT) 


A(SCBPTR) 




A(0) 


A(0) 


; 


V(DMSLAF) 


V(DMSLAFNX) 




V(DMSLAFFE) 


V(DMSLAFFT) 


■ 


V(ADTNXT) 


ViDMSTRK) 




V(DMSTRKX) 


V(DMSTQQ) 




V<DMSTQQX) 


V(DMSERS) 




V(TYPSRCH) 


V(DMSAUD) 




V(KILLEX) 


VCDMSFNST) 




V(DMSBRD) 


V(DMSBWR) 




V(DMSFNS) 


V(DMSSTTE) 




V(DMSSTTW) 


V(POINT) 





USERSECT 



SUBSECT 



TSOBLKS 



OPSECT 



DMSABW 



DMSFRT 



DMSERT 



DBGSECT (Debug work area 



CVTSECTISome fields are filled in 
at IPL.) 



FVS 



DIOSECT 



SVCSECT 



PGMSECT 



lOSECT 



EXTSECT 



AFTSECT (Create when the file is 
opened. There is room for 5 AFTs in 
DMSNUC, others are in free storage 



ADTSECT (Space is allocated when 
DMSNUC is assembled, fields are 
filled in when ACCESS command is 
issued. There is one ADT entry for 
each of the 10 possible disks.) 



DEVTAB 



Terminal Buffers and Saveareas 



SYSREF 



MACDIRCandTXTDIRC 



NUCON 




Figure 13. CMS Control Blocks 



Last Module Loaded Into 
Transient Area. 



Free Storage and 



The name of the last module loaded into free 
storage via a LOADMOD is in the field 
LASTLMOD (location X»2C0'). The name of the 
last nodule loaded into the transient area 
via a lOADMOD is in the field LASTTMOD 
(location X«2C8«) . 



• Pointer to CMSCB. 

The pointer to the CMSCB is in the FCBTAB 
field located at X'5C0». CMSCB contains the 
simulated OS control blocks. These simulated 
OS control blocks are in free storage. The 
CMSCB contains a PLIST for CMS I/O functions. 



a simulated job file control block (JFCB) , a 
simulated data event block (DEB) , and the 
first in a chain of I/O blocks (lOBs) . 

The Last Command. 

The last command entered from the terminal is 
stored in an area called CMNDLIHE (X»7A0') , 
and its corresponding PLIST is stored at 
CMNDLIST (X'848"). 



• External Interrupt Work Area. 

EXTSECT (XM550') is a work area for the 
external interrupt handler. It contains: 
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— The PSH, EXTPSW (X'15F8') 

— Begister save areas, EXSAVE1 (X'15B8«) 

— Separate area for timer interrupts, 
EXSAVE (XM550«) 

• I/O Interrupt Work Area. 

lOSECT (X'1620«) is a work area for the I/O 
interrupt handler. The oldest and newest PSH 
and CSW are saved. Also, there is a register 
save area. 



• Program Check Interrupt Work Area. 

PGMSECT (XM6B0«) is a work area for the 
program check interrupt handler. The old PSH 
and the address of register 13 save area are 
stored in PGMSECT. 

• SVC Work Area. 

SVCSECT (XM7a8«) is a work area for the SVC 
interrupt handler. It also contains the 
first four register save areas assigned. The 
SFLAG (X'1758«) indicates the mode of the 
called routine. The values have the 
following meanings: 

I.2i^3 ^§§cri£tion 

X'SO" SVC protect key is zero 

X'40' Transient area routine 

X'20« Nucleus routine 

X'01' Invalid re-entry flag 

Also, the SVC ABEND code, SVCAB, is located 
at XM75A'. 



• Simulated CVT (Communications Vector Table) . 

The CVT, as supported by CHS, is CVTSECT 
(XMCC8«)« Only the fields supported by CMS 
are filled in. 



• Active Device Table and Active File Table. 

For file system problems, examine the ADT 
(Active Device Table) , or AFT (Active File 
Table) in NUCON. 



REGISTEE USAGE 



NOCLEDS LOAD MAP 



Each time the CMS resident nucleus is loaded on 
a DASD, and an IPL can be performed on that 
DASD, a load map is produced. Save this load 
map. It lists the virtual storage locations of 
nucleus-resident routines and work areas. 
Transient modules are not included in this load 
map. When debugging CHS, you can locate 
routines using this map. 

The load map may be saved as a disk file and 
printed at any time. A copy of the nucleus load 
map is contained on the system with the file 
identification of 'filename NUCMAP*. Issue the 

LISTF * NDCMAPS 

command to determine the filename. Then issue 

PRINT filename NUCMAP 

to obtain a copy of the current nucleus load 
map. 

Figure 14 shows a sample CMS load map. 
Notice that the debug work area (DBGSECT) and 
the DHSINH module have been located. 

LOAD MAP 

The load map of a disk-resident command module 
contains the location of control sections and 
entry points loaded into storage. It may also 
contain certain messages and card images of any 
invalid cards or it may replace cards that exist 
in the loaded files. The load map is contained 
in the third record of the MODULE file. 

This load map is useful in debugging. When 
using the debug environment to analyze a 
program, use the program's load map to help in 
displaying information. 

There are two ways to get a load map: 

1. When loading relocatable object code into 
storage, make sure that the MAP option is 
in effect when the LOAD command is issued. 
Because MAP is the default option, be sure 
that MOMAP is not specified. A load map is 
then created on the primary disk each time 
a LOAD command is issued. 



To trace control blocks and modules, it is 
important to know the CMS register usage 
conventions. 

GR1 ~ Address of the PLIST 
GR12 Program's entry point 
GR13 Address of a 12-doubleword 

work area for an SVC call 
GR14 Return address 
GR15 Program entry point or 

the return code 



2. When generating the absolute 
files already loaded into 
sure that the MAP option is 
the GENHOD command is issued 
is the default option, be su 
is not specified. Issue the 
to type the load map associ 
specified MODULE file on the 
format of the MODMAP command 



image form of 
storage, make 
in effect when 
Because HAP 
re that NOMAP 
MODMAP command 
ated with the 
terminal. The 
is: 



I MODmap 



I filename 



The preceding information should help you to 
read a CHS dump. With a dump, the control block 
diagrams, and a CHS load map you should be able 
to find the cause of the ABEND. 



where : 

filename is the module whose map is to be 
displayed. The filetype must be 
MODULE. 
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FILE: LOAD 



CHSMAF 



CONVERSATIONAL MONITOR SYSTEM 



INVALID 



DMSNUC 

DHSNOCU 

HUCON 

SYSREF 

FEIBM 

CHNDLINE 

SOBFLAG 

lADT 

DEVICE 

DEVTAB 

CONSOLE 

ADISK 

DDISK 

SDISK 

YDISK 

TABEND 

ADTSECT 

AFTSTART 

EXTSECT 

EXTPSW 

lOSECT 

lONTABL 

PGMSECT 

PIE 

SVCSECT 

DIOSECT 

FVS 

ADTFVS 

KXFLAG 

UFDBOSY 

CMSCVT 

DBGSECT>» 

DHSERT 

DMSFRT 

DMSABW 

OPSECT 

DHSERL 

TSOBLKS 

SOBSECT 

DSERSBCT 

INVALID 

ABBREV 

OSABRV 

INVALID 

CMSTIMER 

GETCLK 

DMSINM-*^ 

INVALID 

TAPEIO 

DMSTIO 



CARD... :READ 

AT 000000 
AT 002800 
AT 000000 
AT 000600 
AT 00027a 
AT 0007A0 
AT 0005E9 

AT oooeaa 

AT 00026C 
AT 000C90 
AT 000C90 
AT OOOCAO 
AT OOOCDO 
AT 000D10 
AT 000D20 
AT OOODFO 
AT OOODFO 
AT 001200 
AT 001500 
AT 0015A8 
AT 0015D0 
AT 001610 
AT 001660 
AT 001668 
AT 0016F8 
AT 001998 
AT 001A88 
AT 001648 
AT 001C2F 
AT 001C2E 
AT 001C80 
AT 001D80 _ 



AT 002098 
AT 002208 
AT 002258 
AT 002800 
AT 002935 
AT 0029B0 
AT 002At»0 
AT 002AD8 

CARD... :READ 
AT 003000 
AT 0030D0 

CARD... :R£AD 
AT 003200 
AT 003200 

_AT 003200 



DMSNDC 
UPLIB 
CMSLIB 
OSMACRO 
DMSNUC 



TEXT CI CMS191 9/21/72 9:01 

MACLIB D1 CMS191 9/21/72 8:47 

MACLIB D1 CMS191 9/21/72 8:44 

MACLIB Y2 CMS19E 7/19/72 18:11 

ASSEMBLE CI SOURCE 9/18/72 23:09 



DHSINA 



DMSINM 



CARD... :READ 
AT 003308 
AT 003308 



DMSTIO 



TEXT CI CMS191 9/19/72 15:37 



TEXT CI CMS191 9/18/72 20:36 



TEXT CI CMS191 9/19/72 10:33 



Figure 14. Saople CMS Load Map 
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CP INTEODDCTION 



The VM/370 Control Program (CP) manages the 
resources of a Systea/370 to provide virtual 
storage support by using virtual machines. With 
this support each terminal user appears to have 
the complete function of a dedicated System/370 
at his disposal, even though many other users 
may be running batch, teleprocessing, 
time-sharing, testing, or production jobs at the 
same time. 

A user defines the configuration he requires 
— input/output (I/O) device addresses, and a 
storage size up to 16 million bytes 
regardless of whether they match the real 
machine's configuration. Virtual devices must 
have real counterparts, but not always in a 
one-for-one ratio. For example, many users' 
readers, punches, and printers can be mapped 
onto common spool disks, and their virtual disk 
devices may be mapped as minidisks onto 
different sections of common disk packs, 
effectively multiplying the number of logical 
disk devices that are available on the real 
machine. 

Each user's virtual machine comprises: 

• An operator's console (his local or remote 
terminal device) 

• A virtual CPO either with or without virtual 
storage addressing. 

• Virtual storage of up to 16 million bytes 

• Virtual I/O devices 



Note: If an operating system that manages 
virtual storage is running in the virtual 
machine, the CPU must have extended control (EC) 
mode. 



a segment table that references a set of page 
and swap tables that describe CP's virtual 
storage space. 

The virtual space is divided into 2 parts; 
the first part (4 segments (256K)) is reserved 
for executable CP code, both resident and 
pageable; the second part (the remaining storage 
of at least 256K) is dynamically allocated for 
spooling buffers and for user directory 
functions. For a routine to be pageable, a 
number of restrictions must be observed. 

When the system is loaded, resolved, and 
written onto the system residence volume, 
pagable modules must be loaded at addresses 
higher in main storage than the symbol DMKCPEND, 
which defines the last byte of the resident CP 
nucleus. This is done by reordering the 
LOAD-LIST EXEC that the VMFLOAD procedure uses 
when punching out the text decks that comprise 
the Any pageable modules are listed after the 
entry for DMKCPE. In addition, the set page 
boundary (SPB) loader control card must precede 
each pageable module. This SPB card forces the 
loader to start loading the succeeding module at 
the next higher 4k page boundary and ensures 
that the entire module is resident when it is 
paged in. 

If several pageable modules perform similar 
or related functions and if they are likely to 
be resident at the same time, they may be 
included in the same page by omitting the SPB 
cards that would normally have preceded the 
second and subsequent modules. The group of 
modules to be loaded together must not exceed UK 
as their total storage requirement; if they do, 
one or more must be loaded in separate pages, 
because no page boundary crossover in the 
pageable part of the control program is allowed. 
All currently pageable CP modules punch their 
own SPB card via an assembler PUNCH statement, 
except those that are designed to reside in a 
page along with other modules. 
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To increase the amount of real main storage 
available to the user's virtual machine, parts 
of CP that are infrequently used are not 
resident in main storage. Instead, they reside 
on part of the auxiliary paging storage used by 
the system, and are brought into main storage 
only when they are required. 

Because CP nonresident modules are paged into 
main storage, CP also occupies virtual storage 
space. The system VNBLOK, assembled into the 
resident control program in the module DMKSYS, 
defines this space. The VHBLOK has a pointer to 



CP INITIALIZATION 



System initialization (IPL) prepares VIl/370 for 
operation. IPL performs the following tasks: 

• Initializes main storage 

• Mounts devices 

• Heads spool file checkpoint records, on a 
warn start from the warm start cylinder; 
reads spool file checkpoint records on a 
checkpoint or force start, from the 
checkpoint cylinders. 

• Allocates space for the system dump file 

• Logs on the system operator 

In the case of a system restart that follows 
a failure, active files and the system log 
message are written on the warm start cylinder 
before the CP nucleus can be brought into main 
storage. The user can now log on. 
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VIRTDAl MACHINE MANAGEMENT 



lil^ual Machine Storage Management 



A virtual machine is created for a user when he 
logs on VM/370, on the basis of information 
stored in his directory entry. The entry for 
each user identification includes a list of the 
virtual I/O devices associated with his virtual 
machine and the real device equivalents. 

The directory file contains additional 
information about the virtual machine. Included 
are the VM/370 command privilege classes for the 
user, accounting data, normal and maximum 
virtual storage sizes, and optional virtual 
machine characteristics such as extended control 
mode. 

CP supervises virtual machine execution by 
(1) permitting only problem state execution 
except in its own routines, and (2) receiving 
control after all interruptions occur on the 
real system. CP intercepts each privileged 
instruction and simulates it if the current PSH 
of the issuing virtual machine indicates a 
virtual supervisor state. If the virtual 
machine is running in the problem state, an 
attempt to execute a privileged instruction is 
reflected back to the virtual machine as a 
program interruption. All virtual machine 
interruptions (including those caused by 
attempting privileged instructions) are first 
handled by CP, and are reflected to the virtual 
machine if an equivalent interruption would have 
occured on the real machine. 



liftusl Machine Time Manag[ement 



The real CPU uses time-slicing to simulate 
multiple virtual CPUs. Virtual machines 
executing in a conversational mode are given 
access to the real CPU more frequently than 
those that are not; these conversational 
machines are assigned the smaller of two 
possible time slices. CP determines execution 
characteristics of a virtual machine at the end 
of each time slice on the basis of the recent 
frequency of its console requests or terminal 
interruptions. The virtual machine is queued 
for subsequent CPU usage according to whether it 
is a conversational or nonconversational user of 
system resources. 

A virtual machine can gain control of the CPU 
only if it is not waiting for some activity or 
resource. The virtual machine itself may enter a 
virtual wait state after an I/O operation has 
begun. The virtual machine cannot gain control 
of the real CPU if it is waiting for a page of 
storage, an I/O operation to be translated and 
started, or a CP command to finish execution. 

A virtual machine can be assigned a priority 
of execution. Priority is a parameter affecting 
the execution privilege of a particular virtual 
machine in comparison to other virtual machines 
that have the same general execution 
characteristics. Priority may be assigned by 
the real machine operator, but is more 
frequently determined by the virtual machine's 
directory entry. 



The normal and maximum storage sizes of a 
virtual machine are defined in the virtual 
machine configuration in the VM/370 directory. 
The virtual storage size can be temporarily 
redefined to any value that is a multiple of 4K 
and not greater than the value stated as the 
maximum allowable in the directory. VM/370 uses 
this storage as virtual storage. The storage 
can appear as paged or nonpaged to the virtual 
machine, depending upon whether the extended 
control (EC) mode option was specified for that 
virtual machine. EC mode is required if 
operating systems that control virtual storage, 
such as 0S/VS1 or VM/370, are to be run in the 
virtual machine. 
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Only referenced virtual storage pages are 
kept in real storage and, therefore, use real 
storage more efficiently. A page can be brought 
into any available page frame; the necessary 
relocation is done during program execution by a 
combination of VM/370 software and the dynamic 
address translation hardware of the System/370. 
The active pages from all logged-on virtual 
machines and from the pageable routines of CP 
compete for available page frames. When the 
number of page frames available for allocation 
falls below a threshold value, CP determines 
which virtual storage pages currently allocated 
to real storage are relatively inactive and 
starts suitable operations to write them out on 
a paging device (paging out) . 

Inactive pages are maintained on a direct 
access storage device. If an inactive page has 
been changed at some time during virtual machine 
execution, CP assigns it to a paging device, 
selecting the fastest such device with available 
space. If the page has not changed, it remains 
allocated in its original direct access location 
and is written into real storage from there the 
next time the virtual machine references that 
page. A virtual machine program can use the 
DIAGNOSE instruction to inform CP that the 
information from specific pages of virtual 
storage is no longer needed. CP then releases 
the areas of the paging devices that had been 
assigned to hold the specified pages. 

Paging is done on demand by CP. This means 
that a page of virtual storage is not read from 
the paging device and written to a real storage 
block until it is needed for virtual machine 
execution. Ho attempt is made by CP to 
anticipate what pages might be required by a 
virtual machine. While a paging operation is 
being performed for one virtual machine, another 
virtual machine can be executing. Any paging 
operation started by CP is transparent to the 
virtual machine. 
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If the virtual machine is executing in EC 
mode with translate on, two additional sets of 
segment and page tables are maintained. The 
virtual machine operating system is responsible 
for the equivalency of the virtual storage 
created by it to the virtual storage of the 
virtual machine. CP uses this set of tables in 
conjunction with the page and segment tables 
created for the virtual machine at logon time to 
build shadow page tables for the virtual 
machine. These shadow tables map the virtual 
storage created by the virtual machine operating 
system to the storage of the real computing 
system. The tables created by the virtual 
machine operating system may describe any page 
and segment size permissible in the IBH 
System/370. 

The system operator can assign the reserved 
page frames option to a single virtual machine 
This option, specified by the SET RESERVE 
command, assigns a specific amount of the 
storage of the real machine to the virtual 
machine. CP dynamically builds a set of 
reserved real storage page frames for this 
virtual machine during its execution until the 
maximum number "reserved" has been reached. 
Because other virtual machines* pages are not 
allocated from this reserved set, the most 
active pages of the selected virtual machine 
remain in real storage. 

During the process of CP system generation, 
the installation may specify that a single 
virtual machine is to be given an option called 
virtual=real. With this option, the virtual 
machine's storage is allocated directly from 
real storage at the time CP is initially loaded, 
and remains allocated until released by an 
operator command. All pages except page zero 
are allocated to the corresponding real storage 
locations. To control the real computing 
system, real page zero must be controlled by 
CP. Consequently, the real storage size must be 
large enough to accommodate the CP nucleus, the 
entire virtual=real virtual liachine, and the 
remaining pageable storage requirements of CP 
and the other virtual machines. 

The virtual=real option improves performance 
in the selected virtual machine because it 
removes the need for CP to perform paging 
operations for the selected virtual machine. 
The virtual=real option is necessary whenever 
programs that contain dynamically modified 
channel programs (excepting those of OS ISAM) 
are to execute under control of CP. 



ZiJEiiJ^l ^S^hine I/O Management 



A real disk device can be shared among multiple 
virtual machines. Virtual device sharing is 
specified in the directory entry or by a user 
command. If sharing is requested by a user 
command, an appropriate password must be 
supplied before gaining access to the virtual 
device. A particular virtual machine can be 
assigned read-only or read/write access to a 
shared disk device. CP verifies each virtual 
machine I/O operation against the parameters in 
the virtual machine configuration to ensure 
device integrity. 



The virtual machine operating system is 
responsible for the operation of all virtual 
devices associated with it. These virtual 
devices may be defined in the directory entry of 
the virtual machine, or they may be attached to 
(or detached from) the virtual machine's 
configuration while it remains logged on. 
Virtual devices may be dedicated, as when mapped 
to a fully equivalent real device; shared, as 
when mapped to a minidisk or when specified as a 
shared virtual device; or spooled by CP to 
intermediate direct access storage. 

In a real machine running under control of 
OS, I/O operations are normally initiated when a 
problem program requests OS to issue a START I/O 
instruction to a specific device. Device error 
recovery is handled by the operating system. In 
a virtual machine, OS can perform these same 
functions, but the device address specified and 
the storage locations referenced are both 
virtual. It is the responsibility of CP to 
translate the virtual specifications to real. 

In addition, the interruptions caused by the 
I/O operation are reflected to the virtual 
machine for its interpretation and processing. 
If I/O errors occur, CP records them but does 
not initiate error recovery operations. These 
are the responsibility of the virtual machine 
operating system. 

I/O operations started by CP for its own 
purposes (paging and spooling) , are performed 
directly and are not subject to translation. 



SPOOLING 



A virtual unit record device, which is mapped 
directly to a real unit record device, is 
dedicated. The real device is then controlled 
completely by the virtual machine's operating 
system. 

CP facilities allow multiple virtual machines 
to share unit record devices. Because virtual 
machines controlled by CMS ordinarily have 
modest requirements for unit record I/O, such 
device sharing is quite advantageous, and it is 
the standard mode of system operation. 

Spooling operations stop if the direct access 
storage space assigned to spooling is exhausted, 
and the virtual unit record devices are in a not 
ready status. The system operator can make 
additional spooling space available by purging 
existing spool files or by assigning additional 
direct access storage space to the spooling 
function. 

Specific files can be transferred from the 
spooled card punch or printer of a virtual 
machine to the card reader of the same or 
another virtual machine. Files transferred 
between virtual unit record devices by the 
spooling routines are not physically punched or 
printed. With this method, files can be made 
available to multiple virtual machines, or to 
different operating systems executing at 
different times in the same virtual machine. 
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CP spooling includes many desirable options 
for the virtual machine user and the real 
machine operator. These options include 
printing multiple copies of a single spool file, 
backspacing any number of printer pages, and 
defining spool classes for scheduling real 
output. 



Remote Spooling 



The Remote Spooling Communications Subsystem 
(RSCS) , a component of VM/370, provides support 
for the automatic transfer of spool files 
generated by VM/370 virtual machines to remote 
locations. It also supports the transmission of 
files from remote locations to virtual users. 

RSCS uses the CP spooling facilities of 
VM/370 to: 

• Gain access to files spooled to RSCS by 
VM/370 users for transmission to remote 
locations. 

• Transfer files, received from remote 
locations, to the intended VM/370 virtual 
machines. 

This support is fully described in the IBM 
XMZ370: RSCS Oser^s Guide. 



CONSOLE FUNCTIONS 



such as assigning a set of reserved page frames 
to a selected virtual machine. 



PROGRAM STATES 
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The CP console functions allow the user to 
control the virtual machine from the terminal, 
much as an operator controls a real machine. 
Virtual machine execution can be stopped at any 
time by the terminal's attention key; it can be 
restarted by typing in the appropriate CP 
command. External, attention, and device ready 
interruptions can be simulated on the virtual 
machine. Virtual storage, virtual machine 
registers, the PSH and CSH can be inspected and 
modified. Extensive trace facilities are 
provided for the virtual machine, as well as a 
single-instruction mode. Commands control the 
spooling and disk sharing functions of CP. 

Console functions are divided into privilege 
classes. The directory entry for each user 
assigns one or more privilege classes. The 
classes are: 



Primary system operator 
System resource operator 
System programmer 
Spooling operator 
Systems analyst 
IBM field engineer or PSR 
General user 



Commands in the system analyst class can 
inspect real storage locations, but they cannot 
make modifications to real storage. Commands in 
the operator class control real resources. 
System operator commands include all those 
relating to virtual machine performance options. 



PREFERRED VIRTUAL MACHINE 



CP supports four special virtual machine 
operating environment functions. Each function 
can be applied to one virtual machine at a 
time. Although each function could be applied 
to a different virtual machine, optimum 
performance would not be achieved. Each 
function is discussed separately following. 



Favored Execution 



CP attempts to provide up to a specified 
percentage of CPU time to a particular virtual 
machine, provided that the virtual machine is 
functioning in a way that fully utilizes CPU 
time. At regular time intervals the CP 
dispatcher checks the CPU time used by the 
particular virtual machine. If the specified 
percentage is exceeded, the machine becomes the 
lowest priority user in the system. If the 
percentage used is lower than that specified, 
the virtual machine has highest priority 
execution for the remainder of the interval. 
The percentage of CPU time assured is specified 
in the privileged class command that invokes the 
function. 



CP can also assure that a designated user is 
never dropped from the active (in gueue) subset 
by the scheduler. When the user is runnable, he 
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is placed in the dispatchable list at his normal 
priority. 



[eserved Pa^e Frames 



CP uses chained lists of table entries for 
available and pageable pages. Pages for users 
are assigned from the available list which is 
replenished from the pageable list. 

Pages that are temporarily locked in real 
storage are not available or pageable. Paging 
proceeds using demand paging with a "reference 
bit" algorithm to select the best page for 
swapping. The reserved page frames option gives 
a particular virtual machine an essentially 
"private" set of pages. The pages are not 
locked, that is, they can be swapped, but 
usually only for the specified virtual machine. 
The number of reserved pages for the virtual 
machine are specified as a maximum. The page 
selection routine selects an available page for 
a reserved user and marks that page reserved if 
the maximum specified for the user has not been 
reached. If an available, unreferenced reserved 
page is encountered during page replenishment 
for the reserved user, it is used whether or not 
the maximum has been reached. If the page 
selection routine cannot locate an available 
page for other users because they are all 
reserved, the routine may steal the reserved 
pages. 



Virtual=Eeal 



This feature requires that the CP nucleus be 
reorganized to provide a "hole" in real storage 
large enough to contain the entire storage area 
of the virtual machine. For the virtual 
machine, each page from page one to the last 
page (n) is in its true real storage location; 
only page zero is relocated. The virtual 
machine runs in relocate mode, but because the 
virtual page address is the same as the real 
page address, no CCM translation is required for 
the virtual machine. Because no CCH translation 
is performed, no check is made of the I/O data 
addresses. The virtual machine must ensure that 
no I/O data transfer is specified into page zero 
or into any page not in the virtual machine's 
domain. 

There are several considerations for the 
virtual=real option of preferred machine support 
that affect overall system operation: 



The area of contiguous storage built for the 
virtual=real machine must be large enough to 
contain the entire addressing space of that 
machine. 

While allocated as such, the storage reserved 
for the virtual=real machine can be used only 
by a virtual machine with that option. It is 
not available to other users for paging space 
nor for VM/370 usage, even when the 
virtual=real machine is net logged on. For 
this reason, the virtual=real machine should 



be a high availability, high throughput 
machine. The virtual=real storage can be 
released by the operator. That storage is 
then available for paging. Once virtual=real 
storage space is released by the operator, a 
VM/370 IPL is necessary to reallocate that 
storage to that virtual=real machine. 

The virtual machine with the virtual=real 
option operates in the pre-allocated storage 
area with normal CCM translation in effect 
until the execution of the SET NOTR&NS ON 
command. At that time, all subsequent I/O 
operations are performed from the virtual 
CCWs in the virtual=real space without 
translation. In this mode, the virtual 
machine must not perform I/O operations into 
page zero nor beyond its addressable limit. 
Violation of this requirement may cause 
destruction of the VM/370 system and/or other 
virtual machines. 

If the virtual=real machine performs a 
virtual reset or IPL, the normal CCW 
translation is performed until the issuance 
of the SET NOTRANS ON command. Only the 
virtual=real virtual machine can issue the 
command. A message is issued if normal 
translation mode is entered. 



Virtual Machine Assist Feature 



The virtual machine assist feature is available 
with System/370 Models 135, 115, and 158 and as 
an RPQ on the Syste«/370 Model 168. It improves 
the performance of VM/370. It intercepts and 
handles interruptions caused by SVCs, invalid 
page conditions and the following privileged 
instructions: 

LRA (load real address) 

STCTL (store control) 

RRB (reset reference bit) 

ISK (insert storage key) 

SSK (set storage key) 

IPK (insert PSH key) 

STNSH (store then and system mask) 

STOSM (store then or system mask) 

SSM (set system mask) 

LPSW (load PSH) 

SPKA (set PSH key from address) 

Although virtual machine assist feature is 
designed to improve the performance of VM/370, 
the virtual machines that do not have virtual 
machine assist feature available may see a 
performance improvement because the virtual 
machines with virtual machine assist feature are 
using less of the system resources leaving more 
resources available for the other users. 

IlllSil! MICHINE CONTROL: Real control register 6 
(see Note 1) and a HICBLOK control virtual 
machine assist feature. The MICBLOK is a list 
of pointers to areas within VM/370 control 
blocks. The control register 6 format follows: 

SiJt U waning 
1=virtual machine assist feature on for 
this virtual machine 

0=virtual machine assist feature 
disabled (VM/370 mode) 
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1 1=Virtual machine is in problem state 
0=Virtual machine is in supervisor state 

(see Note 2) 

2 1=ISK and SSK not handled by virtual 
machine assist feature 

0=ISK and SSK handled by virtual machine 
assist feature 

3 1=360 operations and 370 non-DAT 

operations only 
0=370 DAT operations allowed 
(see Hote 3) 

4 1=SVC interruptions not handled by 
virtual machine assist feature 

0=SVC interruptions handled by virtual 
machine assist feature 

5 1=ShadoH table mode: Shadow page fixup 

done by virtual machine assist feature 
0=Shadow Table fixup not allowed 



INTERACTION WITH PROGEAH EVENT RECORDING (PER) : 
For all instructions in virtual machine assist 
feature except SVC and LPSW, PER monitoring 
events are indicated norniially as if the 
instructions were being executed in supervisor 
state. Changes made to the virtual PSW or swap 
table entries in VM/370 real storage are 
indicated as storage alteration events, because 
those locations are considered to be internal 
registers to the virtual machine. A virtual 
instruction that attempts to change the state of 
the virtual PSH PER mask causes a privileged 
instruction interruption, and the instruction is 
suppressed . 

For virtual SVC interruption, PER monitoring 
specified in the current real PSH, current 
virtual PSH, or new virtual PSW causes a real 
SVC interrupt, regardless of the values 
specified in real or virtual control registers 
9, 10, and 11. For virtual LPSW, similar 
conditions result in a real privileged 
instruction interruption. 



6 Reserved (must be zero) 

7 Reserved (must be zero) 

8-28 Real address of virtual machine pointer 
list 

29-31 Onused (must be zero) 



Notes: 

1. Control register 6 is loaded before each 
virtual machine is dispatched. 

2. Bit 1 of control register 6 may be changed 
by virtual machine assist feature during a 
virtual machine status change. 

3. Bit 3 affects instructions that only a 
virtual machine with the EC option may 
execute. Specifically, they are: LRA, RRB, 
IPK, STNSM, STOSM, and SPKA . Bit 3 also 
affects STCTL even though it can be 
executed by a virtual machine without the 
EC option. 

virtual machine assist feature uses the list 
of pointers, or HICBLOK, to access virtual 
machine control information. The list must start 
on a doubleword boundary. A HICBLOK is obtained 
for each user when he logs on. The entries in 
this list are as follows: 



PER monitoring specified in the real PSH 
causes the VB/370 page invalid interruption to 
be inactive. 

Privileged instruction interruptions 
resulting from the virtual instructions may show 
a PER event for instruction fetching, just as 
they would without the feature. Real SVC 
interruptions may be followed by a program 
interruption for an instruction fetch PER 
event. 

INTERACTION WITH DOS EMULATOR: On machines with 
both virtual machine assist feature and the DOS 
Emulation feature installed, local execution 
(LEX) mode inactivates virtual machine assist 
feature; privileged instruction interruptions 
and SVC interruptions occur according to DOS 
emulation architecture. When the machine is not 
in LEX mode, the machine performs as described 
for virtual machine assist feature. 

RESTRICTED DSE OF VIRTOAL MACHINE ASSIST 
FEATDRE: Certain interruptions must be handled 
by VM/370. Conseguently, the virtual machine 
assist feature is not on in a virtual machine if 
the machine has instruction address stop set 
on. 

VM/370 turns SVC handling off when 
instruction address stop is set on, and turns it 
back on after the stop occurs. 



Real segment table pointer and length, page 
size, and segment size. 



Pointer to the real 
control register 0. 



address of virtual 



Pointer to the real address of 
PSH currently in effect. 



the virtual 



Pointer to the 64 byte workspace area 
reserved for virtual machine assist feature. 



VM/VS HANDSHAKING 



The VM/VS Handshaking feature provides a 
communication path between CP and a virtual 
machine operating system (0S/VS1) that makes 
each system control program aware of certain 
capabilities or requirements of the other. 
VM/VS Handshaking performs the following 
functions : 



• Closes CP spool files when the VSl job output 
from its DSO, terminator, and output writer 
is complete 

• Processes VSl pseudo page faults 
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• Provides an optional ncnpaging mode for VS1 
when it is run in the VM/370 environment 

When a VSI virtual machine with the 
handshaking feature is loaded (via IPL) , its 
initialization routines determine whether the 
handshaking feature should be enabled. First, 
VSI determines if it is running under the 
control of VM/370 by issuing a STIDP (Store 
Processor ID) instruction. STIDP returns a 
version code; a version code of X'FF' indicates 
VSI is running with VM/370. If VSI finds a 
version code of X«FF', it then issues a DIAGNOSE 
(X«00«) instruction to store the VM/370 
extended-identification code. If an 
extended-identification code is returned to VSI, 
VSI knows that VM/370 supports handshaking; if 
nothing is returned to VSI, VM/370 does not 
support handshaking. At this time or any time 
after IPL, the operator of the VSI virtual 
machine can issue the CP SET PAGEX ON command to 
enable the pseudo page fault handling portion of 
handshaking. If the VSI virtual machine is in 
the nonpaging mode and, if the pseudo page fault 
handling is active, full handshaking support is 
available. 

Because the VSI system does no paging, any 
ISAM programs run under VSI are treated by 
VM/370 as though they are running in an 
ADDRSPC=REA1 partition. Therefore, the ISAM 
option is reguired for the VSI machine to 
successfully execute the ISAM program. 



tlhen a page fault occurs for a VS1 virtual 
machine, VH/370 checks that the pseudo page 
fault portion of handshaking is active and that 
the VS1 virtual machine is in EC mode and 
enabled for I/O interruptions. Then, VM/370 
reflects the page fault to VSI by: 

• Storing the virtual machine address that 
caused the page fault at location X'90» (the 
translation exception address) 

• Indicating a program interruption (interrupt 
code X« 14«) to VSI 

• Removing the VSI virtual machine from page 
wait and execution wait 

When VSI recognizes program interruption code 
X'lt', it places the associated task in wait 
state. VSI can then dispatch other tasks. 

When the reguested page becomes available in 
real storage, VM/370 indicates the same program 
interruption to VSI, except the high order bit 
in the translation exception address field is 
set on to indicate completion. VSI removes the 
task from page wait; the task is then eligible 
to be dispatched. 



J?S_1 Non£a3inc| Mode 



Closing CP Sfiool Files 



When VSI runs under the control of 
executes in nonpaging mode if: 
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P§§2J^2 Ps^ge Faults 



A page fault is a program interruption that 
occurs when a page marked "not in storage" is 
referred to by an instruction with an active 
page. The virtual machine referring to the page 
is placed in a wait state while the page is 
brought into real storage. Without the 
handshaking feature, the entire VSI virtual 
machine is placed in page wait by VM/370 until 
the needed page is available. 
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• Its virtual storage size is egual to the size 
of the VM/370 virtual machine 

• Its virtual machine size is at least one 
megabyte and no more than four megabytes. 

• The VM/VS Handshaking feature is available. 



When VSI executes in nonpaging mode, it uses 
fewer privileged instructions and avoids 
duplicate paging. The VSI Nucleus 
Initialization Program (NIP) fixes all VSI pages 
to avoid the duplicate paging. 

Note: The working set size may be larger for a 
VSI virtual machine in nonpaging mode than for 
one in paging mode. 



Miscellaneous Enhancements 



A VSI virtual machine with the handshaking 
feature avoids many of the instructions or 
procedures that would duplicate the function 
that VM/370 provides. For example, VSI avoids: 

• ISK (Insert Storage Key) instructions and 
uses a key table 

• Seek separation for 231U direct access 
devices 



ENABLE/DISABLE sequences in 
Supervisor (lOS) 



the VSI I/O 
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TCH (Test Channel) instructions preceding SIO 
(Start I/O) instructions. 



CP INTEBRUPTION HANDLING 



3^0 iBiSIIJUJBtisn 



I/O interruptions from completed I/O operations 
initiate various completion routines and the 
scheduling of further I/O reguests. The I/O 
interruption handling routine also gathers 
device sense information. 



Interruption processing occurs within the CP 
environment. More than 30 modules control the 
process of interrupting events brought about by 
CP or virtual machine activity. Each module 
handles a particular I/O device or class or a 
function of CP, (for example: timers, paging, 
SVCs) . For an overview of interruption 
handling, see Figure 15. 



Pfoaram Interrugtion 



Program interruptions occur in two states. If 
the CPU is in the supervisor state, the 
interruption indicates a system failure in the 
CP nucleus and causes a system abnormal 
termination. If the CPU is in the problem 
state, a virtual machine is in execution. If 
the program interruption indicates that the 
Dynamic Address Translation (DAT) feature has an 
exception, a virtual machine issued a privileged 
instruction, or a protection exception occurred 
for a shared segment system, CP takes control 
and performs any required processing to satisfy 
the exception. Dsually, the interruption is 
transparent to the virtual machine. Most other 
program interruptions result from virtual 
machine processing and are reflected to the 
virtual machine for handling. 



li^^hine Check Interrufition 



When a machine check occurs, CP Recovery 
Management Support (BHS) gains control to save 
data associated with the failure for FE 
maintenance. BHS analyzes the failure and 
determines the extent of damage. 

Damage assessment results in one of the 
following actions being taken: 

• System termination 

• Selective virtual user termination 

• Refreshing of damaged information with no 
effect on system configuration 

• Refreshing of damaged information with the 
defective storage page removed from further 
system use 

• Error recording only for certain soft machine 
checks 



The system operator is informed of all 
actions taken by the RMS routines. When a 
machine check occurs during VM/370 startup 
(before the system is set up well enough to 
permit EMS to operate successfully) , the CPU 
goes into a disabled wait state and places a 
completion code of X'OOB' in the high-order 
bytes of the current PSW. 
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r interrupt) 



The VM/370 Control Program (CP) is interrupt driven. Thus, when an interrupt occurs, control is passed to the appropriate Interrupt 
Handler. These are: 



For SVC interrupts, the SVC Interrupt Handler 



For External interrupts, the External Interrupt Handler | 



for Machine Checl( interrupts, the Machine Check Handler (MCH) i 



For l.'O interrupts, the I/O Interrupt Handler | 



DMKIOSIN passes control to the appropriate processor depending on the type of I/O interrupt. They are; 

• Monitor Tape I/O Operation 



• From unknown channel, the interrupt is ignored 

• From an unsolicited Device End, build an lOBLOK 
and for: Console (Start/Stop) WK^i 



>K &■■■ 



ChO 



and for 3270s on bisync lines | 



•c 



DMKRGAor 
DMKRGB 



3 



and for local 3270 devices, 3158 and 3066 consoles | 

Unit Record (U/R), real spooling 
• From a solicited Device End 




to stack lOBLOK 



• From a dedicated device error, for either CP or a virtual machine 
(DMKVCH), theERPfor: 



/IKDASERJ 



Tape 



D 



• From 3270 bisync line and channel errors I 



A DMKBSC ) 



Recoverable error? No, record error mg^^f dmkiOERR) 
Yes ■■ 



From a Channel ERROR, the Channel Check Handlerl^^ DMKCCHNT j 



For Program Checl< interrupts, the Program Check Interrupt Handler ^■■■■■■■■■■■■■■■■■■H 
DMKPRGIN passes control to the appropriate processor, depending on the type of program check, as follows: 



For normal paging 



• For paging (virtual 
machine in EC mode) 



D 



• For Supervisor state 

• For privileged instructions 



^^^/ DMKDMP j 



DMKPRVLG, 



DMKPRVLG passes control as follows 

• For DIAGNOSE instructions ■►{^DMKHVcJ 

• For timers ^BH^^ dmktivi 

• For virtual machine I/O 



/IR^ 



D 



DMKVIOEX passes control as follows: 



• For console ^r DMKVCNEX J 

• For Unit Record (U/R), virtual 



spooling { 



♦0 



D 



1^^ dmkpsaex j 
1^^ dmkmchin) 

i^T DMKIOSIN J 



I^T DMKPRGIN j 



Figure 15. Overview of Interruption Handling 



SVC InterruEtion 



When an SVC interruption occurs, the SVC 
interruption routine is entered. If the machine 
is in problem state, the type of interruption is 
usually reflected back to the pseudo-supervisor 
(that is, the supervisor operating in the user's 
virtual machine) . If the machine is in 
supervisor state, the SVC interruption code is 
determined, and a branch is taken to the 
appropriate SVC interruption handler. 



l*i§£Mi £&:^§££S£ii2Q 



If a timer interruption occurs, CP processes it 
according to type. The interval timer indicates 
time-slice end for the running user. The clock 
comparator indicates that a specified timer 



event has occurred, such as the time of day, a 
scheduled shutdown, or a reached user event. 
The CPO timer indicates that a virtual machine's 
allowed execution interval (time in queue) has 
expired. 

The external console interruption invokes CP 
processing to switch from the primary console to 
an alternate operator's console. 



FREE STORAGE MANAGEHENT 



During its execution, CP occasionally requires 
small blocks of storage that are used for the 
duration of a task. CP obtains this storage 
from the free storage area. The free storage 
area is divided into various size subpools. The 
requestor informs the free storage manager of 
the size of the block required and the smallest 
available subpool that fulfills the request is 
allocated to the requestor. Hhen the block is 
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no longer needed, the requestor informs the free 
storage manager and CP returns the block to free 
storage. 

If the request for free storage cannot be 
fulfilled, the free storage manager requests the 
temporary use of a page of storage from the 
dynamic paging area. If a page is obtained, the 
page is chained to the free storage area and 
used for that purpose until it is no longer 
needed and subsequently returned to the dynamic 
paging area. 

If the request for a page cannot be 
fulfilled, the requestor vaits until free 
storage becomes available. 



3. Checks for a fetch protection violation on 
a write CCH (except for spooling or console 
devices) . 

A special case of storaqe protection occurs 
when the CMS nucleus resides in a shared 
segment. The nucleus must be protected and 
still be shared by many CMS users. The program 
interruption handler, DMKPRG, manipulates the 
real storage key and real PSM key to ensure that 
user programs and disk-resident commands run 
with a different key than the nucleus code. 



EXECDTING THE PAGEABLE CONTROL PROGBAM 



STORAGE PROTECTION 



VM/370 provides both fetch and store protection 
for real storage. The contents of real storage 
are protected from destruction or misuse caused 
by erroneous or unauthorized storing of fetching 
by the program. Storage is protected from 
improper storing or from both improper storing 
and fetching, but not from improper fetching 
alone. 

When the CPU accesses storage, and protection 
applies, the protection key of the current PSH 
is used as the comparand. The protection key of 
the CPU is bit positions 8-11 of the PSM. 

If the CPU access is prohibited because of a 
protection violation, the operation is 
suppressed or terminated, and a program 
interruption for a protection exception takes 
place. 
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When a storage access is prohibited because 
of a store protection violation, the contents of 
the protected location remain unchanged. If a 
fetch protection violation occurs, the protected 
information is not loaded into an addressable 
register, moved to another storage location, or 
provided to an I/O device. 

To use fetch protection, a virtual machine 
must execute the set storage key (SSK) 
instruction referring to the data areas to be 
protected, with the fetch protect bit in the 
key. VM/370 subsequently: 

1. Checks for a fetch protection violation 
when handling privileged and nonprivileged 
instructions. 

2. Saves and restores the fetch protection bit 
(in the virtual storage key) when writing 

and recovering virtual machine pages from 
the paging device. 



Calls to pageable routines are recognized at 
execution time by the SVC 8 linkage manager in 
DMKPSA. For every SVC 8, the called address (in 
the caller's GPR15) is tested to see if it is 
within the resident nucleus. If it is less than 
DMKCPEND and greater than DMKSLC, the called 
routine's base address is placed in GPR12 and 
control is passed to the called routine in the 
normal way. However, if the called address is 
above DMKCPEND or below DMKSLC, the linkage 
manager issues a TRANS macro, requesting the 
paging manager to locate and, if necessary, 
page-in the called routine. The TRANS is issued 
with LOCK option. Thus, the lock count 
associated with the called routine's real page 
indicates the responsibility count of the 
nodule. 



When the module 
incremented . 



is called, the count is 



When the routine exits via SVC 12, the count 
is decremented. 



When the count reaches zero, the pageable 
routine is unlocked and is eligible to be paged 
out of the system. However, because all CP 
pageable modules are reentrant, the page is 
never swapped out, but when the page is stolen, 
it is placed directly on the free page list. 

Because unlocked pageable routines 
participate in the paging process in a manner 
similar to user virtual storage pages, the least 
recently used approximation used by page 
selection tends to make highly used control 
program routines, even when not locked, remain 
resident. The called routine is locked into 
real storage until it exits. Thus, it can 
request asynchronously scheduled function, such 
as I/O or timer interrupts, as long as it 
dynamically establishes the interruption return 
address for the requested operation and does not 
give up control via an EXIT macro prior to 
receiving the requested interruption. 

Addressability for the module, while it is 
executing, is guaranteed because the CALL 
linkage loads the real address of the paged 
module into GPR12 (the module base register) 
prior to passing control. If all addressing is 
done in a base/displacement form, the fact that 
the module is executing at an address different 
from that at which it was loaded is transparent. 
Although part of CP is pageable, it never runs 
in relocate mode. Thus, the CPU is not degraded 
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by the DAT feature being active, and no problems 
occur because of handling disabled page faults. 



SYSTEM SUPPORT MODULES 



The system support nodules provide CP with 
several common functions for data conversion and 
control block scanning and verification. Most 
of the routines are linked to via the BALR 
option of the CALL macro, and make use use of 
the BALBSAVE and TEMPSAVE workareas in DHKPSA. 
Two exceptions are the virtual and real I/O 
control block scan routines DMKSCNVU and 
DMKSCNRU. These routines do not alter the 
contents of the EALRSAVE area, and hence may be 
called by another low level BALR routine. 



CONTROL REGISTER USAGE 



Every IBM System/370 CPU provides the program 
with 16 logical control registers (logical 
registers since the number that are active 
depends on the features installed in the machine 
at any one time) that are addressable for 
loading and storing from basic control (BC) 
mode. VM/370 provides only a single control 
register, control register zero, for normal 
virtual machines, and for processing systems 
that do not reguire the full set of registers 
(for example, CMS, DOS, or other operating 
systems for System/360. 

Any user whose virtual machine operating 
system reguires the use of control registers 
other than control register zero, can reguest 
the full set of 16 registers by specifying the 
ECMODE option in the VM/370 directory entry for 
his virtual machine. 

A virtual machine, which utilizes any 
System/370 features that use the control 
registers, reguires the ECMODE option. Some of 
these features are expanded timer support of the 
System/370 CPU timer, clock comparator, etc., 
the virtual relocate mode and its instructions, 
RRB, LRA, PTLB, virtual monitor calls, virtual 
Program Event Recording (PER) , etc. 



RESTRICTIONS 
MODULES 



AND CONVENTIONS FOR PAGEABLE CP 



The module cannot contain any A- or V-type 
address constants that point to locations 
within itself or within other pageable 
modules, and it cannot contain any CCHs that 
contain data addresses within themselves. 
The only exceptions are address constant 
literals generated as the result of calls to 
other modules (because these addresses are 
dynamically relocated at execution time, they 
must be resolved by the loader to the loaded 
address of the called module) and a pageable 
module that locks itself into storage. In 
practice, this restriction means that data or 
instructions within the pageable routine must 
be referenced via base/displacement 
addressing, and the address in register 15 
fot a CALL may not be generated by a LOAD 
ADDRESS instruction. 

The pageable module must be no more than 4096 
bytes in length. 
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Pageable CP modules must observe the following 
restrictions and conventions when they are 
designed and coded: 



If the four above d 
restrictions are adhered to, 
be added to the existing 
modules by utilizing the 
VMFLOAD, which is descr 
Maintenance Procedures" of t 
Sofitines Program logic. Add 
can be found in~the VM/370: 
Generation Guide. 



DATA AREA MODULES 



In addition to the executable resident and 
pageable modules, there are certain modules that 
only contain data areas and do not contain 
executable code. These modules are: 

Resident 

Mo^Sle Contents 

DMKCPE Defines the end of the CP nucleus 

DMKRIO I/O device blocks 

DMKSYS System constants 

DHKTBL Terminal translate table 

Pageable 

Mo^iile Contents 

DMKBOX Output separator table 

DMKEHS Error message data module 

DMKFCB 3211 Forms Control Buffer (FCB) load 

tables 
DMKSNT System name table 
DMKSYM System symbol table 
DMKUCB 3211 Universal Character Set Buffer 

(UCSB) load tables 
DMKUCS ia03 Universal Character Set (UCS) 

load tables 
DMKTBM Terminal translate tables 



The module should be completely reenterable. 
Any messages to be modified, temporary work 
or scratch areas, or program switches must be 
allocated from system free storage or from 
the caller's save area. 

The module must be entered by the standard 
SVC 8 CALL linkage. Modules entered by BALR 
or GOTO cannot be pageable. 



INTERRUPTION HANDLING 



SVC INTERRUPTIONS 



When an SVC interruption occurs, the SVC 
interruption routine (DMKPSASV) is entered. If 
the machine is in the problem state, DMKPSASV 
takes the following action: 
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EXECUTABLE MODULES 
Executable Resident Modules 



DMKBSC 
DMKCCH 
DMKCCH 
DMKCFC 
DMKCFM 
DMKCNS 
DMKCVT 
DHKDAS 
DMKDGD 
EMKDMP 
DHKDSP 



DHKFBE 
DMKGSF 
DMKHVC 
DHKHVD 
DHKIOE 
DMKIOS 
DMKLOC 
DMKMCH 
DHKHSH 
DMKOPR 
DHKPAG 



DMKPGT 

DMKPRG' 

EMKPRV 

DMKPSA 

DMKPTR 

DMKQCN 

DHKBGA 

DHKRGB 

DHKRGF 

DHKRNH 

DHKBPA 



DMKRSP 
DMKSCH 
DMKSCN 
DHKSTK 
DMKTMR 
DMKUHT 
DMKVAT 
DMKVCM 
DMKVIO 
DMKVHA 
DMKVSP 



ll§cutable Pageable Modules 



DMKACO 
CMKBLD 
DMKCDB 
DMKCDS 
DMKCFD 
DMKCFG 
DMKCFP 
EMKCFS 
DMKCFT 
DMKCKP 
DMKCKS 
DMKCPB 
DMKCPI 
DMKCPV 
DMKCQG 
EMKCQP 
DMKCQB 



EMKCSO 
DMKCSP 
DMKCST 
DMKCSU 
DHKDEF 
DHKDIA 
DHKDBD 
DMKEIG 
EHKEHA 
DHKENB 
DMKEBM 
DHKGIO 
DHKIOC 
DMKIOF 
DMKIOG 
DMKISM 
EHKLNK 



EMKLOG 
DMKMCC 
DHKMID 
DHKHON 
EMKMSG 
DHKNEM 
EHKNES 
DMKNET 
DHKMLD 
DMKPGS 
EMKBSE 
DMKSAV 
DMKSEP 
DMKSEV 
DMKSIX 
DMKSNC 
EMKSPL 



DMKTAP 
DMKTDK 
DMKTHI 
DMKTRA 
DMKTRC 
DMKTRM 
DMKUDR 
DMKUSO 
DMKVCA 
DMKVCH 
DMKVDB 
DMKVDB 
DMKVDS 
DHKVER 
DHKVMI 
DHKWRH 



If the interruption was the result of an 
ADSTOP (SVC code X'B3«), the message ADSTOP 
AT XXXXX is sent to the user's terminal, the 
overlaid instruction is replaced, and the 
virtual machine is placed in console function 
mode (CP mode) via BMKCFMBK. 
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If the virtual machine was in EC mode or its 
page was not in real storage, then all 
general and floating-point registers are 
saved, the user's VMBLOK is flagged as being 
in an instruction wait, and control is 
transferred (via GOTO) to DMKPRGRF to reflect 
the interruption to the virtual machine. 

If the virtual machine was in BC mode and if 
page is in main storage, an appropriate SVC 
old PSW is stored in page and the 
interruption is reflected to the virtual 
machine, bypassing unnecessary register 
saving. If the new virtual PSH indicates the 
wait state, all registers are saved in the 
VMBLOK and control transfers to DMKDSPB for 
PSH validation. 



If the machine is in the supervisor state, 
the SVC interruption code is determined and a 
branch is taken to the appropriate SVC 
interruption handler. 

SVC 

Impossible condition or terminal error. The 
SVCDIE routine initiates an abnormal termination 
by using the DMKDMPDK routine. 

SVC « 

Reserved for IBM use. 

SVC 8 

A link request that transfers control from the 
calling routine to the routine specified by 
register 15. The SVCLINK routine sets up a new 
save area, and then saves the caller's base 
register in register 12 and save area address in 
register 13, and the return address (from the 
SVCOPSH) in the new save area. If the called 
routine is within the resident CP nucleus, 
SVCLIMK places its address in register 12 and 
branches directly to the called routine. If the 
called routine is in a pageable module, a TRANS 
macro is performed for register 12 to ensure 
that the page containing the called routine is 
in storage. Upon return from the TRANS 
execution, the real address of the pageable 
routine is placed in register 12 and SVCLINK 
branches to the called routine. The real 
storage location of EMKCPE is the end of the 
resident CP nucleus. Any modules loaded at a 
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higher real storage address are defined as 
pageable modules. 



SVC 12 

A return request that transfer 
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SVC J6 

Releases current save area from the active chain 
(removes linkage pointers to the calling 
routine) . The SVCRLSE routihe releases the 
current save area by placing the address of the 
next higher save area in register 13 and returns 
control to the current routine by loading the 
SVCOPSW. This SVC is used by second level 
interrupt handlers to bypass returning the first 
level handler under specific circumstances. The 
base address field (register 12) in the save 
area being released is examined to determine if 
the bypassed routine is in a pageable module. 
If so, DMKPTRUL is called to unlock the page. 

SVC 20 

Obtain a new save area. The SVCGET routine 
places the address of the next available save 
area in register 13 and the address of the 
previous save area in the save area pointer 
field of the current save area. 

There are 35 SAVEAREAs initially set up by 
DHKCPIST for use by the SVC linkage handlers. 
If all the save areas are used, the linkage 
handlers call DMKFBEE to obtain additional save 
areas. 



• The virtual machine is disconnected. 

The operator can now log on from another 
terminal. Pressing the console interrupt button 
activates an alternate operator's console. For 
a description of the processing of the external 
interruption command, refer to module DMKCPB in 
Section 2. 



Jxtended Virtual Internal Interru£tions 



To reflect external interruptions to a virtual 
machine, an XINTBIOK^ is queued on a chain 
pointed to b'y VMPxfNT in the VMBLOK. The 
XINTBLOKs are chained sequentially by the 
XIHTSORT field that contains the collating 
number of the pending interruption. If more 
than one interruption has the same collating 
number, the interruption codes are ORed together 
in the XINTCODE field for possible simultaneous 
reflection. 

When a virtual machine is enabled for 
external interruptions, the XINTBIOK queue for 
that machine is searched for an eligible block. 
An XINTBLOK is eligible for reflection if one or 
more bits of the XIHTMASK field match the bits 
in the low-order half word of control register 0. 
If the interruption was an interruption such as 
CPD timer or clock comparator, the block is left 
chained because reflection does not reset these 
interruptions. If the reflected interruption (s) 
does not represent all those coded in the 
XIHTMASK field, the block is left chained and 
only the interruptions that were reflected are 
reset. In all other conditions, the XINTBLOK is 
unchained and returned to free storage. 



PROGRAM INTERRUPTIONS 



EXTERNAL INTERRUPTIONS 



lil§£ l5i§iE£]iEiio5 



If DMKPSAEX is entered because of a timer 
interruption, the state of the machine must be 
determined. If the machine was in wait state, 
control is transferred to DMKDSPCH, and the 
machine stays idle until another interruption 
occurs. If the machine is in problem state, the 
address of the current user's VMBLOK is' obtained 
from RUNUSER. The user's current PSW (VMPSW) is 
updated from the external interruption old PSW, 
the address of the current VMBLOK is placed in 
register 11, and control is transferred to 
EHKDSPCH. For additional information about 
timers, see "Virtual Timer Maintenance." 



When a program interruption occurs, the program 
interruption handler (DMKPHG) is entered. 
Program interruptions can result from: 

• Normal paging requests. 

• A paging request by a virtual machine in EC 
mode (virtual relocate mode) . 

• Privileged instructions. 

• Program errors. 

For information paging requests, see "Allocation 
Management" in this section. 



££i:Zi:l§3§^ iB§i£a£ii2fi§ 



Internal Interru£tion 



If DMKPSAEX is entered because the operator 
pressed the console interrupt button 
(INTERRUPT) , the following steps are taken: 

• The current system operator's VMBLOK 
(DHKSYSOP) is referenced. 



If a program 
virtual machine 
when it is runn 
obtains the 
instruction and 
requested. If 
in problem stat 
back to the vir 



interruption is caused by the 
issuing a privileged instruction 

ing in supervisor state, DMKPRVLG 
address of the privileged 
determines the type of operation 
the virtual machine was running 

e, the interruption is reflected 

tual machine. 
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IZQ PBiyiLEGED INSTRUCTIONS DMKPRVLG transfers 
control to the virtual I/O executive program 
(DMKVIOEX) . 

^ONzIZS PRIVILEGED INSTBDCTIOMS DMKPBVLG 
simulates valid non-I/0 privileged instructions 
and returns control to DMKDSPCH. For invalid 
non-1/0 privileged instructions, the routine 
sets an invalid interruption code and reflects 
the interruption to the virtual machine. For 
the privileged instructions (SCK, SCKC, STCKC, 
SPT, and STPT that affect the TOD clock, CPU 
timer, and TCD clock comparator, control is 
transferred to DMKTMR by DHKPRVLG. Other 
instructions that are simulated are LPSH, SSH, 
SSK, ISK, and DIAGNOSE. 

Although the CS and CDS instructions are 
non-privileged, they are not part of the 
standard instruction set on IBM System/370 
Models 135 and 145. VM/370 simulates these 
instructions on Models 135 and 145 that do not 
have the optional hardware feature installed. 

■Jv 

System/370 EC mode non-I/O privilegedVj 

instruction simulation includes the following: '^ 



Code DsfiSiiioH 

SCK Set Clock 

SCKC Set Clock Comparator 

STCKC Store Clock Comparator 

SPT Set CPU Timer 

STPT Store CPU Timer 

STNSM Store And AND System Mask 

STOSM Store And OR System Mask 

STIDP Store CPU Identification 

STIDC Store Channel Identification 

LCTL Load Control 

STCTL Store Control 

LRA Load Real Address 

RRB Reset Reference Bit 

PTLB Purge Table Look-aside Buffer 

IPK Insert PSH Key 

SPKA Set PSW Key Prom Address 



Code 
0000 


Class 
Any 


0004 


C,E 


0008 


G 


OOOC 


G 


0010 


G 


0014 


G 


0018 


G 


001C 


F 



extended -identification 



0020 G 



0024 


G 


0028 


G 


002C 


C,E,F 


0030 


C,E,F 


0034 


C,E 


0038 


C,E 


003C 


A,B,C 


004C 


Any 


0050 


A,B,C 


0054 


G 


0058 


G 


005C 


G 


0060 


G 



0064 



Function 
Store 

code. 
Examine data from real storage 
Execute CP console function 
Pseudo-timer facility 
Release virtual storage pages 
Manipulate input spool files 
Standard DASD I/O 
Clear I/O and machine check 

recording 
General virtual I/O without 

interrupts 
Virtual device type information 
Dynamic TIC modification 
Return DASD start of LOGREC area 
Read one page of LOGREC data 
Read system dump spool file 
Read system symbol table 
Dynamically update system user 

directory 
Generate accounting cards 

virtual user 
Save 3704/3705 control program 

image 
Enable or disable for external 

interruption 
Virtual console interface for 3270 
Error message editing 
Provide virtual machine storage 

size 
Load, find, or purge a named system 



for 



Rules for DIAGNOSE codes: 

1. The DIAGNOSE code must always be a multiple 
of 4. 

2. Virtual machines issuing DIAGNOSE codes 
should run with interruptions disabled to 
prevent loss of status information 
(condition code, sense, etc.) pertaining to 
the DIAGNOSE operation. 



EIAGNOSE Interface (DMKHVC) 



X'OO' through X'FC — Reserved for IBM use 
X'100' through XMFC — Reserved for users 



The DIAGNOSE command communicates between a 
virtual machine and CP. Correct CP execution of 
DIAGNOSE requires that the operand storage 
addresses passed to CP via the DIAGNOSE 
interface be real addresses to the virtual 
machine using the DIAGNOSE instruction. In 
VM/370, the machine-coded format for the 
DIAGNOSE command is: 



DIAGNOSE CODE 0: Allows a virtual machine to 
examine the VM/370 extended-identification code. 
For example, an OS/VSI virtual machine issues a 
DIAGNOSE code instruction to determine if the 
version of VM/370 it is running in supports the 
VM/VS Handshaking feature. If the 
extended-identification code is returned to VSI, 
VM/370 supports handshaking; otherwise, it does 
not. 



Bits 



7 8 11 12 15 16 



31 



where 



83 



I rx I ry | 



code 



Content ExElanation 

83 DIAGNOSE operation code 
rx User-specified register number 
ry User-specified register number 
code Hexadecimal value that selects a 
particular VM/370 control program 
function. The codes and their 
associated functions are: 



ry 



contains the virtual storage address where 
the VM/370 extended-identification code is 
to be stored. 

is the number of bytes to be stored (an 
unsigned binary number) . 



If the VM/370 system currently running does not 
support the DIAGNOSE code instruction, no data 
is returned to the virtual machine. If it does 
support the DIAGNOSE code instruction, the 
following data is returned to the virtual 
machine (at the location specified by rx) : 
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Field 

System 
Nane 

Version 
Number 



Version 
Code 



MCEL 



CPU 
Address 



userid 



Description 
VIl/370 



The first byte is 
the version num- 
ber, the second 
is the level, and 
the third is the 
program level 
change (PLC) num- 
ber. 

VIl/370 executes 
the STOBE CPU ID 
(STIDP) instruc- 
tion to determine 
the version code. 

VM/370 executes 
the STIDP in- 
struction to de- 
termine the max- 
imum length of 
the machine check 
extended logout 
area (MCEL) . 

VM/370 executes 
the STORE CPU 
ADDRESS (STAP) 
instruction to 
determine the 
processor ad- 
dress. 

The userid of 
the virtual ma- 
chine issuing the 
DIAGNOSE. 



Attributes 



8 bytes, 
EBCDIC 

3 bytes, 
hex 



1 byte, 
hex 



2 bytes, 
hex 



2 bytes, 
hex 



8 bytes, 
EBCDIC 



The condition code remains unchanged by the 
DIAGNOSE code instruction. 

DIAGNOSE CODE 4: Examines real storage. 

where : 

rx contains the virtual address of a list of 
CP (real) addresses. 



ry 



contains a count of entries in the list. 



ry+ 1 contains the virtual address of the result 
field that holds the values retrieved from 
CP locations. 



DIAGNOSE CODE 8: Allows a virtual machine to 
perform CP console functions. 

where: 

rx contains the address (virtual) of the CP 
console function command and parameters. 

ry contains the length of the associated 
console function input, up to 132 
characters . 

The following example illustrates the virtual 
console function: 



LA R6,CPFUNC 

LA R10,CPFUNCL 

DC X«83»,X«6A« ,XL2«0008' 



CPFONC DC 
CPFUNCL EQO 



C'QDERY FILES* 
♦-CPFDNC 



The console function output goes to the 
user's terminal, and then execution continues. 
Any valid and authorized console function can be 
executed in this manner. 

A completion code is returned to the user as 
a value in the register specified in ry. A 
completion code of signifies normal 
completion. If an error message is issued, the 
completion code is equal to the numeric portion 
of the error message. 



5I1GN0SE CODE C: Obtains total and virtual CPD 
time. 

where : 

rx contains the virtual address of a 32-byte 
data area that does not cross a page 
boundary, into which the following data is 
stored: 



Bytes 



7 8 



15 16 



23 2a 



31 



|BM/DD/YY|HH:MM:SS| Virt CPO|Total CPD| 



Virtual and total CPO time used (in 
microseconds) is returned as a doubleword 
logical value. 



DIAGNOSE CODE J.0 : Releases pages. 

where : 

rx contains the virtual address of the first 
page to be released. 

ry contains the virtual address of the last 
page to be released. 

Any of the virtual pages in real or auxiliary 
storage are released. 



DIAGMQSl CODE 14: Performs input spool file 
manipulation. 

where : 

rx contains either a buffer address, a copy 
count, or a spool file identifier, 
depending on the value of the function 
subcode in ry+1. 

ry (cannot be register 15) contains either the 
virtual address of a spool-input card 
reader or, if ry+1 contains x'OFFF', a 
spool file ID number. 

ry+1 contains a hexadecimal function code 
interpreted by DHKDRDER as a command to do 
the following: 
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Code lunction 

0000 Read next spool buffer (data record) 

0004 Bead next print SFBLOK 

0008 Read next punch SFBLOK 

OOOC Select a file for processing 

0010 Repeat active file nn times 

0014 Restart active file at beginning 

0018 Backspace one record 

OFFF Retrieve successor file descriptor 

Note: ry+1 on return, may contain error 
codes which further define a returned 
condition code of 3. 

The file manipulation is performed by 
DHKDRDEB. 

OI&GNOSE CODE J 8 : Performs limited disk I/O. 

w h er e : 

rx contains the device address of the disk. 



ry 



points to a CCW chain to read or write a 
limited number of disk records. 



Each read or write must specify no more than 
2048 bytes (usually 800 is used) , and the CCH 
chain is of a standard form, as shown below. 
For a 3330 or 3350 a SET SECTOR command would 
precede each SBCH command. 

Register 15 contains the number of reads or 
writes in the CCH chain (the number is two in 
the following example for a typical CCW string 
(to read or write two 800-byte records) : 

SEEK, A, CC, 6 

SRCH,A+2,CC,5 

TIC,*-8,0,0 

RD or WRT, DATA, CC+SILI, 800 

SEEK HEAD,B,CC,6 (Omitted if HIAD No. 

SRCH,B+2,CC,5 unchanged) 

TIC,*-8,0,0 

RD or HRT,DATA+800,SILI,800 
A SEEK and SRCH arguments for first HD/HRT 
B SEEK and SRCH arguments for second RD/HRT 



The condition codes (cc) and completion codes 
that are returned are as follows: 

cc=0 I/O complete with no errors 

cc=1 Error condition. Register 15 contains one 
of the following: 

1 Device not attached 

2 Device not 2314, 2319, 3330, 3340, or 
3350 

3 Attempt to write on a read-only disk 

4 Cylinder number is not in the range of 
user's disk 

5 Virtual device is busy or has an 
interrupt pending 

cc=2 Error condition. Register 15 contains one 
of the following: 

5 Pointer to CCH string not doubleword 
aligned. 

6 SEEK/SEARCH arguments are not within 
range of user's storage 

3 READ/HRITE CCH is neither read (06) nor 

write (05) 
8 READ/HRITE byte count=0 



9 BEAD/HRITE byte count greater than 2048 

10 READ/HRITE buffer not within user's 
storage 

cc=3 Oncorrectable I/O error. Register 15 
contains the following: 
13 CSH (8 bytes) returned to user. 

Sense bytes are available if user issues a SENSE 
command. 

DIAGNOSE CODE JC: Calls the DMKIOEFM routine to 
clear the I/O error recording data on disk. 

where : 

rx contains the code value 1, 2, or 3 to clear 

and reformat the I/O error recording, M/C 

recording, or both. 

ry is ignored. 

DIISEQSE CODE 20: Performs general I/O without 
interruptions. 

where : 

rx contains a virtual tape or DASD device 
address. 



ry 



contains the address of the string of CCHs 
to be executed. 



The CCH string is processed by DMKCCHTB through 
DMKGIOEX. This provides full virtual 
synchronous I/O to any virtual tape or DASD 
device specified (self-modifying CCH strings are 
not permitted, however). Control returns to the 
virtual machine only after completion of the 
operation or detection of a fatal error 
condition. Condition codes and error codes are 
returned to the virtual system. Unit record 
devices are not supported. 

The condition codes (cc) and completion codes 
that are returned follow: 



cc=0 I/O complete with no errors 

cc=1 Exception conditions. Register 15 contains 
the following: 

1 Device not attached 

5 Virtual device is busy or has an 
interrupt pending 

cc=2 Exception conditions. Register 15 
contains one of the following: 

2 Unit exception bit in device status 
byte=1 

3 Hrong length record detected 

cc=3 Error condition. Register 15 contains 
the following: 

13 A permanent I/O error occurred. The two 
low order positions of the user's R2 
register contain the first two sense 
bytes . 

Note: Support is provided for DASD and tape 

devices only. All other devices have a return 

code of 13 and a condition code of 3 in the 
virtual machine's PSH. 

2II|GN0SE CODE 24: Provides virtual device type 
information. 



60 



IBM VM/370: System Logic and Problem Determination Guide 



where : 

rx contains a virtual device address, or a 
value of -1 indicating a virtual console 
whose address is not known. 

If rx contained a value of -1 upon entry 
and a virtual console was found, the 
register contains the virtual device 
address in the two low order bytes, upon 
return. 

ry contains virtual device information. 

ry+1 contains real device information. If ry is 
register 15, then only virtual device 
information is supplied. 



Bits 
ry 



7 8 



15 16 



23 2U 



31 



I VDEVTYPC I VDEVTYPE I VDEVSTAT | VDEVFLAG | 
ry+1 I RDEVTYPC|BDEVTYPE|BDEVMDL |seeNote| 

L 1 



Note: The low order byte of ry+1 contains 
the current device line length (RDEVLLEN) 
for a virtual console, or the device 
feature code (RDEVFTB) for a device other 
than a virtual console. The condition 
codes (cc) and completion codes that are 
returned follow: 



or if it was too late to change the real CCW 
list because channel or device end had already 
occurred, a condition code and return code are 
returned to the virtual machine to notify it 
that the real CCW string was not successfully 
modified. The condition codes are as follows: 



Condition 
Code GE15 
~ 
1 
2 



Successfully modified channel program 

rx and ry registers are the same. 

Device specified by ry register was 

not found. 

Address given to rx register was not 

within user's storage space. 

Address given by rx register was not 

doubleword aligned. 

CCW string corresponding to ry device 

and rx address was not found. 

CCW string corresponding to ry and rx 

address was not found. 

CCW at address specified by rx is not 

a TIC or a NOP, or CCW in channel 

program is not a TIC or a NOP. 

New address in TOC is not within 

user's storage space. 

New address in TOC is not doubleword 

aligned. 

Too late to change the CCW string 

(channel end or device end has 

already occurred) . 



cc=0 Data transfer successful 
cc=2 Real device does not exist 



5I*GM0SE CODE 2C: Returns the DASD start 
location of the LOGREC area. 



cc=3 Device address invalid; or device does 
not exist 

DIAGNOSE CODE 28: Modifies a real TIC or 
NOP CCW in a channel program when the 
associated virtual TIC or NOP has been 
modified after a START I/O but before a 
channel or device end interruption. 



where: 



ry 



contains the address of the TIC or NOP 
CCW that has been modified. The 
address in rx, the new address in the 
modified TIC CCW, and the addresses in 
the new CCW list pointed to by the 
modified TIC, must be "real" with 
respect to the virtual m.achine; they 
must be "second level" virtual storage 
addresses to CP. 

contains the virtual device address in 
bits 16 through 31. (Nust be a 
different register than rx.) 



When DHKHVC has analyzed the DIAGNOSE, the 
real CCW string and appropriate TIC or NOP is 
located by a call to DMKCCWTC. If a virtual TIC 
had been changed to a NOP, a corresponding 
change is made to the real TIC. If a virtual 
TIC had been changed to point to a new list of 
CCWs or a virtual NOP had been changed to a TIC, 
the program translates the new list via a call 
to DHKCCWTR and modifies the existing channel 
program to include the new real CCWs. If an 
error was detected in the DIAGNOSE information. 



where : 

rx on return contains the DASD location, in CP 
format, of the first record of the system 
I/O and machine check error recording 
area. 

ry is ignored. 

BIIGJSOSE CODE 30: Reads one page of LOGREC 
data. 

where : 

rx contains the DASD location, in CP format, 
of the desired record. 

ry contains the virtual address of a page-size 
buffer to receive the data. 

The page of data is provided to the virtual 
machine via DMKRPAGT. The condition codes are 
as follows: 



cc^O Successful read, data available. 

cc=1 End of cylinder, no data. 

cc=2 Invalid cylinder, outside recording area 

DIAGNOSE CODE 3U: Reads the system dump spool 
fileT ~ 

where : 

rx contains the virtual address of a page-size 
buffer to accept the reguested data. 
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ry (cannot be register 15) contains the 
virtual device address of a spool-input 
card reader. 

ry+1 on return, may contain error codes which 
further define a returned condition code of 
3. 

The system chain of spool input files is 
searched for a dump file belonging to the user 
issuing the EIAGNOSE by DMKDRDMP. The first (or 
next) record from the dump file is provided to 
the virtual machine via DMKRPAGT and the 
condition code is set to zero. The dump file is 
closed by the CLOSE command issued from the 
console. 

CIAGNOSE CODE 38: Reads the system symbol 
table. 

where: 



Code Meaning 

0008 rx points to a parameter list containing a 

userid and distribution number. 
OOOC rx points to a parameter list containing a 

userid, account number, and distribution 

number. 
0010 rx points to a data area containing up to 

70 bytes of user information to be 

transferred to the accounting card 

starting in column nine. 

Hote: If ry contains X'0010', ry cannot be 
register 15. 

ry+1 contains the length of the data area 
pointed to by rx. If rx points to a 
parameter list (ry not egual to X'0010'), 
ry+1 is ignored. 

The following condition codes are returned to 
the user by DMKHVC: 



rx contains the start address of the page 
buffer that is to contain the symbol 
table. 

ry is ignored. 

The system symbol table (DMKSYM) is read into 
storage by DMKDRDSY at the location specified by 
rx. 

5IAGN0SE CODE 3C: Dynamically updates the system 
user directory by DMKUDRDS. 

where: 

rx contains the first 4 bytes of the volume 
serial label. 

ry the first 2 bytes of the register specified 
by ry contain the last 2 bytes of the 
volume serial label. 

DIAGNOSE CODE 4C : Generates accounting cards for 
the virtual user. This code can be issued only 
by a user with the account option (ACCT) in his 
directory. 

w her e : 

rx contains the virtual address of either a 
24-byte parameter list identifying the 
"charge to" user, or a variable length data 
area that is to be punched into the 
accounting card. The interpretation of the 
address is based on a hexadecimal code 
supplied in ry. If the virtual address 
represents a parameter list, it must be 
doubleword aligned; if it represents a data 
area, the area must not cross a page 
boundary. If rx is interpreted as pointing 
to a parameter list and the value in rx is 
zeros, the accounting card is punched with 
the identification of the user issuing the 
DIAGNOSE. 

ry contains a hexadecimal function code 
interpreted by DMKHVC as follows: 

Code MeiSiUfl 

0000 rx points to a parameter list containing 

only a userid. 
0004 rx points to a parameter list containing a 

userid and account number. 



CC Meanina 

Successful operation 

1 User does not have account option 
privileges 

2 Invalid userid in the parameter list 

3 Invalid function hexadecimal code in ry or 
an error occurred in trying to read in the 
user machine block (UHACBLOK) 

DMKHVC checks the VMACCOUN flag in VMPSTAT to 
verify that the user has the account option and 
if not, returns control to the user with a 
condition code of 1. 

If ry contains a code of X'0010', DMKHVC 
performs the following checks: 

• If the address specified in rx is negative or 
greater than the size of the user's virtual 
storage, an addressing exception is 
generated. 

• If the combination of the address in rx and 
the length in ry+1 indicates that the data 
area crosses a page boundary, a specification 
exception is generated. 

• If the value in ry+1 is zero, negative or 
greater than 70, a specification exception is 
generated. 

If both the virtual address and the length 
are valid, DMKFREE is called to obtain storage 
for an account buffer (ACNTBLOK) which is then 
initialized to blanks. The userid of the user 
issuing the DIAGNOSE is placed in columns 1 
through 8 and an accounting card identification 
code of "CO" is placed in columns 79 and 80. 
The user data pointed to by the address in rx is 
moved to the accounting card starting at column 
9 for a length egual to the value in ry+1. A 
call to DMKACOQO queues the ACNTBLOK for real 
output. If a real punch is available, DMKACOPU 
is called to punch the card; otherwise, the 
buffer is stored in main storage until a punch 
is free. DMKHVC then returns control to the 
user with a condition code of 0. 

If ry contains other than X'0010' code, 
control is passed to DMKCPV to generate the 
card. DMKCPV passes control to DMKACO to 
complete the "charge to" information; either 
from the user accounting block (ACCTBLOK) , if a 
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pointer to it exists, or from the user's 
VMBLOK. DMKCFV then punches the card and passes 
control back to DMKHVC to release the storage 
for the ACCTBLOK, if one exists. DMKHVC then 
checks the parameter list address for the 
following conditions: 

• If zero, control is returned to the user with 
a condition code of 0. 



DIAGNOSE CODE 58: Virtual 
3270. 



console interface for 



If invalid, 
generated. 



an addressing exception is 



• If not aligned on a doubleword boundary, a 
specification exception is generated. 

For a parameter list address that is nonzero 
and valid, the userid in the parameter list is 
checked against the directory list and if not 
found, control is returned to the user with a 
condition code of 2. If the hexadecimal code in 
ry is invalid, control is returned to the user 
with a condition code of 3. If both userid and 
hexadecimal code are valid, the user accounting 
block (ACCTBLOK) is built and the userid, 
account number, and distribution number are 
moved to the block from the parameter list or 
the user machine block belonging to the userid 
in the parameter list. Control is then passed 
to the user with a condition code of 0. 

PIAGKOSE CODE 50: Saves the 3704/3705 control 
program image. 

When a 3704/3705 control program module has 
been created, the CMS-based service routine 
(SAVENCP) builds a parameter list (see CCPABM in 
SAVENCP data areas) of control information 
required by CP to load the module into the 
user's virtual storage. It passes this 
information to CP by a DIAGNOSE code X'0O50'. 

where: 

rx contains the virtual address of the 
parameter list (CCPARM) 

ry is ignored on entry. 



DIAGNOSE code X'0050' invokes DMKSNC to 
validate the parameter specifications and write 
the page-format image of the control program to 
the appropriate system volume. 



ry 



upon return, 
codes: 



contains the following error 



Code Exfilanation 

044 "ncpname" was not found in system name 

table. 
171 System volume specified not currently 

available. 
176 Insufficient space reserved for program 

and system control information. 
179 System volume specified is not a CP owned 

volume. 
435 Paging error while writing saved system. 

DIAGNOSE CODE 54: Sets a flag in the VMQSTAT to 
reflect an external interruption to the virtual 
machine when the PA2 key is pressed on a 3270 
keyboard with the APL feature activated. 



Execution of DIAGNOSE code 58 allows a 
virtual machine to quickly display large amounts 
of data on a 3270 in a very rapid fashion. The 
interface can display up to 1760 characters on 
the screen with one write operation instead of 
up to 22 individual writes, if each line was 
limited to 80 characters. 



where : 

rx contains the address of the console CCW 
string. The format of the special display 
CCW is: 



ecu X'19', dataddr, flags, ctl, count 
where: 

dataddr is the address of the first byte 
to be displayed. 

flags is the standard CCW flag field. 

ctl is a control byte indicating the 
starting output display line 
(0-22) . If the high-order bit is 
on, the entire 3270 output display 
area is erased before the new data 
is displayed. A value of X'FF' 
clears the screen, but writes 
nothing. 

count is the number of bytes to be 
displayed (maximum is 1760) . 

ry contains the address of the virtual console 
device in bits 16-31. 



If this CCW is issued to a virtual console 
that is not simulated on a real 3270, a virtual 
command reject is generated. Otherwise, a 
buffer is built in free storage and the data 
pointed to by 'dataddr' is loaded into it. Data 
chaining may be specified in the CCW to link 
noncontiguous data areas; however, command 
chaining is an end-of-data indication for the 
current buffer. 

The starting line specified in 'ctl' is 
correlated with the data 'count' to ensure that 
the data does not overflow the allowed area. 
Any invalid specification will generate a 
command reject. 

CP then processes the display CCW returning a 
condition code of zero if the display was 
successful or a nonzero code if an I/O error 
occurred. 

DIAGNOSE CODE 5C: Edits error messages. 
Execution of DIAGNOSE Code 5C edits an error 
message according to the user's setting of the 
EMSG function. 

w here : 

rx contains the address of the message to be 
edited. 

ry contains the length of the message to be 
edited. 
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DMKHVC tests the VMMLEVEL field of the VMBLOK 
and returns to the caller with rx and ry 
modified as described in Figure 16. 



VMMLEVEL | 

VMMCODE|VMMTEXT| 

On 1 On 1 


Registers 
rx 
No change 


Upon Return 

1 ry 

1 No change 


On 1 Off 1 
1 1 


No change 


1 10 (length 
1 of code) 


Off 1 On 1 
1 1 
1 1 


Pointer to 
text part 
of message 


1 Length of 
1 text alone 

1 



Off I Off I N/A 



I 



Figure 16. DIAGNOSE X • 5C '/VMMLEVEL Field 
Analysis 



LOADS YS DI*§!MOSE function: Execution of the 
LOADSYS diagnose" function" (ry=00 or 04) causes 
the control program to locate the naie and 
location of the named system and builds the 
necessary page/swap tables. All virtual storage 
pages into which the system is to be loaded are 
released prior to loading the named system. 
When the LOADSYS DIAGNOSE is invoked, the 
virtual machine's storage is expanded 
dynamically, if necessary, and is completely 
transparent to the virtual machine. Whenever 
the LOADSYS function is invoiced, an automatic 
PURGESYS function occurs prior to building new 
page/swap tables. The automatic PURGESYS allows 
virtual machines to switch back and forth from 
shared systems to nonshared systems. 

When the LOADSYS function is executed in 
shared mode and the virtual machine has the CP 
trace facility active, the following options are 
reset if they are active: instruction trace and 
branch trace. All other options remain in 
effect. If no other tracing options are active, 
the user receives the message: TRACE ENDED. 



Note that DIAGNOSE code X'SC does not write 
the message; it merely rearranges the starting 
pointer and length. For CMS error messages, a 
console write is performed following the 
DIAGNOSE, unless ry is returned with a value of 
0. 



Note: If the LOADSYS function is executed in 
shared mode, the virtual machine assist feature 
is reset. 

I^turn Codes for LOADSYS 

• Successful Execution 



SliGNOSE CODE 60: Returns the virtual machine 
storage size to the user. CMS issues this 
DIAGNOSE during initialization. 



PSW CONDITION CODE = 

User's rx = address of where the named systei 
has been loaded. 



where : 

rx contains the virtual storage size. 

5IMNQSE CODE 64: Allows any virtual machine to 
dynamically load, purge, or find a named system 
in its virtual storage. CMS uses this DIAGNOSE 
to support DOS simulation. 

rx contains the address of the NAMED 
system. The name must occupy eight 
bytes, be left justified and padded with 
trailing blanks. 

ry the contents aust be a multiple of 4 and 
its value cannot be greater than decimal 
12. 

ry=00 loads the named system in shared mode 
and attach to the user's virtual 
storage. 

ry=OU loads the named system in nonshared mode 
and attach to the user's virtual 
storage . 

ry=08 release the named system from virtual 
storage. 

ry=OC finds the starting address of the named 
system. 

If the address in the rx register is invalid 
an addressing exception occurs. If the code in 
the ry register is invalid, a specification 
exception occurs. 



PSW CONDITION CODE = 1 

User's rx = address of where the named system 
has been loaded and also the 
starting address of virtual 
storage released prior to loading 
the named system. 

User's ry = ending address of virtual storage 
released prior to loading the 
named system. 

Note: A condition code of one in the user's PSW 
is reflected only when the named system to be 
loaded resides within the virtual machine size. 

• Unsuccessful Execution 

PSW CONDITION COEE = 2 

User's rx = Return code of 44 if the named 

system does not exist. 
User's ry = Return code of 174 if paging I/O 

errors occur,. 

PURGESYS DIAGNOSE function: The PURGESYS 
function releases storage made addressable to 
the virtual machine when the LOADSYS function 
was executed. The PURGESYS function releases 
page/swap tables associated with the named 
system. If the area released occupied a storage 
address range greater than the virtual machine 
storage size, this area is now made 
nonaddressable to the virtual machine. If the 
named system was being operated on in a 
nonshared mode, the storage which contained the 
named system is cleared to binary zeros. If the 
PURGESYS function is executed for a named system 
which had not been loaded by the LOADSYS 
function, no action takes place and the command 
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is treated as a NOP. The PDRGESYS function is 
invoiced dynamically by the control program when 
a LOADSYS function is executed. The name of the 
purged named system is the same as that 
requested via the LOADSYS function. 

Return Codes for PURGESYS 

• Successful Execution 
PSW CONDITION CODE = 

• Unsuccessful Execution 

PSW CONDITION CODE = 1 

This occurs if the named system was not found 

in the user's virtual storage. 



PSW CONDITION CODE = 2 
User's ry = Return code 
system does 
inactive. 



of 44 if the named 
not exist or is 



IINDSYS DIAGNOSE function: The FINDSYS function 
determines where the named system will be loaded 
into storage, without actually loading it. 
FINDSYS also determines whether or not the named 
system has already been invoked by this virtual 
machine. FINDSYS is executed by CMS prior to 
issuing the LOADSYS DIAGNOSE instruction. This 
ensures that the named system to be loaded does 
not overlay any part of the CMS nucleus and that 
the named system is not already active (loaded) 
in the virtual machine. If the named system is 
active, no subsequent LOADSYS DIAGNOSE is 
issued, therby keeping the current copy of the 
named system active. The address of where the 
named system resides is returned in the user's 
rx register. 



Return Codes for FINDSYS 

• Successful Execution 

PSW CONDITION CODE = 

User's rx = address of where the named system 

resides in virtual storage. 
User's ry = ending address of where the named 

system resides in virtual 

storage. 

PSH CONDITION CODE = 1 

User's rx = beginning address of where the 

named system is loaded into 

virtual storage.. 
User's ry = ending address of where the named 

system is loaded into virtual 

storage. 

• Unsuccessful Execution 

PSW CONDITION CODE = 2 

User's rx = return code of 44 if the named 

system does not exist. 
User's ry = return code of 174 if paging I/O 

errors occur. 

Note: Condition code indicates that the 
named system already resides in main 
storage. Condition code 1 indicates that the 
named system exists but has not been 
previously loaded in virtual storage. 



VIRTUAL TIMER MAINTENANCE 

The System/370 with EC mode provides the system 
user (both real and virtual) with four timing 
facilities. They are: 

• The interval timer at main storage location 
X'50' 

• The time-of-day clock 

• The time-of-day clock comparator 

• The CPU timer 



leal Timinc| Facilities 



Before describing how CP maintains these timers 

for virtual machines, it is necessary to review 

how VM/370 uses the timing facilities of the 
real machine. 

1. The location X'50' interval timer is used 
only for timeslicing. The value placed in 
the timer is the maximum length of time 
that the dispatched virtual machine is 
allowed to execute. 

2. The time-of-day clock is used as a time 
stamp for messages and enables the 
scheduler to compute elapsed in-queue 
time for the dispatching priority 
calculation. 

3. The time-of-day clock comparator facility 
is used by CP to schedule timer driven 
events for both control program functions 
and for virtual machines. A stack of 
comparator requests is maintained and as 
clock comparator interrupts occur, the 
timer request blocks are stacked for the 
dispatcher via calls to DMKSTKIO. 



4. 



The CPU timer 
functions: 



facility performs three 



• Accumulates CP overhead 

e Detects in-gueue time slice end 

• Simulates virtual CPU timer 

The accumulation of CP overhead is 
accomplished as follows. The VMTTIME field 
in the VH6L0K contains the total CP 
overhead incurred by the virtual machine; 
it is initialized to the maximum positive 
number in a doubleword, X' 7FFPFFFF 
FFFFFFFF". Whenever CP performs a service 
for a virtual machine, GR 11 is loaded with 
the address of the VHBLOK and the current 
value in VMTTIME is placed in the CPU 
timer. When CP is finished with the 
service for that virtual machine the CPU 
timer, which has been decremented by the 
amount of CPU time used, is stored back 
into VMTTIME. GR 11 is then loaded with a 
new VMBLOK pointer and the CPU timer is set 
from the new VMTTIME field. The amount of 
CP overhead for a given virtual machine at 
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any point in time is the difference between 
the maximum integer and the current value 
in the VHTTIME field. 

Since VHTTIME only accounts for supervisor 
state overhead, detection of in-queue time 
slice end is performed by the CPU timer 
when the virtual machine is dispatched in 
the problem state. The VMTMOUTQ field in 
the VMBLOK is initialized to the amount of 
problem state time that the virtual machine 
is allowed to accumulate before being 
dropped from a queue. This initial value 
is set by the scheduler (DMKSCH) when the 
virtual machine is added to a queue and its 
value depends on the queue entered 
(interactive or non-interactive) and on the 
CPU model. For example, the initial value 
of VMTMCUTQ for a user entering Q1 
(interactive) on a Model 145 is 300 
milliseconds, while for the same user 
entering Q2 (non-interactive) it is 2 
seconds. Each time the user is dispatched, 
the value in VMTMOUTQ is entered into the 
CPU timer; whenever the user is 
interrupted, the decremented CPU timer is 
stored into VMTMOUTQ prior to being set 
from the new VHTTIME. When the problem 
state time slice has been exhausted; a CPU 
timer interrupt occurs, the VMQSEND flag 
bit is set in the VMBLOK, and the scheduler 
drops the user from the queue. At each 
queue drop, the problem time used in-queue 
(the difference between VMTMOUTQ and the 
initial value) is added to the total 
problem time field (VMVTIME) in the 
VMBLOK. 

Virtual CPU timer simulation is handled for 
EC mode virtual machines if the value in 
the virtual CPU timer is less than that in 
VMTMOUTQ. In this case, the VMBLOK is 
flagged as "tracking CPU timer" and a CPU 
timer interrupt is interpreted as a virtual 
timer interrupt rather than as an in-queue 
time slice end. 



liliMl liliS3 I^cilities 



Virtual location X'50« timers are updated by the 
elapsed CPU time each time the dispatcher has 
been entered after a running user has been 
interrupted. The size of the update is the 
difference between the value of the timer at 
dispatch (saved in QUANTUM at location X'54«) 
and the value of the timer at the time of the 
interruption (saved in QUASTUME at location 
X'4C') . 



Virtual clock comparator requests are handled 
fcy the virtual timer maintenance routine, 
EMKTMR. They are inserted into the general 
comparator request stack and the virtual machine 
is posted when the interruption occurs. 

Virtual clock comparator requests to set the 
virtual CPU timer place the new value into the 
ECBLOK. Requests to store the new value update 
the ECBLOK field with the virtual CPU time used 
since the last entry to dispatch and pass the 



value to the user. Requests to set the 
time-of-day clock are ignored. 

A real interval timer or CPU timer is one 
that runs when the virtual machine is executing 
or is in a self-imposed wait state (that is, the 
wait bit is on in the virtual PSW) . A real 
timer does not run if the virtual machine is in 
a CP pseudo wait state (for example, page wait 
or I/O wait) or if the virtual machine can be 
run but is not being dispatched because of other 
user interaction. Real timers provide accurate 
interrupts to programs that depend on 
measurement of elapsed CPU and/or wait time. 
They do not accurately measure wall time — the 
TOD clock must be used for this function. 

An EC mode virtual machine with the real 
timer option has both a real interval timer and 
a real CPU timer. Real timer requests for 
waiting machines are maintained in the clock 
comparator stack. CPU timer requests are added 
to TOD clock value at the time that they are 
issued. Interval timer requests must have their 
units converted. In addition, if the virtual 
CPU timer contains a large negative value, then 
a real timer request is scheduled to occur when 
the virtual machine becomes positive, so that 
the pending timer interruption can be unflagged. 
Comparator requests for real timer interruptions 
are inserted into the stack whenever a virtual 
machine enters a self-imposed wait. They are 
removed either when the virtual machine resumes 
execution or when it is forced (or places 
itself) into a pseudo wait. 



I/O MANAGEMENT 



I/O SUPERVISOR 



The module, DMKIOS, handles the I/O requirements 
of all system devices except the following 
terminals: 1052, 3210, 3215, 2150, 2741, 3270 
remote equipment, and compatible teletypewriter 
devices. Scheduling and interruption handling 
for these devices is essentially a synchronous 
process and does not require the queuing and 
restart services of DMKIOS. This is handled by 
the module DMKCNS. For handling the I/O 
requirements of 3270 remote equipment, refer to 
"Programming for 3270 Remote Terminals - an 
Introduction" in this section. 



REAL I/O CONTROL BLOCKS 



To schedule I/O requests and control the 
activity of the I/O devices of the system, I/O 
control uses several types of control blocks. 
These blocks are separated into two basic 
types. 

• Static blocks that describe the components of 
the I/O system. 

• The dynamic blocks that represent active and 
pending requests for I/O operations. 

The I/O devices of the real system are 
described by one control block for each channel. 
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control unit, and device available to the 
control prograa. Units present but not 
represented by control blocks are not available 
for either user-initiated or CP-initiated 
operations. 



Because all virtual machines a 
problem state, any attempt to 
instruction results in a program 
that indicates a privileged operat 
This interruption is handled by CP 
program interrupt handler, 
determines if the virtual machine 
supervisor state (problem state 
virtual PSH is zero). If so, t 
causing the interruption is saved 
for the virtual machine and 
transferred to the privileged 
simulator, DMKPBVIG, via a GOTO. 



re run in the 

issue a SIO 

interruption 

ion exception. 

•s first level 

DnKPBGIN. It 

was in virtual 

bit in the 

he instruction 

in the VMBLOK 

control is 

instruction 



DMKPRVLG determines if the privileged 
operation affects the virtual I/O configuration. 
DMKPBVLG simulates non-I/0 privileged 
instructions (such as LPSH) . If the 
instruction's operation code is from X'9C to 
X«9F«, control is transferred to DHKVIOEX. 

After clearing the condition code in the 
user's VMBLOK, DMKSCNVO is then called to 
locate the virtual I/O blocks representing the 
I/O components (channel, control unit and 
device) addressed by the instruction. DMKVIOEX 
then branches to handle the request based on the 
operation requested. 



VIRTUAL I/O REQUESTS 



The virtual I/O interface maintained by CP 
provides to the software operating in the user's 
virtual machine, the condition codes, CSH status 
information, and interruptions necessary to make 
it appear to the user's virtual machine that it 
is in fact running on a real System/370. The 
virtual I/O interface consists of: 

• A virtual I/O configuration for each active 
virtual machine that consists of a set of I/O 
control blocks that are maintained in the 
Control Program's free storage. This 
configuration is built at logon time from 
information contained in the user's directory 
file, and can be changed by the user or the 
system operator. 

• A set of routines that maintain the status of 
the virtual I/O configuration. 

• Other system routines that simulate or 
translate the channel programs provided by 
the user to initiate I/O on units in the real 
system's configuration. 



Virtual SIO 



Hith a SIO, the condition code returned from 
DMKSCNVU is tested to verify that all addressed 
components were located. If they were not, then 
a condition code of 3 (unit not available) is 
placed in the PSH and control returns to the 
dispatcher. Otherwise, the addresses of the 



appropriate virtual I/O control blocks are 
saved, and DHKVIOEX tests the status of the 
addressed I/O units by scanning the VCHBLOKs, 
VCUBLOKS, and VDEVBLOKs to locate the block that 
contains the status of the addressed subchannel. 
The subchannel status is indicated in: 



The VCHBLOK for a 
multiplexer channel. 



selector or 



block 



The VCUBLOK for a shared selector subchannel 
on a byte multiplexer channel. 

The VDEVBLOK for a nonshared subchannel on a 
byte multiplexer channel. 



Rhen the block containing the status is 
found, the status is tested. If the subchannel 
is busy or has an interruption pending, 
condition code 2 is placed in the virtual PSH. 
Otherwise, the subchannel is available and the 
device and the control unit are tested for 
interruption pending or busy. If either is 
found, condition code 1 is placed in the virtual 
PSH and the proper CSH status is stored in the 
virtual machine's page zero. If all components 
in the subchannel path are free, DHKVIOEX 
proceeds to simulate the SIO by locating and 
loading the contents of the virtual machine's 
CAH from virtual location X'48' and testing the 
device type of the unit addressed. 

The device type is in the VDEVBLOK. If the 
device class code indicates a terminal or 
console, control is passed to the module 
DHKVCNEX with a GOTO. DHKVCNEX interprets and 
simulates the entire channel program, moving the 
necessary data to or from virtual storage and 
reflecting the proper interruptions and status 
bytes. Hhen DHKVCNEX has finished, it passes 
control directly to the dispatcher, DHKDSPCB. 

If the referenced device is a spooled unit 
record device, DMKVIOEX passes control to 
DHKFSPEX for additional processing. Hhen 
control returns to DMKVIOEX, it passes control 
to DMKDSPCH. 



If the device is not a terminal 
device, the SIO is translated 
directly en the real system's 
DHKVIOEX calls DHKFREE to obtain 
and then it constructs an I06L0K 
obtained. The lOBLOK serves as an 
the I/O task to be performed, 
pointer to the channel program t 
and the address of the routine tha 
any interruptions associated 
operation. 



or a spooling 

and executed 
I/O device. 

free storage 
in the storage 

identifier of 
It contains a 
o be executed 
t is to handle 
with the 



DMKVIOEX stores the conten 
CAH in lOECAH and sets the i 
address (lOBIBA) to be the sa 
interruption return address 
DMKVIO. The CCH translation 
is then called to locate and 
main storage all user pages a 
channel program, including tho 
and CCHs. The following occur 



ts of the user's 
nterruption return 
me as the virtual 
(DHKVIOIN) in 
routine (DHKCCHTR) 
bring into real 
ssociated with the 
se containing data 
s: 



The CCHs are translated. 

A corresponding real 
constructed. 



channel program is 
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The data pages are locked into real storage. Virtual Selector Channel I/O Requests 



DWKCCWTR returns control to DMKVIOEX. 
DMKVIOEX places the user in a pseudo wait 
state, lOHAIT, and calls the real I/O 
scheduler DMKIOSQV to schedule the I/O on the 
real configuration. 



DMKIOSQV queu 
the real chann 
corresponding to 
machine. When 
takes the user 
condition code f 
is not zero, th 
by DMKVIOIH. 
control to DMKV 
DMKDSPCH. 



es the request for operation on 
el, control unit, and device 
the address used by the virtual 
the real SIO is issued, DMKIOS 
out of lOWAIT and reflects the 
or the SIO if it is zero. If it 
e operation is further analyzed 
In any case, DMKIOSQV returns 
lOEX, which passes control to 



Other Privileged I/O Instructions 



Other privileged I/O instructions are handled 
directly by DMKVIOEX. DMKVIOEX scans the 
virtual channel, control unit, and device blocks 
in the same manner as for a SIO and reflects the 
proper status and condition to the virtual 
machine. In some cases (TIO) , the status of the 
addressed devices is altered after the status is 
presented. 

If the operation active on the virtual device 
is actually in progress in the real equipment, 
the simulation of a HIO or HDV is somewhat more 
involved, since it requires the actual execution 
of the instruction. In this case, the active 
operation is halted and the resultant condition 
code/status is returned to the user. 



XiliM§l Channel^to^Channel Adapter 



The virtual channel-to-channel adapter (CTCA) 
simulates data transfer and control 
communication between two selector channels, 
either on two distinct processors or two 
channels on a single processor. Data transfer 
is accomplished via synchronized complementary 
I/O commands (for example, read/write, 
write/read) issued to both parts of the CTCA. 
Each part of the CTCA is identical and the 
operation of the unit is completely symmetrical. 
The CTCA occupies an entire control unit slot on 
each of the two channels attached. The 
low-order four bits of the unit address (device 
address) are ignored completely and are not 
available for use. 



The VM/370 control program 
virtual CTCA includes all status 
and interruption logic necessary t 
operation of the real CTCA. D 
command byte exchange, sense dat 
data presentation for the vir 
accomplished via storage- to-stora 
(MVCL, etc.). No real I/O operati 
paging I/O) nor I/O interruptions 
Unit errors or control errors cann 



support for 
, sense data, 
o simulate the 
ata transfer, 
a, and status 
tual CTCA is 
ge operations 
ons (excluding 
are involved, 
ot occur. 



The CCH translator, EMKCCWTR, is called by the 
virtual machine I/O executive program (DMKVIOEX) 
when an I/O task block has been created and a 
list of virtual CCHs associated with a user's 
SIO request must be translated into real CCWs. 

When the I/O operation from a self-modifying 
channel program is completed, DMKUMTIS is called 
by DMKIOS. When retranslation of OS ISAM CCHs 
is required, the self-modifying channel program 
checking portion of DMKCCWTE calls DMKISMTB. 

DMKCCHTR operates in two phases: 

• A scan and a translate phase. 

• A TIC-scan phase. 

A self-modifying channel program checking 
function is also included. 



The scan and 
virtual CCW list 
additional doubl 
(for example, 
control words a 
the data area sp 
'♦Oge-byte page b 
includes an IDA 



translate phase analyzes the 
Some channel commands require 
ewords for control information 
seek addresses) . Additional 
re also allocated (in pairs) if 
ecified by a virtual CCH crosses 
oundaries, or if the virtual CCW 
(indirect data address) flag. 



Space is obtained from DMKFREE for the real 
CCH list, and the translation phase then 
translates the virtual CCS list into a real CCH 
list. TIC commands that cannot be immediately 
translated are flagged for later processing by 
the TIC-scan phase. A READ or HRITE command 
that specifies that data cross UOgs-byte 
boundaries is revised to include an IDA flag 
that points to an indirect data address list 
(IDAL) and a pair of words for each UOge-byte 
page, in which each word handles a data transfer 
of 20U8 bytes (or less) . The real CCH is flagged 
as having a CP-generated IDA. DMKPTHAN is 
called (via the TRANS macro) to lock each 
4096-byte page. 

If the real CCH string does not fit in the 
allocated free storage block, a new block is 
obtained. The old block is transferred and 
adjusted before being released. The translation 
continues with the new block. The process is 
repeated, as needed, to contain the real CCH 
string. 

Virtual CCHs having an IDA flag set are 
converted to user translated addresses for each 
IDAH (indirect data address word) in the virtual 
IDAL. DMKPTRAN is called for each IDAH is. The 
CCH is flagged as having a user (but not CP) 
generated IDA. 



The TIC-scan phase scans 
for flagged (untranslated) 
creates a new virtual 
untranslated commands. S 
processing is then repeated 
CCHs are translated, the 
lOBLOK task block is replac 
(that is, a pointer to the r 
by DMKCCHTR) , and DMKCCHTR 
DMKVIOEX. The user protecti 



the real CCH list 

TIC commands and 

CCH list for the 

can-translate phase 

Hhen all virtual 

virtual CAH in the 

ed by the real CAH 

eal CCH list created 

returns control to 
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CS ISAH Handling b^ DMKISMTB 



Because many of the OS PCP, MFT, and MVT ISAM 
channel prograns are self-nodif ying, special 
handling is required by the VIJ/370 control 
program to allow virtual machines to use this 
access method. The particular CCWs that require 
special handling have the following general 
format: 



HEADDATA C+7 10 bytes 
TIC to E 




SEEK: SEEK head on D 
SEARCH on D+2 



The CCW at A reads 10 bytes of data. The 
tenth byte forms the command code of the CCW at 
E. In addition, the data read in makes up the 
seek and search arguments for the CCWs at E and 
E. After the CCW string is translated by the 
VH/370 control program, it usually is in the 
following format: 



READDATA C+7 10 bytes 
1 1 1_ 

TIC to 3 
SEEK: SEEK head on 6 



SEARCH on D+2 



I- 



etc. 
I — 
I 



I 
ISAH word 



To accomplish an efficient and non-timing 
dependent translated operation for OS ISAM, the 
virtual CCW string is modified in the following 
manner. 

DHKISMTR is called by DHKCCWTB if, during 
normal translation, a CCW of the type at 1 is 
encountered. The scan program locates the TIC 
at 2 by searching the translated CCW strings. 
The TIC at 2 locates the SEEK at 3. 

The virtual address of the virtual SEEK CCW 
at E is located from the RCWTASK header. Seven 
doublewords of free storage are obtained and the 
address of the block is saved in the ISAH 
control word at 5. The seven doublewords are 
used to save the following information from the 
translated CCW strings: 



7 


Addr 


ess of Read | Address of TIC | 




at 1 


1 at 2 1 


8 


Onused | Unused | 


9 




Data area for READ at 1 | 


10 




SEEK HEAD on 9 | 


11 




TIC to 4 1 


12 




Image of READ CCW at 1 | 


13 




Image of TIC CCW at 2 | 



The translated read CCW (at 1) is moved to 
the save block at 12. The TIC CCW (at 2) is 
moved to the save block at 13, and the addresses 
of 1 and 2 are saved at 7. The read CCW at 1 is 
modified to point to a 10-byte data area at 8+7 
in the save block. The seek head CCW at 3 is 
copied into the save block at 10, and the seek 
address is modified to point to the data area at 
9. At 11, a TIC CCW is built to rejoin the 
translated CCW string at 4. The search at 4 (or 
any subsequent search referencing D+2) is 
modified to point to 9+2. The completed CCW 
string has the following format: 



1 
2 
3 
4 
5 
6 
7 
8 
9 
10 
11 



Readdata 8+7 



10 Bytes 



TIC to 10 




1. 

Dnused 
I 



I — 

I 



— I 
Data Area for Readdata 



I Seek Head on 9 



TIC to 4 



The interruption return address in the lOBLOK 
is set to DHKONTIS. DMKOWTIS restores the CCWs 
to their original format from the seven 
doubleword extensions, moves the 10 bytes of 
data from 8+7 into virtual storage (at C+7) , and 
releases the block. Normal I/O handling is 
resumed by DMKVIO and DMKDMT. 



I/O COMPONEMT STATES 



The I/O components represented by the control 
blocks described in "Real I/O Control Blocks" 
are in one of four states and the state is 
indicated by the flag bits in the block status 
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byte. If the component is not disabled, it is 
either busy, scheduled, or available. 

If the disabled bit is on, the component has 
been taken offline by the operator or the system 
and is at least temporarily unavailable. A 
request to use a disabled component causes the 
lOBLOK to be stacked with an indication of 
condition code 3 on the SIO and the real SIO is 
not performed. 

An I/O unit is busy if it is transferring 
data (in the case of a channel or control unit) , 
or if it is in physical motion (in the case of a 
device). If an I/O unit is busy, the lOBLOK for 
the request is queued from the control block 
representing that I/O unit. 

An I/O unit is scheduled if it is not busy 
but will become busy after a higher level 
component in the subchannel path becomes 
available and an operation is started. For 
example, if a request is made to read from a 
tape drive and the drive and control unit are 
available, but the channel is busy, the lOBLOK 
for that request is queued from the RCHBLOK for 
the busy channel and the RCUBLOK and SDEVBLOK of 
the drive and control unit are marked as 
scheduled. Future requests to that drive are 
queued from the RDEVBLOK for the scheduled 
device. When the channel completes the 
operation, the next pending operation is 
dequeued and started; the scheduled control unit 
and device are then marked as busy. 

The lOBLOKs for various I/O requests indicate 
the status of that request by a combination of 
the status bits in the lOBLOK and the queue in 
which the block resides. In general, an lOBLOK 
is queued from the control block of the highest 
level I/O unit (taken from device up to channel) 
in the subchannel path that is not available. 
Once the I/O operation is started, the lOBLOK is 
chained from the active lOBLOK pointer 

(BDEVAIOB) in the real device control block. 
Flags in the lOBLOK status fields may also 
indicate that a unit check has occurred, that a 
sense is in progress, or that a fatal I/O error 

(unrecoverable) has been recognized by error 
recovery procedures. After I/O control releases 
control of the lOBLOK, it is stacked on the 
queue of lOBLOKS and CPEXBLOKs anchored at 
DMKDSPRQ in the dispatcher and control is passed 
to the second level interruption handler whose 
address is stored in lOBIRA. 



I/O INTERRUPTIONS 



I/O interruptions are either synchronous or 
asynchronous. Asynchronous interruptions 
indicate the change in status of an I/O unit 
from the not ready to ready state or busy to not 
busy state. In either case, if the affected 
component has any pending requests queued from 
its control block, they are restarted and 
whether or not the given interrupt is processed 
any further depends upon the status of the 
interrupting component. Channel available and 
control unit end type interruptions restart the 
interrupting component. An asynchronous device 
end is passed to the user if the device is 
dedicated; otherwise, the device is restarted. 



An interruption is considered to be 
synchronous if the interrupting device has a 
nonzero pointer to an active lOBIOK. In this 
case, the following processing occurs: 



If a unit check has occurred, a sense is 
scheduled, and when the sense is completed, 
the appropriate ERP is called. 



If an ERP is currently in control of the task 
(indicated by a flag in the lOBLOK) , return 
the lOBLOK to the appropriate ERP. 



If the operation is incomplete (for example, 
channel end is received without device end) , 
the lOBLOK is copied and the copy is stacked 
but the original lOBLOK remains attached to 
RDEVAIOB to receive the final interrupt; 
then, the control unit and the channel is 
restarted. 



• If the operation is complete (that is, the 
device is available) , the lOBLOK is detached 
from the device and stacked, and the device, 
control unit and channel are restarted. 

The restart operation usually dequeues the 
next lOBLOK that is queued to the restarted 
component and queues it to the next higher 
component in the subchannel path. When the 
channel level is reached, a SIO is issued and 
exit is taken to the dispatcher after handling 
any non zero condition codes as previously 
described. 



VIRTUAL I/O INTERRUPTIONS 



Mhen an I/O interruption is received, the lOBLOK 
is stacked for dispatching and control is passed 
to the address specified in the lOBIRA 
(interrupt return address) field. For 
operations requested by DMKVIOEX, the return 
address is DMKVIOIN (virtual interrupt return 
address). When DMKVIOIN receives control from 
the dispatcher, it loads the virtual address of 
the unit with which the interruption is 
associated from the lOBlOK and calls DMKSCNVU to 
locate the virtual device control blocks. 
DMKVIOIN then tests the lOBLOK status field to 
determine the cause for the interruption. If 
the block has been unstacked because of an 
interruption, the field is zero. If the 
operation was not started, it contains the 
condition code from the real SIO. 

Note: The VIRA should not see a real condition 
code 2 as the result of a SIO, since channel 
busy conditions are detected and reflected 
before any real I/O operation is attempted. 

A condition code of 3 is reflected virtual 

machine and exit is taken to the to the 

dispatcher. For a condition code of 1, the CSW 
status field in the lOBLOK is examined to 

determine the cause for the CSW stored 

condition. The status is reflected to the 

virtual machine and various components of the 
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virtual configuration may be freed, if the 
status so indicates. For exaaple, if the CSW 
status indicated both channel end and device 
end, the operation was inDediate and has 
completed. Thus, the CCi string (real) may be 
released and all virtual components narked 
available. 



To noveble head DiSD devices that are queued 
in order of seek address. 

That release the affected component after 
initiation (SEEKS and other control commands) 
which are queued last-in-first-out (LIFO) 
from the control block. 



The CSH status returned for a virtual 
interruption must be tested in the same manner, 
with the additional requirement that the status 
be saved in the affected virtual I/O control 
blocks and that the CSH be saved in the VDEVCSH 
field for the device causing the interruption. 
If the unit check bit is on in the status field, 
the sense information saved in the associated 
lOERBLCK (pointed to by the lOELOK) must be 
retained so that a sense initiated by the 
virtual machine receives the proper 
information. 



Regardless of whether or not the operation 
has been successfully started, the caller 
requesting the I/O operation receives control 
from DMKIOS. If a free path to the device is 
found, the unit address is constructed and an 
SIO is issued. If the resulting condition code 
is zero, control is returned to the caller; 
otherwise, the code is stored in the requestor's 
lOBlOK along with any pertinent CSW status, the 
lOBLOK is stacked, any components that become 
available are restarted, and control is returned 
to the caller. 



In any case, when an interruption is received 
for a virtual device, a bit in the interruption 
mask, VCUDVIMT, for the device's control unit is 
set to 1. The bit that is set is the one 
corresponding to the relative address of the 
interrupting device on the control unit. For 
example, if device 235 interrupts, the fifth bit 
in the VCODVINT mask in the VCOBLOK for control 
unit 30 on channel 2 is flagged. Similarly, the 
bit in the VCHCUINT in the affected VCHBLOK is 
also set; in this case, bit 3 in VCHBLOK for 
channel 2. If the interruption is a channel 
class interrupt (PCI or CE) , the address of the 
interrupting unit (235) is stored in the 
VCHCEDEV field in the VCHBLOK. The final 
interruption flag is set in the VMPEND field in 
the VMBLOK for the interrupted virtual machine; 
the bit set corresponds to the address of the 
interrupting channel. The next time, the 
virtual machine is dispatched and becomes 
enabled for I/O. 



SCHEDULING I/O REQUESTS 



A task that requests an I/O operation must 
specify the device on which the operation is to 
take place and must provide an lOBLOK that 
describes the operation. Upon entry to DMKIOS, 
Register 10 must point to the lOBLOK. The 
lOBLOK must contain at least a pointer to the 
channel program to be started in lOBCAH and the 
address to which the dispatcher is to pass 
control in lOBIRA. In addition, the flags and 
status fields should be set to zero. If the 
operation is a VM/370 control program function 
such as for spooling or paging, the entry point 
DHKIOSQR is called. If the requestor is the 
virtual I/O executive (DMKVIOEX) attempting to 
start a virtual machine operation, the entry 
point DMKIOSQV is called and some additional 
housekeeping is done. In either case, an 
attempt is made to find an available subchannel 
path from the device to its control unit and 
channel. If an I/O unit in the path is busy or 
scheduled, the lOBLOK for the request is queued 
to the control block of the I/O unit. 

Requests are usually queued 
first-in-first-out (FIFO) , except those 
requests: 



2£56red Seek 2S§^i£S[- Requests to start I/O on 
system devices are normally handled FIFO. 
However, requests to moveable head DASD devices 
are queued on the device in ascending order by 
seek address. This ordered seek queuing is 
performed to minimize intercylinder seek times 
and to improve the overall throughput of the I/O 
system. 

CP assumes that very few virtual machines 
perform chained SEEKs. Therefore, the first 
logical address represents the position of the 
arm upon completion of the I/O operation. 
Ordered SEEK queuing is based on the relocated 
real cylinder. DMKIOS uses the cylinder 
location supplied in lOBCYL for ordered SEEK 
queuing. This field is initialized by the 
calling CP routine for paging and spooling or by 
the ecu translator for virtual I/O. The CCW 
translator, DMKCCH, supplies the lOBCYL value in 
the following manner: 

• Reads the IPL record, relocates to virtual 
cylinder 

• Recalibrates, issues a real calibrate and 
then SEEKS to virtual cylinder 



Channel SEEKs, 
cylinder 



relocates 



to the virtual 



The lOBLOK queuing subroutine of DMKIOS 
recognizes that a request is being queued on a 
moveable head DASD device by means of the device 
class and type fields of RDEVBLOK. Instead of 
adding the lOBLOK to the end of the queue on the 
RDEVBLOK, the queuing routine sorts the block 
into the queue based on the cylinder number for 
the request. The cylinder number for any 
request to a DASD device is recorded in the 
field lOBCTL. The queue of lOBLOKs on a real 
device block is sorted in ascending order by 
seek address, unless the entire device is 
dedicated to a given user. In this case, DMKIOS 
does not automatically schedule the device, and 
no more than one request can be outstanding at 
any one tine. 

When an outstanding I/O request for a device 
has completed, DMKIOS attempts to restart the 
device by dequeuing and starting the next lOBLOK 
queued on the device. For non-DASD devices, 
this is the first lOBLOK queued. However, for 
moveable head DASD devices, the queued requests 
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are dequeued in either ascending or descending 
order, depending on the current position 
(recorded in EDBTCYL) and the direction of 
notion of the am. If the am is seeking up 
(that is, toward the higher cylinder numbers), 
the queue of lOBLOKs is scanned froa the first 
block toward the last until an lOBLOK is found 
with an lOBCYL value equal to or greater than 
the value in EDBVCYL, or until the end of the 
queue is reached. &t this point, the device is 
flagged as seeking down and the queue is scanned 
from last to first until an lOBLOK with an 
lOBCYL value equal to or less than EDEVCYL is 
found. When lOBLOK is found, it is dequeued and 
started. The direction of motion is indicated 
by an RDEVFLAG bit and the next request is 
dequeued in the down direction until the head of 
the queue is reached. 

Because the queue itself is a two-way chained 
list, no special handling for null or unity set 
lists is required, and the ordered seek 
algorithm returns to FIFO queuing. 

dedicated Channel Su££ort: One of the facilities 
of the VM/370 control program allows a virtual 
machine to control one or more channels on a 
dedicated basis. The channels are attached to 
the virtual machine by using the privileged 
ATTACH CHANNEL coBBand. A virtual machine can 
have one or more dedicated channels. In 
addition, channels can be split between virtual 
machines but a dedicated channel cannot be 
shared between two virtual machines. For 
instance, channel 1 could be dedicated to 
virtual machine A, and channel 2 could be 
dedicated to virtual machine B, or they could be 
both dedicated to virtual machine A or B. 



appropriate processing routine in DMKVCN is 
invoked. 



The Read Simulation Routine; Obtains a buffer 
for input data from free storage. The location 
of the buffer is set in the VCONCTL block. The 
DMKQCNRD routine is called to schedule and 
perform an actual read to the corresponding real 
device representing the user's virtual console. 
If SET LINEDIT OH is specified, the buffer data 
is edited and translated to EBCDIC. Hhen the 
read is completed, the data is moved to the 
specified user address obtained from the address 
portion of the virtual CCi). If command chaining 
is specified, processing returns to fetch and 
analyze the next CCN. If command chaining is 
not specified, the virtual CSW is constructed in 
the VDEVBLOK and an interrupt is flagged as 
pending in the VHBLOK. 

The Write Simulation Routine; Obtains a buffer 
for the construction of the output message from 
free storage. The virtual machine data is 
located from the virtual CCH address in the 
VCONCTL block and moved to the data buffer. The 
DMKQCNHT routine is called to write the data in 
the buffer and provide the necessary length, 
translation, and format functions. Control is 
received at the DMKVCN module upon completion of 
the writing. At this point, the virtual CC¥ is 
re-examined. If command chaining is specified, 
processing continues to fetch and analyze the 
next CCW. If command chaining is not specified, 
the virtual CSW is constructed in the VDEVBLOK 
and an interruption is flagged as pending in the 
VMBLOK. 



With a dedicated channel, all virtual machine 
device addresses must be identical to the real 
machine device addresses. For instance, virtual 
device 130 must be real device 130, and virtual 
device 132 must be real device 132. With 
dedicated channels, CP does not perform any 
virtual device address mapping. 

CP error recording and channel recovery 
procedures are still in effect for dedicated 
channels. The dedicated channel support can be 
used in conjunction with the virtual=real 
feature for any virtual machine that is 
occupying the virtual=real storage space. 



Jhs Control Simulation Routine; Is used for the 
NOP and ALARM operations. A NOP operation 
requires no data transfer or I/O operation. An 
ALARM operation has no equivalent on low speed 
teleprocessing equipment; thus, a message 
indicating the ALARM operation is constructed. 
DMKQCNWT is called to output the constructed 
message. If the command is chained, processing 
continues (for NOP or ALARM) to fetch the next 
CCW and analyze it. If command chaining is not 
specified and this is not the first CCW, a 
virtual CSW is constructed in the VDEVBLOK and 
an interruption is flagged as pending in the 
VMBLOK. If this is the first (and only) CCW, 
then a condition code of 1 is presented with 
channel end and device end in the virtual CSW. 



VIRTUAL CONSOLE SIMULATION 



DMKVCN receives 
I/O executive, D 
the device is a 
pending. A consc 
is obtained fro 
virtual device 
DMKLOG is ac 
interpretation 
sequence. The 
validity. If it 
issued to fetch 
moved to the VCC 



control from t 

MKVIO. When co 

vailable with 

le control bl 

m storage and 

control bloc 

cessed for 

of the virt 

user's CAW 

is valid, th 

the first use 

NCTL block for 



he virtual machine 
ntrol is received, 

no interruptions 
ock, VCONCTL, that 

chained from the 
k, VDEVBLOCK, by 
use during the 
ual console I/O 
is examined for 
e TRANS macro is 
r CCW. This CCW is 

analysis. 



The CCH is analyzed to determine if it is a 
read, a write, a control, a sense, a TIC, or an 
invalid operation. Based upon the analysis, the 



* ^i^tual Sense O£eration; Is similar to a 
control operation, because no actual I/O 
operation is performed. However, there is data 
transfer. The sense data from the VDEVBLOK is 
moved to the virtual storage location specified 
in the virtual CCW address. If the command is 
chained, processing continues to fetch the next 
CCW and analyze it. Otherwise, an interruption 
is flagged as pending in the VMBLOK. 



h IlliJJli TIC Operation: Fetches the virtual CCW 
addressed by the TIC address and analyzes the 
fetched CCW. If the fetched CCW is itself a 
TIC, or if the TIC is the first CCW, a channel 
program check condition is reflected to the 
virtual machine as an interruption or as a CSW 
stored condition, respectively. 
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jM§iiJ 0E§E3ii:On: Any other operation is Format of the 3270 Remote CC W 

considered invalid. Command reject status is 

posted in the virtual sense byte and the 

operation is terminated with unit check status r- — — 1 

presented in the virtual CSH. joperationl Address (Flags | TP Op | Count | 

I Code I Field | | Code | | 
I 1 byte I 3 bytes |1 byte| 1 byte | 2 bytes | 

REMOTE 3270 PROGRAMMING 7 8 31 32 39 HO 47 48 63 



For a basic understanding of CP processing of 
data relating to 3270 devices on binary 
synchronous lines, the information and 
terminology contained in IBM 3270 Isformaii5£ 
fiisElay Sjrsteffl Component Description, GA2 7-2749, 
and General Information - Binary Synchronous 
Communications, GA27-3004, is reguired. 



A digest of some of this essential 
information as it applies to VM/370 follows: 

• Text messages to and from remote terminals 
and printers can only be achieved when the 
bisync line is in text mode. 

• Text messages from a remote device can be the 
result of a general poll or specific poll 
operation to the related device or devices on 
the bisync line. This polling communication 
interface is accomplished by each 
line-connected control unit having unique 
specific poll and general poll recognition 
circuitry and by the CP terminal list of 
valid bisync lines and 3270 remote control 
unit addresses. This list, the terminal 
list, is generated by VM/370 system 
generation procedures employing TERMINAL and 
CLUSTER macros. For more details about 
terminal list generation, see the VM/370: 
Pl^BSina 3B^ System Generation Guide. 

• Reliability and dependability of line 
operation is achieved by the use of: a double 
addressing scheme, control characters with a 
rigid message protocol, and complex 
redundancy check characters appended to 
transmission messages. Examples of these 
techniques are shown in the formats that 
follow. 

• Every message (text or control) that is 
issued by CP may or may not be responded to 
by the remote station or control unit. The 
type of response (or absence of response) 
that CP receives depends on the teceptiveness 
of that device or control unit to the 
previously sent message (is the device ready 
and enabled and accurately addressed) and the 
content and correctness of the message (no 
line errors) . 

• To establish the relationship of the line of 
terminal response to a particular line or 
device write or read operation, CP employs an 
operation "tracking" facility (TP op code) 
imbedded in the issued CCHs. The function 
performed by the CP op code is described in 
the following CCW formats. 



w]ier e : 

Operation Code 

contains the hexadecimal value of the 
type of operation performed by the 
command. 

Valid operation codes are: 

X'OT WRITE 
X«02' READ 
X«03' NO-OP 
X«09« POLL 
X«23' SET MODE 
X«27« ENABLE 
X«2F» DISABLE 

Address Field 

Depending on CCW usage, this field may 
address an: 



Area 



Table 



The address of the data area (read 
buffer) located in the BSCBLOK at 
6SCREAD. 



The appropriate location in the table 
of data-link control characters 
provided in the module DMKGRP 
(Example: RVI, EOT, ENQ) . 

Response 

(BSCRESP) . The address location of 
the response message in the BSCBLOK. 

List 

The appropriate entry in terminal list 
(NICBLOKS) associated with the READ or 
WHITE operation. The entry for WRITE 
operation is at location BSCSEL. The 
entry for the READ operation is at 
location BSCPOLL. 

Note: To see how the key words AREA, TABLE, 
RESPONSE, and LIST are used, refer to the CCW 
sequences described in "I/O Program Routines for 
Bisync Lines and 3270 Remote Devices" in this 
section. 



Flags 



The flag bits turned on in the CCW: CC 
(channel commands) . CD (chained data) , 
SILI (suppress incorrect length 
indication) , skip (suppress data 
transfer to main storage) and PCI 
(program controlled interrupt) . 



TP Op Code 



An imbedded teleprocessing operation 
code in the CCWs used in bisync line 
communications. This code is 
inspected by the secondary 
interruption handler, DMKR6FIN, when 
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Count 



channel end and device end are 
received. The code is also used by 
the error processing module, DMKBSC. 
The code indicates the function being 
performed by the associated command. 
For use of the TP op codes, refer to 
the formatted CCHs that follow. 



Refers to the byte length of the CCH 
READ or HRITE operation. 



Write Initial 



I/O PROGRAMS FOR BISYNC LINES AND REMOTE 32705 



Before data communication to 
equipment can take place, 
teleprocessing line, the control 
device (s) must be enabled for 
This occurs when control 
recognizes a unique string 
transmitted on the line from CP 
line occurs in a similar manner, 
is the format of the CCWs 
enabling/disabling operation: 

Enable a Line 



remote 3270 

the remote 

unit and the 

communication. 

unit hardware 

of characters 

Disabling a 

The following 

used in the 



1 

lOpera- 
1 tion 


|Command| Address 
1 Code 1 

1 X'2F« 1 
1 1 
1 1 


Flags |TP OpICount 
ICode 1 


|Dis- 
lable 
ILine 
1 


CC, 1 01 1 1 
SILII 1 
1 1 


|Set 

IMode 

1 


1 X«23' 1 X»40' 
1 1 


CC, 1 01 1 1 
SILII 1 


1 Enable 
1 Line 


1 X'27' i 
1 1 


SILII 01 1 1 
1 1 




Write Contxnue 



lOpera- 
Ition 



IConmand I Address |Flags|TP Cp | Count j 
Code I I ICode | 



IWrite 
I text 

I Read 

|Re- 

Isponse 



01 



I Area 
I 



I CC, I 10 Ivari- 
I SILII I able 



02 I Response I SILI| 11 | 2 
I III 
I III 



In situations where the line is found to be 
in text mode, CP can issue a write reset 
sequence to put the bisync line in control mode. 
The following format illustrates the write reset 
ccw. 

Write Beset 



Disable a Line 



I Opera- ICommand I Address | Flags |TP Op | Count 



Ition I Code | 

I 

|Dis- I X«2F« I 

lable I I 

ILine | | 



ICode 



SILII 01 I 1 



After a line is enabled, communication can 

then be directed to a particular resource. The 

sequence of events (for a write disable and 
write continuous) is as follows: 

Send a data link control character on the 
line that places the control unit in control 
mode. This mode makes the control unit 
receptive to the specific address indicated by 
the second CCW. The third CCW is a read CCW 
that is needed for the acknowledgement response 
from the addressed control unit. Normally, in 
response, CP transmits a block of data to that 
device with a write text CCW. Acknowledgement 
of receipt of this data is contained by the read 
response (write continue) CCW. The format of 
the CCW write initial and write continue 
operation follows. 



lOpera- ICommand I Address | Flags |TP OpICount 

Ition I Code | | |Code | 

IWrite I 01 I Table | SILI| 09 | 1 

I EOT I I III 



In situations where the expected response 
from a remote station was not received or was 
invalid, the channel program may request the 
remote station to retransmit the response. The 
following write ENQ format shows this sequence. 
The remote station, upon receipt of the ENQ 
message, responds by transmitting the expected 
or valid response to the response area indicated 
by the second CCW. 



Write Eng 



Opera- 1 Command I Address | Flags jTP OpICount 
tion I Code | | |Code | 



IWrite I 01 

I ENQ I 

I 

I Read | 02 

I Be- I 

Isponse I 



I Table | CC, | 03 | 
I I SILII I 



I Response I SILI| 11 | 2 
I III 
I III 
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Read operations occur following a general 
poll or a specific poll for text messages. In a 
general poll sequence, CP transmits the general 
poll characters to the attached control unit on 
the bisync line. The control unit recognizes 
the polling request, then the list (referred to 
in the poll CCH) of enabled devices is scanned 
for any messages that are queued and ready for 
transmission. A positive acknowledgement (yes, 
I have a message to transmit) from any of the 
attached devices causes the next CCH to be 
skipped. The last CCH provides the read buffer 
and the count necessary for the incoming data 
block from the first remote station on the list 
that had a message queued for transmission. If, 
however, all remote stations respond with 
negative acknowledgement (no messages queued) or 
any station queried for a response fails to 
respond, then the channel program ends with the 
third CCH. The following read initial format 
shows the initial read CCH sequence. 



Read Initial 



1§S^ BS££§^ 



lOpera- 
Ition 

1 


Command 
Code 


Address | Flags |TP Op 
1 ICode 


Count 


IHrite 
1 EOT 


01 


Table 1 CC, 1 02 
1 SILII 


1 


IPoll 

1 
1 


09 


List 1 CC, 1 03 
1 SILI 1 


LIST 


li/o 

|No- 
lopera- 
Ition 
1 


03 


1 SILII 07 
1 1 
1 1 
1 1 


1 1 


(Read 
IText 


02 


Area | SILI| 10 
1 1 


162 



I Opera- 1 Command I Address | Flags |TP Op {Count 
I tion I Code j | |Code t 



IHrite I 01 
I NAK I 
I 



I Table | CC, | 06 | 1 
I I SILII I 



IRead 
IText 



I 02 



I Area 
I 



I SILII 10 I 162 
i I I 



Once CP message processing receives an 
error-free message from a remote station, CP 
sends an RVI control character to the remote 
station before processing the message. The 
remote station, upon recognition of the RVI 
character, halts the sending of additional 
queued data and responds with EOT (instead of 
the normal ACKO/ACKl response). The second CCH 
of the read interruption sequence processes the 
EOT response from the remote station as shown in 
the format below. 

^sad InterrujBtion 



I Opera- 1 Command I Address | Flags |TP Op | Count 
I tion I Cede | | |Code | 



IHrite | X»01« | Table | CC, | 06 | 

I RVI I I I SILII I 

IRead | X'02' |Response| SILI| 11 | 

|8e- I I III 

Isponsel I III 

L 



DATA FORMATS - BISYNC LINES AND REMOTE 3270 



After CP receives a message from a remote 
station, it nay reissue the initial read 
sequence to poll the remaining stations on the- 
list (assuming the list of enabled devices was 
not exhausted on the first pass of the initial 
read sequence). In the event that the list was 
exhausted on either the first or a subsequent 
initial read sequence, CP starts the poll delay, 
then allows the poll delay interval to expire 
before starting another read scan to the line 
(assuming CP has no higher line priority tasks 
to process) . If, in the process of receiving 
messages from remote stations, CP receives a 
message block that is invalid or its beginning 
or ending bisync control characters are not 
recognized, CP can elect to send a negative 
response back to the remote station. This 
negative response, the NAK control character, 
causes the remote station to retransmit the 
previous message to CP; this incoming message is 
processed by the second CCH of the read repeat 
sequence as shown in the format below. 



CP, in conjunction with remote 3270 support, 
uses the following formats for its text 
messages. For a detailed explanation of the 
abbreviations used, see the IBM 3270 Information 
fiisElaj Sjstem Component Description, Order No. 
GA27-27U9. 



Write Text Data Message Format 



Display commands use this message format for the 
placement or erasure of data anywhere on the 
display screen. The display commands that 
implement this function are: HHITE (X'FI'), 
ERASE/HRITE (X«F7«) and COPY (X«F7»)' 
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Write Data Strean 



Error Status Data Strean 



|STX|ESC|CMD|WCC|BSi| Buffer | Orders |SBA| 
I I I I I lAddress | & Text | | 

11111 2 variable 1 



-//- 



I Buffer I 
(Address | | 

2 1 



ETX| 

I 
I 



EEit^ 3ext Messages for the Cojgj^ Comnand 



The COPY command is 1 
display devices and c 
on the same control 
pressing a PF key 
function. CP respond 
the control unit t 
designated printer and 
requested the action 
unit to print the des 
the printer specified. 



imited to remote terminal 

oapatible printers located 

unit. Action starts by 

designated for the COPY 

s by sending a message to 

hat contains both the 

the display station that 

and directs the control 

ignated display buffer to 



The format of the COPY messages follow: 



Copy Data Stream - 3271 



Another form 
status message 
the DNKBGF 
following the 
contains sense 



of input message is the error 
Error status is processed by 

module. The characters, %R, 
SOH signify that this message 
and status data. The format of 



this message follows. 



|Index|SOH| % | R |STX|CD |Dev | Sense/ |BTX | 
(Byte I I I I |ADB|Adr|Status| i 
I I I I I I I (Bytes I I 



Test Reauest Data Stream 

The test request message, upon receipt from 
display terminals, is ignored by CP. The input 
inhibit mode that the display terminal enters 
upon pressing the test request key can be reset 
only if the terminal user presses the RESET key. 
The characters, %/, following SOH indicate the 
test request function. The format of this 
message follows. 



I Index I SOH I X I / I STX | Text | ETX 
I BYTE I I I I I I 



I STX I ESC I CMD |CCC| From | ETX | 
I I I X"F7' I lAddressI | 



£2EI Data Stream - 3275 



|STX|ESC| CMD |HCC|SBA|Buff |ETX| 
I I IX'FI'I I lAdr I I 
III II 1(40401 I 



1§3;^ IS^t. §.2^ Be^d Header Message Bormats 



ALLOCATION MANAGEMENT 



Real storage sp 
nucleus is made 
and the free 
(allocation spac 
data) in the dy 
to virtual mach 
satisfy paging 
requested by vir 
storage, are al 
area. 



ace above the Control Program 

up of the dynamic paging area 

storage area. Page frames 

e in real storage for a page of 

namic paging area are allocated 

ines and the control program to 

requests. Blocks of storage, 

tual machines and CP for working 

located from the free storage 



The following is representative of typical 
input-to-processor message formats. The format 
of a multiline read operation follows. 



Read Text Data Stream 



I Index |STX|CU |Dev | AID (Cursor |SBA|Buff | 
I Byte I |Adr|Adr| | Address | (Address | 



//- 



-//- 



( Text (SEA I Buff ( Text ( (ETX ( 
I I I Adr I I I I 



NORMAL PAGING REQUESTS 



If a program interruption is caused by a normal 
paging request (not from a virtual machine that 
is running in EC mode with translation on) , 
DMKPRGIN determines whether a segment or page 
translation error has occurred. If one of these 
errors occurred, an invalid address interruption 
code is set, and the interruption is reflected 
to the virtual machine supervisor. If a segment 
or page translation error has not occurred, the 
virtual machine's current PSH is updated from 
the program old PSH (PROPSWj) , the address of the 
current VMBLOK is placed in register 11, and 
DMKPTRAN is called to obtain the required page. 
When the paging operation is completed, control 
is returned to DMKDSPCH. NEXT storage, the 
management of real storage,, and the management 
of auxiliary storage (DASD paging devices) . 
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liEtual Storaae Manaaement 



When operating in the CP relocate environaent, 
each virtual machine's virtual storage space is 
described by two sets of tables. 

• One set, the segment and page tables, 
describes the location , and availability of 
any of the virtual machine's virtual pages 
that may be resident in real storage. 
Locations in these tables are indexable by 
virtual address, and the entries contain 
index values that reference corresponding 
real storage addresses. In addition, each 
table entry contains an indication of whether 
the corresponding virtual page is available 
to the user in real storage. These tables are 
referenced directly by the DAT feature when 
the virtual machine's program is running. 

• The second set of tables, called swap tables, 
is a map of the locations of the virtual 
machine's pages on the DASD devices that 
comprise the system's paging or auxiliary 
storage. The DASD addresses in these tables 
can either represent the source of a page of 
virtual storage (the location to which a page 
may be moved, if necessary) or a dummy 
address, indicating that the given page has 
not yet been referenced, and thus has a value 
of binary zeros. 

The swap tables are arranged in a format 
indexable by virtual storage address. In 
addition to containing the address of a page, 
each entry contains flags and status bytes 
that indicate such information as: 



process of translation, CP encounters a CCH 
that addresses a page that is not resident in 
real storage, a call is made to the paging 
manager to make the referenced page 
resident. 

While the requested page is being fetched, 
the requesting virtual machine is unable to 
continue execution; however, it may be possible 
to run other tasks in the system, and CP runs 
these while the needed page is being paged in. 
When the requested page is resident, the virtual 
machine can be run and is dispatched in its 
turn. 

In addition to demanding pages, virtual 
machines implicitly or explicitly release page 
frames of their virtual storage space. Part of 
the space may be explicitly released from both 
real and virtual storage via a DIAGNOSE 
instruction which indicates to the control 
program those page frames that are to be 
released. An entire virtual storage is released 
when a user IPLs a new operating system or logs 
off from the system. 

CP also has virtual storage associated with 
it. This space contains CP (some parts of which 
need not always be resident in real storage) , 
and virtual storage buffers for spooling and 
system directory operations. Although CP makes 
use of virtual storage space for its execution, 
it does not run in relocate mode. Thus, 
nonresident modules must be completely 
relocatable. 



• The storage protection keys to be assigned to 
the page when it is made resident. 

• Whether the page is currently on its on its 
way into or out of the system (in transit) , 
etc. 

These tables, are not referenced directly by 
the hardware as are the page and segment 
tables, but are used by paging management to 
locate user pages that are needed to execute 
a program. 

Virtual storage management is done by the 
technique known as demand paging. This means 
that a page of virtual storage is not 'paged in' 
from its DASD auxiliary storage area until it is 
needed. CP does not determine the pages 
required by a virtual machine before it 
executes. A demand for a page can be made 
either implicitly by the virtual machine or 
explicitly by CP. 

• An implicit demand for a page is made when a 
program attempts to reference a page that is 
not available in real main storage. This 
attempt causes a program interruption with 
the interruption code indicating a page or 
segment exception. Opon recognition of this 
condition, control is passed to the paging 
manager to obtain a page frame of real main 
storage and to bring in the desired page. 

• An explicit demand for a page can be made by 
CP (for example, in the course of translating 
a user's channel program). If, in the 



S§3i Storage Manaaement 



Real storage management allocates the system's 
page frames of real storage to satisfy the 
demands for virtual pages made by the system's 
virtual machines. Efficiency of allocation 
involves a trade-off; the paging manager uses 
only enough CPD time to ensure that: 

• The set of virtual storage pages that are 
resident represent those pages that are most 
likely to be used. 

• A sufficient number of cycles is available to 
execute virtual machine programs. 

Inefficiency in the first area causes a 
condition known as thrashing, which means that 
highly used pages are not allowed to remain 
resident long enough for useful work to be 
performed by or on them. Thrashing could be 
aggravated by the paging manager's page frame 
selection algorithm or by a dispatcher that 
attempts to run more tasks than the system can 
handle (the sum of their storage requirements 
exceeds the real paging space available in the 
system) . Thus, the paging manager must keep 
statistics on system and virtual machine paging 
activity and make these statistics available to 
the dispatcher to detect and prevent a potential 
thrashing condition. 

Inefficiency in the second area causes an 
unacceptable ratio of CP overhead to virtual 
machine program time, and in extreme case may 
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cause CP to use excessive CPU time. To 
understand how allocation is determined by CP, 
the way in which the inventory of real storage 
page frames is described to the system must be 
understood. 

Each page frame (4096-byte block) of real 
storage in the system is in one of two basic 
states: non-pageable or pageable. £ 
non-pageable page must remain resident in real 
storage for some finite period of time; thus, 
the page frame cannot be taken from its current 
owner to give it to someone else. Pages can be 
either permanently or temporarily non-pageable, 
depending on their use. 

Temporary loks usually occur when an I/O 
operation has been initiated that is moving data 
either to or from the page, and the page must be 
kept in real storage until the operation has 
completed. 



A page can also be 
if it contains an 
routine. 



temporarily non-pageable 
active nonresident CP 



In addition, a pag 
through use of the LOC 
this way are permanently 
explicitly unlocked by 
Pages that are usually 
non-pageable are those t 
portion of CP and t 
system's free storage 
blocks, I/O buffers, etc 
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The data area that pag 
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The freelist contains page frames that are 
immediately available for assignment to a 
requesting virtual machine. The virtual 
storage pages for which they were last used 
have either been released by their owners or 
they have been paged out to auxiliary 
storage. Bequests for real storage are always 
satisfied from the freelist. If the list has 
been depleted, the requestor waits until a 
new page frame becomes available as the 
result of a virtual storage release or a 
swap-out. 



The flushlist contains page frames that 
belong to those virtual machines that have 
been dropped from an active dispatching 
queue. The flushlst is the first place that 
the page frame selection routine looks to 
find a page to swap out or to assign to the 
freelist for a virtual machine that requires 
real storage space. 

The userlist contains the cortable entries 
for all other pageable pages in the system 
that belong to active virtual machines. 



Heauests for Real Storage Page Frames 



Bequests for real storage fall into two general 
categories; those that are requesting space for 
a page of virtual storage, and those (such as 
requests for CP work space) that need page 
frames for their own use. The former, more 
general case is discussed first, because the 
latter case is a subset of the first. 

The main page manager routine, DHKPTRAN, maps 
a request for a specific virtual storage address 
into a page frame of real storage. This 
requires that the virtual page be read in and 
the necessary tables be updated to show the 
proper status of the page frame. 

DHKPTRAH requires that the caller supply only 
the virtual address to be translated and any 
options that apply to the page to be located. 
Host calls are made via the TBANS macro, which 
sets up the necessary parameters, determines if 
the required paqe is resident, and calls 
DHKPTRAN if it is not. 

Hhen DMKPTBAN receives control, it first 
tests to see if the requested page is resident. 
This is done via the LBA instruction. If the 
page is resident, the routine locks the page if 
requested and exits to the caller. If the LBA 
indicates that the page is unavailable, it is 
still possible that the required page is 
resident. This occurs if the page frame has 
been placed on the freelist but has not been 
assigned to another virtual machine. When the 
page swap routine removes a page frame from a 
virtual machine, the unavailable bit is set in 
the corresponding page table entry; however, the 
real main storage index for the page frame is 
left unchanged. The page table entry is set to 
zero only when the corresponding page is 
actually assigned to another virtual machine. 
Thus, if DHKPTRAN finds the page unavailable, a 
further test is made on the page table entry to 
see if the page can be reclaimed. If the entry 
is not zero (aside from the unavailable bit) , 
the cortable entry for the page frame is removed 
from the freelist and the page frame is returned 
to the calling virtual machine. 

If the page table entry corresponding to the 
requested virtual page is zero, the required 
page is not in real storage and must be paged 
in. However, it is possible that the page is 
already on its way into main storage. This 
condition is indicated by a flag in the SHPTABLE 
entry for the virtual page. The DMKPAGIO routine 
maintains a queue of CPEXBLOKs to be dispatched 
when the pending page I/O is complete. The 
CPEXBLOK for the page in transit is located and 
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a new CPEXBLOK, representing the current 
request, is chained to it. 

Before exiting to wait for the paging 
operation to complete, DNKPTRiN checks to see if 
the deferred return (DEFER option) has been 
specified. If it has not, DMKPTHAN returns to 
the caller. If the DEFER option has been 
requested, DMKPTBAH exits to the dispatcher to 
wait for page I/O completion. When the requested 
page has been read into real storage, the list 
of CPEXBLOKs are unstacked fifo to satisfy all 
requests for the page that arrived while it was 
in transit. 

If a page is not in transit, a page frame of 
real storage must be allocated to fill the 
request. Before the allocation routine is 
called, a test is made to see if the caller 
wishes the return to his routine or to be 
delayed until after the requested page is 
available. If the DEFER option is not requested, 
DMKPTRAN returns to the caller after first 
building and stacking a CPEXBLOK that allows 
processing of the page request to be continued 
the next time the dispatcher (DHKDSPCH) is 
entered. 



DMKPTRAN next calls 
(DMKPTBFR) to obtain the 
available cortable entry, 
fifo list of the cortable 
frames that are inmedi 
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The freelist is replenished directly by users 
releasing virtual storage space. The page-out 
routine, DMKPGSPO, calls DMKPTRFT to place 
released page frames directly on the freelist. 
However, most replenishment is done via the page 
selection routine, select. Select is called by 
DMKPTBFR when the freelist count falls below the 
current minimum, or when a user page is 
reclaimed from the freelist. In either case, 
the selection algorithm attempts to find a page 
to swap to auxiliary storage. The highest 
priority candidates for a swap are those page 
frames whose cortable entries appear on the 
flushlst. Select attempts to take a flushed 
page frame before it takes a page frame from an 
active user. If such a page frame is found, it 
is checked to see if it has been changed since 
page-in. If not, it is placed in the freelist by 
DMKPTRFT; otherwise, it is scheduled for a 
swap-out by dequeueing the cortable entry from 
the flushlst, constructing a CPEXBLOK for 
dispatching after I/O completion, and exiting to 
DMKPAGIO by a GOTO. After the paging I/O is 
complete, the entry is placed on the freelist 
via a call to DMKPTRFT. 

If the flushlst is exhausted, select must 
take a page frame from an active user by 
examining the page frames represented by the 
entries in the userlist to locate the least 
recently used user page frame. This list is 



scanned from top to bottom, and each page frame 
is tested to see if its hardware referenced bits 
have been set. If a page frame has been 
referenced, its bits are reset and it is queued 
to the end of the userlist. This process is 
continued until either an unreferenced page 
frame is found or the list is exhausted. An 
unreferenced page frame is immediately selected. 
Bowever, if the list is exhausted, it is 
rescanned from the top. An unreferenced page 
frame is always found; in the worst case it is 
the first one tested on the userlist at initial 
entry. However, if this occurs, it indicates 
that the rate of entry to select is too low to 
permit differentiation between high- and 
low-usage page frames. 

Once a page frame has been selected and 
page-out is scheduled, control is returned to 
DMKPTRFR, which then passes control back to 
DMKPTRAN with the address of the cortable entry 
that was allocated. In most cases, page-outs are 
completely overlapped with page-ins. 
Approximately one half of all page-ins require a 
corresponding page-out. 

Once a page frame has been assigned, DMKPTRAN 
checks to see if a page-in is required. It 
usually is, and the DASD address of the virtual 
storage page must be obtained from the user's 
swap table entry and the I/O operation 
scheduled. However, if the page frame has not 
yet been referenced (as indicated by a DASD 
address of zero) , the real main storage page 
frame is set to zero. After the page-in 
operation has been queued, DMKPTRAN exits to the 
paging I/O scheduler (DMKPAGIO) which initiates 
the paging operation and exits to the dispatcher 
(DMKDSPCH) to await the interruption. 

After the required page has been read in or 
the page frame has been set to zero, DMKPTRAN 
queues the appropriate cortable entry to the end 
of the userlist, where it eventually is 
available for page selection. After developing 
the real storage address that corresponds to the 
requested virtual address, DMKPTRAN tests to see 
if the caller has requested that the page be 
locked. If LOCK is requested, the cortable 
entry is de-queued from the userlist and is not 
available for selection. A resident page can 
also be locked by removing it from the USERLIST. 
In addition, a LOCK count is maintained in the 
cortable entry so that when all locks have been 
satisfied the page frame can again be made 
available for paging. 

Some requests for main storage page frames 
are handled differently than general 
virtual-to-real storage mapping. In particular, 
it may be necessary for CP to obtain additional 
free storage for control blocks, I/O lists, 
buffers, etc. This is handled by the free 
storage manager, which makes a direct call to 
DMKPTBFR to obtain the needed storage. Usually 
this storage is immediately available (due to 
the page buffering technique previously 
described) . However, if the freelist is 
exhausted, the request for free storage is 
recognized as a high priority call and queued 
first on the list of those waiting for free page 
frames. 

The real storage manager (DMKPTE) accumulates 
paging statistics that the scheduler (DMKSCH) 
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MZllQ. liEtualfBeal OEtion: The VM/370 
virtual=real option involves the mapping in a 
one-for-one correspondence of a virtual machine 
storage area with an eguivalent real storage 
area. For instance, virtual page 1 is in real 
page frame 1 and virtual page 20 is in real page 
frame 20. Virtual page 0, is relocated at the 
end of the virtual storage space because it 
cannot occupy real page frame 0. 

The CP nucleus is altered at system 
generation to support the virtual=real option. 
Virtual machines with virtual=real (specially 
identified in the directory) can then log on and 
use the space reserved for this option. That 
space can be used by only one virtual machine at 
a time. Two virtual machines with the 
virtual=real capability cannot occupy the same 
space at the same time. 

The virtual=real option allows the virtual 
machine to bypass the control program's CCH 
translation. This is possible because I/O from 
a virtual machine occupying a virtual=real space 
contains a list of CCWs whose data addresses 
reflect the real storage addresses. The 
restriction in this situation is that the 
virtual machine does not perform I/O into page 
frame because this would perform a data 
transfer into real page frame 0. At the same 
time, it is assumed, and cannot be checked, that 
the virtual machine also does not attempt to do 
I/O beyond the bounds of its virtual addressing 
space. To do so would cause the destruction of 
either the CP nucleus, which resides beyond the 
virtual machine space, or another user's page. 

The bypassing of CCW translation for the 
virtual machine occupying the virtual=real space 
is only invoked after the virtual machine has 
executed the SET HOTRANS ON command. This 
command can only be issued by the virtual 
machine occupying the virtual=real space. The 
command initiates the bypass of CCH translation. 
This option is automatically turned off if the 
virtual machine performs an explicit reset or an 
implied reset by performing a virtual IPL. 
During virtual machine IPL, I/O must be 
performed into page frame 0. For this reason, 
normal virtual IPL simulation assumes CCW 
translation in effect to accomplish the full 
simulation. Once the IPL sequence has completed, 
CCH translation can be bypassed by issuing the 
SET NOTBANS ON command. 

Hhen the virtual machine demands a page frame 
through normal use of CP's page tables, the 
paging routine recognizes the virtual=real 
capability. It then assigns the virtual page to 
the equivalent real page frame and does not 



perform a paging operation, because all these 
pages are resident and are never swapped out. 

Note: The virtual machine running with 
virtual=real is still run in System/370 relocate 
mode. 

Virtual 270X lines and sense operations from 
the virtual machine do not use the virtual=real 
function. These invoke CCH translation for the 
virtual enable/disable lines and the transfer of 
the sense bytes. 

The UNLOCK command has a VIRT=REAL operand 
that essentially releases the virtual =real area 
for normal system paging use. Once the area has 
been released, it can only be reclaimed for 
additional virtual=real operations only by an 
IPL of the VM/370 system. The size of the 
virtual=real area is an installation 
specification that is part of the special 
nucleus generation procedure that is outlined in 
the VM^370: Plannincj and System Generation 
§llii§' The size of the area must be large 
enough to contain the entire addressing space of 
whatever virtual machine wishes to occupy that 
space. A virtual machine can use a smaller space 
than is provided but cannot use a larger space 
without regenerating the CP nucleus. 



DASD STORAGE MANAGEMENT 



Any virtual machine's virtual storage pages that 
have been referenced but are not resident in 
real storage must be kept in slots on the DASD 
paging device. DASD page space is assigned only 
when the page is selected for a page-out. 
Certain DASD pages may also be marked read-only. 
Thus, the DASD address slot initially associated 
with the page should be considered to be the 
source of the page only. If the page is changed 
after it has been read into real storage, a new 
slot must be obtained when it is paged out. 
Examples of read-only pages are those which 
contain portions of pageable saved systems and 
pages which are part of a system spool file. 
Slots can be reassigned when DMKPTRAN finds that 
it must swap a page out to a movable head DASD 
device. In this case, the old slot is released 
and the new slot is obtained. 



Slot Allocation 



If a new slot is required, DMKPGT is called to 
supply the address of an available slot. DMKPGT 
maintains a chain of cylinder allocation maps 
for each cylinder that has been assigned for 
either virtual storage or spool file paging. 
The allocation chains for spooling are kept 
separately from those used for paging so that 
they can be checkpointed in case of a system 
failure. However, in other respects they are the 
same. The allocation blocks for a given volume 
are chained from the RDEVBLOK for the device on 
which the volume is mounted. The chains of 
cylinder and slot allocation blocks are 
initialized by DMKCPI. Each block on an 
allocation chain represents one cylinder of 
space assigned to paging, and contains a bit map 
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indicating which slots have been allocated and 
which are available. Each block also has a 
pointer to the next allocation block on the 
chain, a cylinder number, and a record count. 
DMKPGT searches this list sequentially until an 
available slot is found; its DASD address is 
then determined and passed back to the calling 
routine. If DHKEGT cannot find a cylinder with a 
de-allocated slot, it enters the cylinder 
allocation phase. When an available cylinder is 
found, it constructs a page allocation block for 
this cylinder and allocates a page to the 
caller. 



Czlinder Allocation 



EMKPGT controls the paging and spooling I/O load 
of the system by allocating cylinders evenly 
across all available channels and devices. In 
order for a device to be considered available 
for the allocation of paging and spooling space: 

• Its volume serial number must appear in the 
system's owned list. 

• It must have at least one cylinder of 
temporary space marked as available in the 
cylinder allocation block which is located on 
cylinder 0, head 0, record 3. 



At system initialization time, cpinit reads 
in the allocation records for each volume and 
constructs the chains of device allocation 
blocks from which DMKPGT allocates the 
cylinders. In managing the cylinder allocation, 
EMKPGT takes three factors into consideration: 
device type, device address, and possible status 
as a preferred paging device. 

A request for a cylinder of virtual storage 
page space is satisfied by allocating space on a 
preferred paging device, provided that one 
exists on the system and that it has page space 
available. Preferred paging devices are 
specified by the installation at system 
generation time, and generally should be devices 
on which excessive seek times do not occur. A 
typical preferred paging device would be the IBM 
2305 Fixed Head Storage facility. If the 2305 
is assigned as a preferred device, it is 
possible to allocate some of its space for other 
high priority data files without excessively 
degrading paging. An example pf such usage 
would be for high activity read-only saved 
system pages that are not shared in real 
storage, and high activity system residence 
disks. 

It is also possible to designate moveable 
head DASD devices such as the 3330, 3310, 3350 
and 231U/2319 Direct Access Storage facilities 
as preferred paging devices. The module (s) so 
designated should not be required to seek 
outside of a relatively narrow cylinder band 
around the center of the paging areas. It is 
advisable to share the access arm of a moveable 
head preferred paging device with only the 
lowest usage data files. 

If one or more preferred devices are defined 
on the system, CP allocates all of the page 



space available space on these before it 
allocates on any other available owned volumes. 
Within the class of preferred devices, space is 
allocated first on the fastest devices, and 
these are spead out across channels and devices. 
Allocation on nonpreferred devices is spread out 
in the same manner. Cylinders for spooling 
space are not allocated from preferred devices. 
Allocation on a given device is done from the 
relative center of the volume outward, a 
cylinder at a time in a zig-zag fashion in an 
attempt to minimize seek times. 

When a request to allocate a slot for virtual 
storage paging is received by DMKPGTGT and the 
slot must be allocated on a moveable head 
(2314/2319, 3330, 33U0, or 3350) device, a 
cylinder and slot are selected in the following 
manner: 

1. CP tries to allocate a space on the 
cylinder at which the arm on the selected 
device is currently positioned. 

2. If slots are not available on the current 
cylinder, CP tries to allocate space on a 
cylinder for which paging I/O has been 
queued. 

3. If the above conditions cannot be met, CP 
allocates space as close to the center of 
the volume as is possible. 

Before DMKIOSQR is called, the queue of 
lOBLOKs currently scheduled on the device is 
examined. If paging I/O has already been 
scheduled on a device, the paging channel 
programs are slot sorted and chained together 
with TICS. 



PAGING I/O 



DMKPAGIO handles all input/output requests for 
virtual storage and spooling pages. DMKPAGIO 
constructs the necessary task blocks and channel 
programs, expands the compressed slot addresses, 
and maintains a queue of CPEXBIOKs for pages to 
be moved. Once the I/O scheduled by DMKPAGIO 
completes, it unchains the CPEXBLOKs that have 
been queued and calls DMKSTKCP to stack them for 
execution. DMKPAGIO is entered by a GOTO from: 

• DMKPTRAN to read and write virtual storage 
pages 

• DMKRPA to read and write virtual storage 
spool buffers 

In either case, all that needs to be passed 
to DMKPAGIO is the address of the cortable entry 
for the page that is to be moved, the address of 
a swptable entry for the slot, a read or write 
operation code, and the address of a CFEXBLOK 
that is to be stacked for dispatching after the 
I/O associated with the page has completed. 
DMKPAGIO obtains an lOBLOK and builds a channel 
program to do the necessary I/O, and uses the 
device code that is part of the page address to 
index into the system's owndlist and locate the 
real device to which the I/O request should be 
directed. If the device is capable of 
rotational position sensing, the required sector 
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is computed and a SET SECTOR command is inserted 
into the channel program. The real SIO 
supervisor DMKIOSQR is then called to schedule 
the operation on the proper device. 

When the interruption for the paging 
operation is processed by the primary I/O 
interruption handler, the lOBLOK that controls 
the operation is unstacked to the interruption 
return address, waitpage, in CMKPAGIO. waitpage 
then unchains the CPEXBLOKs that are gueued to 
DMKPAGQ, and then stacks the gueued CPEXBLOKs, 
by calls to DMKSTKCP, in the order in which they 
were received. The address of the real page 
frame is filed into the appropriate page table 
entry and the pointers denoting the ownership of 
the real page frame are filed into the cortable 
entry by the processing routines in DMKPTRAN. 
If a fatal I/O error occurred for the related 
page frame, the CPEXBLOKs associated with it are 
flagged, and the dispatcher, DMKSDPCH, sets a 
nonzero condition code when it activates the 
pending task. The error recovery followed 
depends on the operation being performed. Paging 
I/O errors associated with spooling operations 
are discussed in "DASD Errors During Spooling" 
in this section, while errors associated with 
virtual storage paging operations are discussed 
later in section "Virtual Storage Paging Error 
Recovery". 

DMKPAGIO maintains its own subpool of 
Preformatted paging lOBLOKs. As I/O operations 
complete, their lOBLOKs are added to a list of 
available blocks; as new blocks are needed, they 
are taken from this list. If the list is empty, 
CMKFREE is called to obtain storage for a new 
block. DMKPAGIO also periodically calculates 
system paging overhead. After 200 pages have 
been moved (read or written) , the elapsed time 
for the 200 page moves is computed, and the 
paging rate is calculated in page moves per 
second. The recent paging load, expressed as the 
percentage of time that more than one half of 
the system's pages were idle due to page-wait, 
is averaged with the previous load and 
re-projected as the expected load for the next 
interval. 



assigned to another virtual machine. All other 
uncorrectable paging errors are hard because 
they more drastically affect system 
performance. 



Ji*8P ll^OR RECOVERY: Hard paging errors occur on 
either I/O errors for page reads or upon of 
exhausting the system's spooling and paging 
space. Recovery attempted on hard errors depends 
upon the nature of the task for which the read 
was being done. If the operation was an attempt 
to place a page of a virtual machine's virtual 
storage into real storage, the operation of that 
particular virtual machine is terminated by 
setting the page frame in error to zero and 
placing the virtual machine in console function 
mode. The user and operator are informed of the 
condition, and the page frame causing the error 
is not de-allocated, thereby ensuring that it is 
not allocated to another user. 

The control program functions that call 
DNKPTRAN (such as spooling, pageable control 
program calls, and system directory management) 
have the option of reguesting that unrecoverable 
errors be returned to the caller. In this case, 
the CP task may attempt some recovery to keep 
the entire system from terminating (ABEND) . In 
general, every attempt is made to at least allow 
the operator to bring the system to orderly 
shut-down if continued operation is impossible. 

Proper installation planning should make the 
occurrence of a space exhaustion error an 
exception. An unusually heavy user load and a 
backed-up spooling file could cause this to 
happen. The operator is warned when 90X of the 
temporary (paging/spooling) space in the system 
is exhausted. He should take immediate steps to 
alleviate the shortage. Possible remedies that 
exist include preventing more users from logging 
on and reguesting users to stop output spooling 
operations. More drastic measures night include 
the purging of low priority spool files. If the 
system's paging space is completely exhausted, 
the operation of virtual machines progressively 
slows as more and more users have paging 
reguests that cannot be satisfied and operator 
intervention is reguired. 



VIRTOAl STORAGE PAGING ERROR HICOVERY 



Errors encountered during virtual storage (as 
opposed to spooling) paging operations can 
generally be classified as either soft or hard 
errors. Soft errors allow the system to continue 
operation without delay or degradation. Hard 
errors can cause noticeable effects such as the 
abnormal termination of user tasks (ABEND) and 
response degradation. Errors that are 
successfully retried or corrected are known only 
to the I/O supervisor and the I/O error retry 
and recording routines; they appear to the 
second level interruption handlers (such as 
waitpage) as if the original operation completed 
normally. 

SOFT ERROR RECOVERY: An I/O error that occurs on 
a page swap-out is considered to be a soft 
error. DMKPTRAN calls DMKPGTPG to assign a 
different DASD page slot and the page is 
re-gueued for output. The slot that caused the 
error is not de-allocated, and thus is not 



VIRTDAL RELOCATION 



CP provides the virtual machine the capability 
of using the DAT feature of the real 
SysteB/370. Programming simulation and hardware 
features are combined to allow usage of all of 
the available features in the real hardware, 
(that is, 2K or 4K pages, 61K or 1 M segments). 

For clarification, some term definitions 
follow: 

IiE§ii:l§SSi storage: The physical storage of 
the real CPO, in which CP resides. 

Second-level storage: The virtual storage 
available to any virtual machine, maintained by 
CP. 

3iji£^zlSS§l storage: The virtual storage space 
defined by the system operating in second-level 
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storage, under control of page and segment 
tables which reside in second-level storage. 

£S3§ 3fi^ segment tables: Logical mapping 
between first-level and second-level storage. 

YiliJSli ESSJi and segment tables: Logical 
sapping between second-level and third-level 
storage. 

Shadow Eage and segment tables: Logical mapping 
between first-level storage and third-level 
storage. 

A standard, nonrelocating virtual machine in 
CP is provided with a single control register, 
control register zero that can be used for: 

• Extended masking of external interruptions 

• Special interruption traps for SSH 

• Enabling of virtual block multiplexing 

A virtual machine that is allowed to use the 
extended control feature of System/370 is 
provided with a full complement of 16 control 
registers, allowing virtual monitor calls, PER, 
extended channel masking, and dynamic address 
translation. 

An extension to the normal virtual-machine 
VMBLOK is built at the time that an extended 
control virtual machine logs onto CP. This 
ECBLOK contains the 16 virtual control 
registers, 2 shadow control registers, and 
several words of information for maintenance of 
the shadow tables, virtual CPU timer, virtual 
TOD clock comparator, and virtual PER event 
data. The majority of the processing for 
virtual address translation is performed by the 
module DMKVAT, with additional routines in 
DMKPRG, DMKPRV, DMKDSP, DMKCDB, DMKLOG, DMKUSO, 
and DMKPTR. The simulation of the 
relocation-control instructions (that is, LCTL, 
STCTL, PTLB, RRB, and LARA) is performed by 
DMKPRV. These instructions, with the exception 
of LCTL and STCTL, are not available to virtual 
machines which are not allowed the extended 
control mode. 

When an extended control virtual machine is 
first active, it has only the real page and 
segment tables provided for it by CP and 
operates entirely in second-level storage. 
DHKPRV examines each PSN loaded via LFSH to 
determine when the virtual machine enters or 
leaves extended control or translate mode, 
setting the appropriate flag bits in the 
VHBLOK. Flag bits are also set whenever the 
virtual machine modifies control registers or 
1, the registers that control the dynamic 
address translation feature. DMKDSP also 
examines PSWs that are loaded as the result of 
interruptions to determine any changes in the 
virtual machine's operating mode. The virtual 
machine can load or store any of the control 
registers, enter or leave extended control mode, 
take interruptions, etc., without invoking the 
address translation feature. 

If the virtual machine, already in extended 
control mode, turns on the translate bit in the 
EC mode PSW, then the DMKVATMD routine is called 
to examine the virtual control registers and 
build the reguired shadow tables. (Shadow tables 
are required because the real DAT hardware is 



capable of only a first-level storage mapping.) 
DHKVATND examines virtual control registers 
and 1 to determine if they contain valid 
information for use in constructing the shadow 
tables. Control register zero specifies the 
size of the page and segment the virtual machine 
is using in the virtual page and segment tables. 
The shadow tables constructed by DMKTATNO are 
always in the same format as the virtual 
tables. 

The shadow segment table is constructed in 
first-level storage and initialized to indicate 
that all segments are unavailable. Flags are 
maintained in the VHBLOK to indicate that the 
shadow tables exist. DMKVATMD also constructs 
the shadow control registers and 1. Shadow 
control register contains the external 
interruption mask bits used by CP, mixed with 
the hardware controls and enabling bits from 
virtual control register 0. Shadow control 
register 1 contains the segment table origin 
address of the shadow segment table. 

When the virtual machine is operating in 
virtual translate mode, CP loads the shadow 
control registers into the real control 
registers and dispatches the user. The 
immediate result of attempting to execute an 
instruction is a segment exception, intercepted 
by DMKPRG and passed to DMKVATSX. DMKVATSX 
examines the virtual segment table in 
second- level storage. If the virtual segment is 
not available, the segment exception 
interruption is reflected to the virtual 
machine. If the virtual segment is marked 
available, then DMKVATSX: 

• Allocates one full segment of shadow page 
table, in the format specified by virtual 
control register 0. 

• Sets all of the page table entries to 
indicate page not in storage. 

• Harks the segment available in the shadow 
segment table. 

• Redispatches the virtual machine via DMKDSP. 

Once again, the immediate result is an 
interruption, which is a paging exception and 
control is passed to DMKVATPX. DMKVATPX 
references the virtual page table in 
second- level storage to determine if the virtual 
page is available. If the virtual page is not 
available, the paging interruption is reflected 
to the virtual machine. However, if the virtual 
page is marked in storage, the virtual page 
table entry determines which page of 
second- level storage is being referenced by the 
third-level storage address provided. DMKVATPX 
next determines if that page of second-level 
storage is resident in first-level storage at 
that time. If so, the appropriate entry in the 
shadow page table is filled in and marked in 
storage. If not, the reguired page is brought 
into first level storage via DHKPTRAN and the 
shadow page table filled in as above. 

As the virtual machine continues execution, 
more shadow tables are filled in or allocated as 
the third-level storage locations are 
referenced. Whenever a new segment is 
referenced, another segment of shadow page 
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The other situations which cause shadow table 
invalidation arise from the simulation of 
privileged instructions in DMKPHV. Flags are 
set in the VMBLOK whenever the virtual machine 
loads either control register or 1 , and DMKPBV 
calls DHKVATAB to perform whatever maintenance 
is required. When control register 1 is loaded 
by the virtual machine, EHKVATAB must re-copy 
the virtual segment table into first-level 
storage and invalidate the entire shadow segment 
table. When control register is loaded, 
DHKVATAB examines the relocation-architecture 
control bits to determine if they have changed, 
(such that the format of the virtual page and 
segment tables no longer matches that of the 
shadow tables). If the format has not changed, 
the shadow tables are left intact; otherwise, 
all of the shadow tables must be returned to 
free storage and another set, in the new format, 
must be allocated and initialized. The same 
actions can result from modifying the control 
registers via the CP console functions, in which 
case DMKVATAB is called from DMKCDB. The 
privileged operation, PTIB also causes the 
virtual segment tables to be re-copied and all 
of the shadow page tables to be invalidated 
because the shadow tables are the logical 
equivalent of the translation look-aside 
buffer. 



control registers are set valid, with the shadow 
segment table re-allocated at a minimum size and 
all segments marked unavailable. Flag bits are 
set in the VMBLOK to indicate that the shadow 
tables are artificially valid, and DMKVATSX 
reflects a translation specification exception 
to the virtual machine as soon as it is 
dispatched. While it is possible for the 
virtual machine to enter an interruption loop 
(if the new PSW is also a translate mode PSW) , 
the cited process prevents the occurrence of a 
disabled loop within CP, which would result if 
the virtual machine is never dispatched. 



FBEE STOBAGE HANAGEHENT 



DMKFHE is responsible for the management of free 
storage, and CP uses it to obtain free storage 
for I/O tasks, CCW strings, various I/O buffers, 
etc. It is used, in fact, for practically all 
such applications except real channel, control 
unit, and device blocks, and the cortable. 

Block sizes of 30 doublewords or less, 
constituting about 99 per cent of all calls for 
free storage, are grouped into 10 subpool sizes 
(3 doublewords each) , and are handled by LIFO 
(push-down stack) logic. Blocks of greater than 
30 doublewords are strung off a chained list in 
the classic manner. 

When subpools are exhausted, small size 
blocks are generally obtained from the first 
larger sized block at the end of available free 
storage. Large size blocks, on the other hand, 
are obtained from the high-numbered end of the 
last larger block. This procedure tends to keep 
the volatile small subpool blocks separated from 
the large blocks, some of which stay in storage 
for much longer periods of time; thus, undue 
fragmenting of available storage is avoided. 

DHKFSE initially starts without any subpool 
blocks. They are obtained from DHKFREE and 
returned to DNKFRET on a demand basis. 

The various cases of calls to DMKFBEE for 

obtaining free storage, or to DMKFHET for 

returning it, for subpool sizes and large sizes, 
are handled as follows: 
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Most error situations that occur in the 
virtual machine are handled by means of the 
extended program interruptions associated with 
the real address translation hardware. Whenever 
a virtual relocating machine loads control 
registers or 1 with an invalid value, DMKVAT 
releases all of the shadow tables exactly as if 
the hardware controls had changed. The shadow 



Calling DMKFREE for a Subpool 



Sub£Ool Available: If a call for a subpool is 
made and a block of the suitable size is 
available, the block found is detached from the 
chain, the chain patched to the next subpool 
block of the same size (if any) , and the given 
block returned to the caller. 
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Calling DMKFEEE for a larfle Block 



CP INITIALIZATION 



System initialization starts when the operator 
selects the DASD device address of CP system's 
residence volume (SYSRES) and presses the IPL 
button. The System/370 hardware reads 2U bytes 
from record 1 of cylinder on SYSRES into 
location of main storage. This record consists 
of an initial PSH and a channel program. The 
channel program reads the module DHKCKP into 
location X»800' and gives it control. DMKCKP 
checks location CPID in module DHKPSA. 



If a call to DHKFREE is made for a block larger 
than 30 doublewords, the chained list of free 
storage is searched for a block of equal or 
larger size. If an equal size block is found, it 
is detached from the chain and given to the 
caller. If at least one larger block is found 
the desired block size is split off the high 
numbered end of the last leirger block found, and 
given to the caller. If no equal or larger block 
is found, DMKPTRFR is called to obtain another 
page frame of storage from the dynamic paging 
area, and the above process is repeated (as 
necessary) to obtain the needed block. 



Calling DMKFHET for a Subfiool 



If a subpool block is given back via a call to 
DMKFHET, the block is attached to the 
appropriate subpool chain on a LIFO (push-down 
stack) basis, and return is made to the caller. 
If, however, the block was in a page within the 
dynamic paging area, the block is returned to 
the regular free storage chain instead. 



If CPID contains the value CPCP or WARM, 
DHKCKP saves the spool file control blocks, 
system log messages, accounting information, 
status of spool devices, spool hold queue 
blocks, and spool record allocation blocks and 
writes them on the warm start cylinders. If 
CPID contains the value CPCP, DMKCKP loads a 
disabled wait state code X«008«. 

If location CPID does not contain the value 
CPCP, DMKCKP now loads DMKSAV and passes control 
to it at entry point DMKSAVRS. DMKSAV reloads a 
page image copy of the CP nucleus into real 
storage starting at page 0. When DMKSAV is 
finished, control is transferred to DMKCPI. 
DMKCPI performs the main initialization 
function. This includes calling DMKWRM to 
retrieve the information stored on the warm 
start cylinder. This also includes calling 
DHKCKS to initialize the dynamic checkpoint 
cylinders and to checkpoint the current status 
of the spool file system. Vhen DHKCPL has 
finished, it passes control to DMKDSPCH. 
DMKDSPCH loads a wait state PSW to wait for 
work. 



Calling DMKFHET for a Larqe Block 



INITIALIZATION AND TERMINATION 



If a block larger than 30 doublewords is 
returned via DMKFHET, it is merged appropriately 
into the regular free storage chain. Then, 
unless the block was returned by DHKFRETH (see 
"Initialization") a check is made to see if the 
area given back (after all merging has been 
done) is a page frame within the dynamic paging 
area. If so, it is DMKPTHFT returns it to the 
dynamic paging area for subsequent use. 



l£ee Storage Pa^e Frame Allocation 



The number of page frames allocated to free 
storage depends upon the number of storage boxes 
upon which the VM/370 control program is 
running, and is initialized by DMKCPINT (3 pages 
for the first 256K and 1 
thereafter not including 
DMKFHETR is called by 
available blocks of storage into the regular 
free storage chain regardless of their size. 



page for each 64K 
V=H size if any) . 
DMKCPINT to merge 



AJ^^SSllifi^ a Virtual Machine to the System 



After CP has been initialized, DMKCPVEN enables 
the communication lines. Then an individual 
virtual machine is attached to the system using 
the following steps: 

1 . Terminal Identification 

When the CP receives the initial interrupt 
from a terminal on an enabled line 
(normally initiated by a user dialing in on 
a data-set) , the DMKCNSIN routine is 
entered. DMKCNSIN determines the terminal 
device type, stores this information in the 
terminal device block, writes the online 
message and puts the terminal line in a 
state to receive an attention 
interruption. 

2 . At t e n t ioj_f r om_0 se r 

After the online message has been typed at 
the user's terminal, and he has pressed the 
ATTENTION key, DMKCNSIN (the 
console-interruption routine) calls 
DMKBLDVN to build a skeleton vmblok for the 
user. At this time, the userid is 
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LOGONxxx, where xxx is the terminal real 
device address, and a flag is set to 
indicate that the user has not yet 
completed the LOGON process. 

Then DMKCNSIH calls DMKCFBBK, which types a 
single blank at the terninal, and issues a 
read to the terminal for the user to enter 
his first command (normally LOGON or 
DIAL) . 

First Command from User 
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DHKLOGON 



Ensures that the maximum number of 
virtual machines allowed on the system 
is not being exceeded. 

Obtains the userid from the command 
line, and checks for a possible password 
and other optional operands. 

Checks the userid and password (entered 
separately if not on the LOGON command 
line) against entries in CP's directory 
of users. 

Ensures that the user is not logged on 
at another terminal (an error 
condition) , or reconnects the user if he 
was running, in the disconnect mode. 

Obtains pertinent information on the 
user's virtual machine from the user 
machine block portion of the directory. 

Stores the correct userid (replacing the 
LOGONxxx userid used until now) , virtual 
storage size, and other vital 
information in the virtual machine's 
VMBLOK. 

Allocates and initializes segment, page, 
and swap tables (necessary for handling 
of the virtual machine's virtual 
storage) . 

Allocates an extended VHBLOK (ECBLOK) if 
the user's virtual machine has the 
ability to run in the extended control 
mode. 



Allocates and initializes virtual device 
blocks, control unit blocks, and channel 
blocks, using information from the user 
device blocks portion of the directory. 

Establishes links (ais feasible) to all 
DASD devices included in the directory, 
the accessibility of any disk being 
determined by the user access mode in 
the directory, and whether any other 
user(s) are presently linked to the 
disk, in read-mode and/or write-mode. 

Initializes all other virtual device 
blocks as appropriate, such as reader, 
punch, printer, and terminal. 



Maps all virtual 
devices. 



devices to 



real 



• Performs appropriate accounting. 

• Informs the user of the date and time of 
the most recent revision to the system 
log message (LOGHSG) , and of the 
presence of any outstanding spooled 
files in his virtual reader, printer, or 
punch. 

• Sends a ready message to the user with 
the date and time (and weekday) , and a 
message to the system operator 
indicating that the user has logged on. 



If the virtu 
or a named sys 
initialization w 
on the LOGON co 
named system is 
conclusion of 
when the LOGON 
user's terminal 
for the entry of 



al machine has a device address 
tem in the directory and the 
as not suppressed via an option 
mmand line, then that device or 

then loaded (via IPL) at the 

the LOGON process. Otherwise, 

functions are complete, the 

is placed in CP read mode ready 

his first desired command. 



character entered 

apparent storage 

allows the IPL 



Under the latter condition of no automatic 
IPL, the user can IPL an alternate nucleus by 
using the STOP option in the IPL command. This 
option causes the normal IPL procedure to halt 
execution prior to loading the initial PSH, and 
issues a DIAGNOSE Code 8 that places the user's 
terminal in CP read mode. A hexadecimal 
character entered in location X'08' changes the 
nucleus name. A hexadecimal 
in location X'09' changes the 
size. The BEGIN command 
procedure to continue. 



IZQ. S§£2!lfi9!lEati2Il 



Three commands alter the I/O configuration of a 

user's virtual machine after he has logged on. 

Two are user commands, while 

operator command, because it 

of real devices attached to 

ATTACH and DETACH commands 

DHKVDB and DEFINE in DNKDEF. 

scanner (DMKCFM) calls both 

after their format and privilege classes have 

been validated. These commands access the same 

control-block building subroutines in the module 

DHKVDS that DMKLOG, the LOGON processor, uses. 



the third a system 
affects the status 

the system. The 
are contained in 
The system command 

pageable modules 
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*iiichinjg a Heal Device: The system operator can 
dedicate any real device to a single virtual 
machine by issuing the ATTACH command. The 
device attached is available only to the given 
virtual machine, and all I/O requests to it are 
handled by CCH translation. If the device is a 
DASD, cylinder relocation does not occur when 
SEEK addresses or home addresses are referenced. 
The I/O supervisor does not queue operations on 
the device, nor does it automatically restart it 
or do ordered seek queueing. Nonsharable 
devices such as tape drives must be attached to 
a virtual machine to be accessed by the virtual 
machine. A virtual machine can also have a 
dedicated card read/punch or printer. However, 
this is usually not necessary because of the 
unit record spooling facilities of CP. Unit 
record input or output on a dedicated (attached) 
device is not spooled by CP. The unit attached 
may be given a different virtual address than 
its real address; however, the virtual machine 
may not already have a virtual device at the 
attached address. A real device cannot be 
attached (1) if it is currently dedicated to 
another virtual machine, (2) if it contains 
mini-disks that are in use by other virtual 
machines, or (3) if it is a system owned volume 
that is in use for spooling or paging. 



l^f inincj a Virt 
define a new v 
command that doe 
a corresponding 
be defined ar 
punches and prin 
channel -to -chann 
temporary disks, 
user can chang 
address whether 
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machine channel 
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default mode, se 
channel busy to 
the same channel 
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S^i Device: A system user can 
irtual device with the DEFINE 
s not require the dedication of 

real device. Devices that can 
e consoles, spooled readers, 
ters, dialable TP lines, virtual 
el adapters, pseudo timers, and 
With the DEFINE command, the 
e any existing virtual device 

it corresponds to a shared or 
evice or no real device unit. 

mmand also describe the virtual 

mode of operation, that is, 

or block multiplexer. The 

lector channel mode, reflects a 

any SIO operation attempted on 

path that has not completed the 
nel SIO operation. Block 
de allows the successful 
different devices on the same 

Channel 0, a byte-multiplexer 
ffected by the DEFINE command, 
nel with a channel-to-channel 

defaults to selector mode of 
rdless of the channel mode 
of the DEFINE command with the 
d generates a virtual machine 
, it should be invoked prior to 
ine IPL operation. 



Note: The channel mode selected has no bearing 
on the types of channels that are attached to 
the real system. 

Temporary disks are dynamically obtained 
cylinders of DASD storage space. They are 
available to the user for as long as they are 
part of his virtual machine configuration, but 
the data on them is destroyed after the user 
detaches the area. For all other purposes, 
however, they appear to be a standard disk. 



Detachina a Virtual Device: A virtual device can 
be'removed from a virtual machine configuration 
prior to logging off with the DETACH command. A 
user can detach any of his own devices, and the 
system operator can detach a real device from a 
virtual machine. If the operator detaches the 
device, the user is informed of the operator's 
action. A real device can be detached only if it 
is dedicated to a single virtual machine or is 
attached to the system and is not in use when 
the DETACH is issued. 



Disconnecting a Termijal qi liftual Baching 



A user may permanently or temporarily disconnect 
his terminal or virtual machine from the system 
by a console command, or the terminal or virtual 
machine may be forcibly disconnected by the 
operator. The system can also log off the 
virtual machine. In any case, the routines that 
handle the termination process are in the 
pageable module, DHKDSO. 

PEKHANENT DISCONNICT: The user may voluntarily 
remove his virtual machine from the system via 
the LOGOFF command. This command terminates all 
virtual machine operation, releases all storage 
occupied by control blocks and virtual storage 
pages, and disconnects the teleprocessing line 
connection to the user's terminal. If the user 
specifies the HOLD option with LOGOFF, all of 
the above occurs, except the teleprocessing line 
remains enabled. This option is especially 
useful for dialed connections that are reused 
immediately by another user. 

The virtual machine can be forced off the 
system by the system operator via the FORCE 
command. This has the same effect as a 
user-initiated logoff, except that the user is 
informed that the operator has logged off his 
machine. A virtual machine may also be logged 
off the system: 

• If the time for a read of a system password 
expires (28 seconds) . 

• If the user makes a connection to the system 
but does not logon within a given period. 

• If the virtual machine is running 
disconnected (without an active terminal) and 
the virtual machine attempts a terminal read 
or enters a disabled wait state. 



The DHKDSOLG and DHKDSOFF subroutines process 
the LOGOFF command. DMKDSP calls DHKDSOFF 
directly by DHKDSP to force the logoff of a 
disconnected user as previously described. 

TEMPORARY DISCONNECT: A user may temporarily 
disconnect his terminal from his virtual machine 
by using the DISCONN command, while allowing the 
virtual machine to continue to run. This 
command flags the virtual machine as being 
disconnected and releases the user's terminal 
and teleprocessing line. If the HOLD option was 
specified in the DISCONN command, CP allows the 
line to remain enabled, and another user can use 
the terminal to log on. The disconnected 
virtual machine continues to be dispatched until 
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it either attempts to execute a terminal read to 
the disconnected console or it enters a disabled 
wait state. At this time, the dispatcher 

(DKKDSF) calls the routine DMKUSOFF directly to 
force the machine out of the system. While the 
machine is disconnected from its virtual console 

(real terminal) any terminal output is lost; in 
addition, CP may apply a disconnected penalty to 
the machines scheduling priority, to bias the 
system in favor of interactive users. 

A user's virtual machine may also be 
disconnected by the system. If the disconnected 
user logs on to the system while his 
disconnected machine is still running he is 
reconnected and can continue to interact with 
the system in the usual manner. 



The DMKUSO 
command. 



subroutine processes the DISCOMN 



DBKCFM then calls the appropriate routine 
process the command. 



to 



After the command has been processed, control 
is returned to DMKCFM. There are three possible 
returns. (1) On a normal return, the input 
buffer is scanned to see if there are any more 
commands. If none exist, DMKCFB returns to the 
virtual machine (if entered via DIAGNOSE) or 
calls DMKQCNRD to read the next command from the 
terminal. (2) On a return plus H, the VMCFWAIT 
bit is turned off to allow the virtual machine 
to run. DMKFRET is called to return the input 
buffer storage. Then control returns to either 
the virtual machine, if entered via a DIAGNOSE 
or to DMKDSPCH if entered via the ATTENTION key. 
(3) On a return plus 8, the operation is the 
same as plus U except the VMCFHAIT bit is left 
on . 



DISPATCHING AND SCHEDULING 



CONSOLE FUNCTICBS 



EMKCFM analyzes CP commands and passes control 
to the appropriate routine to handle the 
command. DMKCFM can be entered by the ATTENTION 
key at the user's terminal or directly from a 
virtual machine. 

When a console interruption occurs by the 
ATTENTION key at the user's terminal, DMKIOSIN 
calls DMKCNSIN to handle the unsolicited 
interruption, then DMKCNSIN calls DMKCFMBK. 

DHKCFMBK first calls DMKFREE to obtain 
storage for an 18 doubleword input buffer. Next, 
DMKQCNMT is called to send the CP message to the 
terminal to inform the user that he has entered 
console function mode. DHKQCNBD is then called 
to read the command line entered at the 
console. 

DMKCFMEN is the entry point for commands 
coming directly from the virtual machine. 
DMKPRGIN enters at DMKCFMEN here when a DIAGNOSE 
instruction with a code of 8 is detected. The 
address of an 18 doubleword input buffer is 
passed in register 1; therefore, a read to the 
terminal is not needed. 

After either the read to the terminal or 
entry from the virtual machine, DMKSCNFD is 
called to find the command type. On return from 
DMKSCNFD, register 1 points to the start of the 
command and register contains the length of 
the command. The entered command is matched 
against a list of valid commands. The list 
contains a 16-byte entry for each command. Each 
entry contains 8 bytes for the name, 2 bytes for 
class mask, 2 bytes for an abbreviation count, 
and U bytes containing the routine address. If 
the entered command matches an entry in the 
list, it is then checked to ensure that a valid 
abbreviation for the command has been used. If 
this test is not successful, DMKSCN continues to 
scan the list for a valid command. Should the 
abbreviation be valid, a check is then made to 
determine if this user is of the proper class to 
use the command entered. If this is successful. 



The scheduler, DMKSCH, selects dispatchable 
virtual machines from the virtual machine 
population. The auxiliary routine that assists 
the scheduler and dispatcher is the request 
stack maintenance routine, DMKSTK. 



To make decisions on dispatching and 
scheduling, the control program places all 
virtual machines into various categories, and 
recognizes user machines as being in one of 
several states. The virtual machine categories 
either interactive or non- interactive virtual 
machine, are defined in the following way: 

• An interactive virtual machine is one whose 
use of the system is punctuated by regular 
and frequent terminal >I/0, and does not have 
long CPU execution times. A virtual machine 
becomes eligible to enter interactive status 
whenever a channel program for virtual 
console I/O has completed, or whenever I/O 
for a dedicated or dialed virtual 
telecommunications line has completed. 



A non-interactiv 
has violated an 
that has enter 
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stopped state) , 
PSi that is 
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e virtual machine is one that 

interactive criterion, or one 

ed an idle wait state by 

function mode (equivalent to 

or by loading a wait state 

not enabled for any busy 

chedules interactive users 

non-interactive users. 

users are subdivided into 

s. Normal non-interactive 

are scheduled by a priority 

below. A virtual machine is 

cute for a specified time 

it is placed in a list of 

hat are waiting. 



To give preference to certain classes of 
virtual machines, a priority scheduling scheme 
allows virtual machines to be scheduled with a 
priority class. The priority is a number 
assigned by the directory; however, the number 
may be altered by the system operator. 



88 



IBM VM/370: System Logic and Problem Determination Guide 



liEtli^l Uichine Dispatching Lists and States 



To efficiently manage the large inventory of 
potential virtual machines that are logged on to 
the system, CP defines several states that a 
virtual machine may occupy. The scheduler can 
move a virtual machine from one state to 
another; however, a virtual machine may exist in 
only one state at any given instant. CP can 
then make scheduling and dispatching decisions 
fcy looking only at the subset of virtual 
machines that are in the appropriate state. To 
do this search, it also maintains lists of 
virtual machines in certain executable states. 

A user's virtual machine may be in one of the 
following states: 

State Meaning 

1 Interactive and dispatchable (in queue 1, 

in dispatch list) 

2 Interactive and not dispatchable (in 

queue 1, not in dispatch list) 

3 Interactive and eligible for queue!, but 

queue 1 is full (waiting for queue 1, in 
eligible list) 

4 In wait state with terminal read or 

write active 

5 Non-interactive and dispatchable (in 

queue2, in dispatch list) 

6 Non-interactive and not dispatchable (in 

queue2, not in dispatch list) 

7 Non-interactive and eligible for gueue2, 

but queue2 is full (waiting for 
gueue2, in eligible list) 

8 Idle - waiting for asynchronous I/O or 

external interruption, or stopped (in 
console function mode) 

Entries on the dispatch list are the VMBLOKS 
for those virtual machines in states 1 and 5, 
and represent the virtual machines that can be 
run at any given time. The dispatch list is 
sorted by dispatching priority, which is the 
ratio of CPU time to wait time over the length 
of the current virtual machine task. & task is 
defined as that execution that takes place 
between terminal reads or entry to enabled wait 
(that is, movement from state U or 8 to state 1) 
and is re-projected for a virtual machine each 
time it is dropped from a queue. Virtual 
machines entering state 1 always have a priority 
of 0. 

The eligible list are virtual machines in 
states 3 and 7; these virtual machijies are 
potentially executable but due to the current 
load on the system they are not allowed to 
compete for the CPU. As soon as a virtual 
machine in the dispatch list is dropped from 
queue, the highest priority virtual machine (s) 
in the eligible list is added to the dispatch 
list. Conditions can arise where the virtual 
machine that is added to the DISPATCH list has a 
projected working set size that far exceeds the 
remaining system capacity. The eligible list 
has two components; a section composed of those 
virtual machines waiting for Q1 (interactive) 
and a section composed of those virtual machines 
waiting for Q2 (non-interactive) . Each section 
of the list is sorted by scheduling priority, 
which is determined at the time the virtual 
machine is added to the eligible list, as 
follows: 



1. The virtual machine's projected working set 
size, calculated the last time it was 
dropped from a queue, is expressed as a 
percentage of the amount of main storage 
available for paging. This percentage, 
usually between and 100, is multiplied by 
the paging bias factor (stored at 
DMKSCHPB) . 

2. The virtual machine's priority (the 
priority set by the directory or the class 
A SET PRIORITY command) is multiplied by 
the user bias factor (stored at DMKSCHUB) , 
and is added to the paging bias calculated 
in step 1. 

3. The sum of paging and user bias is divided 
by the sum of the bias factors to obtain a 
weighted average. 

4. A base priority is obtained by storing the 
TOD clock and using the high order word, 
which increments by 1 approximately once 
per second. This word is then modified by 
shifting it left or right based on the 
priority delay factor (stored at DMKSCHPD) . 
If DMKSCHPD is positive, it indicates a 
right shift, thereby increasing the delay 
interval of the base priority. A negative 
value indicates a left shift. 

5. The weighted average obtained in step 3 is 
then logically added to the adjusted base 
obtained in step 4. 

6. If the virtual machine is entering Q2 for 
the first time after being dropped from Q1, 
the interactive bias factor (stored at 
DMKSCHIB) is subtracted from the priority 
obtained in step 5. If the virtual machine 
is entering Q1, or if it was last dropped 
from Q2, the interactive bias is not 
applied. 

7. The result of steps 1 through 6 is the 
scheduling or eligible list priority, and 
is stored in the VMEPRIOR field of the 
VHBLOK. 



The 7BBL0K is then sorted into the 
appropriate section of the eligible list in 
ascending value of VMEPRIOR. The effects of the 
various biases and the delay factor are 
illustrated by the following examples. 

Example J 

Assume that two virtual machines are to be 
added to the eligible list for Q2. The 
paging bias factor is 1 , the user bias 
factor is 1, and the priority delay factor 
is 0. Virtual machine A has a projected 
working set size of 80 percent of available 
storage and a user priority of 50. Virtual 
machine B has a projected working set size 
of 20 percent of available storage and also 
has a user priority of 50. The biases are 
obtained as follows: 



Paging User Weighted 
User Bias_ Bias_ Bias 

"a" 80 X 1 ♦ 50~X 1 = 130/2"= 65 

B 20 X 1 + 50 X 1 = 70/2 = 35 
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If A is added to the eligible list at base 
time 0, its eligible list priority witll be 
65. If the priority delay factor is 0, B 
is added ahead of A provided that B is 
eligible for entry to the list within the 
next (65-35) 30 seconds. If the priority 
delay factor is set to +1, the base is 
incremented once every two seconds. 
Therefore, although the bias difference is 
still 30, the delay time is now 60 
seconds. 



Exam£le 2 

To force A to be given a weighted bias 
equal to B, a priority differential is 
calculated as follows: 

80 + A 20 + B 

2 2 

A = B - 60 

Therefore, for the biases to be equal, A 
must have a priority of 60 less than B. 
For example, if A is given a priority of 10 
and B is given a priority of 70, the biases 
would compute as follows: 



Paging User 
User _Bias_ _Bias_ 
A 80 X 1 + 10 X 1 
B 20 X 1 + 70 X 1 



Weighted 

Bias 

= 90/2 = 45 

= 90/2 = as 



Exam£le 3 

The large difference in priorities could be 
lessened by increasing the user bias 
factor. If the user bias factor is set to 
3 instead of 1, the calculated priority 
differential is as follows: 



2. The virtual machine priority value, in 
the directory, may be overridden, and 
is the means through which selected 
users obtain improved performance. 



The priority delay factor is the 
measure of the impact that the paging 
and user biases are to have. The 
greater the delay value, the greater 
is the maximum delay that can be 
experienced by a given user. 

The interactive bias factor is a tool 
that enhances command response to 
conversational commands that require 
disk I/O, and that may be partially 
executed in Q2. 
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Paging bias factor (DMKSCHPB) = 

User bias factor (DMKSCHDB) = 1 

Priority delay factor (DMKSCHPD) = 

Interactive bias factor (DMKSCHIB) = 



Thus, the basic VM/370 scheduler schedules 
virtual machines FIFO within user priority. 

Figure 17 is a graphic breakdown of the user 
states, showing the relationship between 
interactive and non-interactive states, in-gueue 
and not-in-queue states, and in-list and 
not-in-list states. 



80 + 3A 20 + 3B 

n a 

3 (B - A) =60 

A = B - 20 

How, A requires a priority of only 20 less 
then B to achieve parity. For example: 

Paging User Weighted 

User _Bias_ _Bias Bias 

A 80 X 1 + 30 X 3 = 170/4 = 42 

B 20 X 1 + 50 X 3 = 170/4 = 42 



I In-Queue | Not-in— Queue 

IDispatch I No I Eligible | No 
I List (List I List JList 



I Interactive] 

I 



1 



I 2 I 



I Non-Inter- | 
I active | 



5 I 6 I 7 I 8 
Figure 17. User Dispatching States 



The above examples illustrate the following 

general points about the use of the bias 

factors, the delay factor, and the user 
priority value: 

1. The paging and user bias factors are a 
measure of the relative importance of 
the bias value. A high user bias 
allows greater discrimination via the 
assigned priority; while a high paging 
bias makes storage requirement the 
primary scheduling parameter. 



Figure 18 shows the possible user— state changes 
and the reasons for them; any changes not 
described are not possible. 



Controlling of BultiErogramming 



To control the number of virtual machines 
allowed in queue, the scheduler monitors the 
paging activity of all virtual machines and of 
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Season for Status Change 

Pagewait, SIO-HAIT, or enabled 
wait for any busy channel 

Enabled wait for interactive 
terminal read or write 

Exceeds in-gueue time slice 

Same as 1 to 5 except that 
gueue 2 is full 

Wait without active I/O, dis- 
abled WAIT or hit ATTN 

Walt condition complete 

Walt completes, but in— gueue 
time slice exceeded 

Another user drops from gueuel 
and now there is room 

Terminal I/O completes while 
user is waiting 

Terminal I/O completes, but 
gueuel is full 

Terminal I/O completes while 
user is active in gueue2 

User puts up terminal read or 
write and enters wait 

Pagewalt, SIO-WAIT, or enabled 
wait for busy channel 

Dropped from gueue2 due to 
in-gueue time-slice end 

Walt without active I/O, dis- 
abled WAIT, or hit ATTN 

Walt condition completes 

Boom is found in gueue2 

Asynchronous I/O or external 
interruption or BEGIN 



Figure 18. User Status Changes 



the total system. A decision as to whether or 
not to move a potential virtual machine from the 
eligible to the dispatch list is based upon 
whether or not that its projected working set 
exceeds the system's remaining capacity. 
Individual virtual machine's working sets are 
calculated and projected at gueue drop time 
according to one of the following formulas: 

P=(A+P)/2 

If (LE-LA) r (P-A) < 
-- or — 
P=A 

If (LP-LA) r (P-A) > 

The working set is added to the current system 
load, which consists of the sum of the working 
sets for all virtual machines currently in a 
gueue. The sum is compared to the system 
maximum, which is egual to the number of 
dynamically assignable pages in the system. If 
the virtual machine's projected working set will 
not push the system load over tthe virtual 
machine maximum, he is placed in the gueue and 
added to the dlspatchable list. 



LA Last actual working set 

LP Last projected working set 

P Current projected working set 

The actual working set. A, is the smaller of the 
two values determlmined at gueue drop time by 
the following formula: 



A = 



E 



1=1 



PRl / H + Steals 



— or — 



where : 

N 

PR 

Steals 



Pages referenced 



Number of page reads while in gueue. 

Number of pages resident at the ith 
page read. 

Number of times page wait was entered 
because of a stolen page. 



where: 



Actual working set at gueue drop time 



The number of referenced pages is determined by 
scanning the virtual machine's page tables for 
software referenced bits. These bits are set by 
DHKPTRAN when the page is taken from the virtual 
machine by CP. Thus the actual working set is 
generally the average number of pages resident 
at each page read. However, this estimate is 
sensitive to the overall system paging activity 
for the following reasons: 



1. If there is no paging load on the system, 
there is one page read for each resident 
page, and no steals; the working set 
therefore tends to be egual to about one 
half of the resident page total. 

2. As paging activity Increases, and the 
working set location shifts, the working 
set tends to increase toward the average 
number of resident pages. 

3. If paging activity becomes excessive, the 
number of page steals Increases to the 
extent that the working set expands to the 
maximum of the total number of pages 
referenced while in the gueue. 



In summary, the scheduler selects the subset of 
logged-on virtual machines that are allowed to 
compete for the resources of the CPD, with the 
constraint that a new virtual machine is not 
added to the active subset if Its projected main 
storage requirement, added to that of the other 
active virtual machines, causes the current 
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The list of executable virtual machines in a 
queue is sorted by dispatching (as opposed to 
scheduling) priority. The dispatching priority 
is a running average of a given virtual 
machine's CPU time/wait -time ratio. Thus, 
virtual machines who are most li)cely to go into 
wait state, based on past performance, are 
dispatched ahead of those whose demands on the 
CPU are more extensive. This simple ratio 
priority is normally altered if a virtual 
machine is identified as compute bound by means 
of the fact that it has executed for at least 50 
ms . without entering the wait state. In this 
case, it is placed at the bottom of the 
dispatchable list. On the other hand, virtual 
machines identified as interactive by virtue of 
the frequency their requests for terminal I/O 
are placed at the top of the dispatchable list. 

DMKDSP also provides a fast dispatch path for 
virtual machines that have issued specific 
privileged instructions that are not handled by 
the Virtual Machine Assist feature. 

These virtual machines can be dispatched very 
rapidly because the virtual machine's program 
old PSH needs very little reconstruction to 
redispatch the virtual machine, hence use of 
full PSS reconstruction path is not required. 
The decision for using the fast dispatch path 
(DHKDSEA) is accomplished by the module that 
handles privileged operation, DMKPRV. 



Faygrgd Execution Options 



dispatchable list at its normal priority 
position. However, any active virtual machine 
represents either an explicit or implicit 
commitment of main storage. An explicit storage 
commitment can be specified by either the 
virtual=real option or the reserved page option. 
An implicit commitment exists if neither of 
these options are specified, and the scheduler 
recomputes the virtual machine's projected 
work-set at what it would normally have been at 
queue-drop time. Multiple virtual machines can 
have the basic favored execution option set. 
However, if their combined main storage 
requirements exceed the sytem's capacity, 
performance can suffer due to thrashing. 

The basic favored execution option removes 
the primary source of elapsed time stretch-out 
in a loaded time-sharing environment. However, 
if the favored task is highly compute bound and 
must compete for the CPU with many other tasks 
of the same type, an installation can define the 
CPU allocation to be made. In this case, the 
favored execution percentage option can be 
selected for one virtual machine. This option 
specifies that the selected virtual machine, in 
addition to remaining in queue, receives a given 
minimuD percentage of the total CPU time, if he 
can use it. The percentage is assured in the 
following manner: 



1. The in-queue time slice is multiplied by 
the requested percentage and added to the 
virtual machine's current total CPU time 
usage. 

2. When the favored virtual machine, is 
executable, it is always placed at the top 
of the dispatchable list until it has 
obtained his guarantee. 

3. If the virtual machine obtains its 
guarantee before the interval has elapsed, 
it is placed in the dispatchable list 
according to its caluculated dispatching 
priority. 

i». In any case, at the end of the in-queue 
time slice, the guarantee is recomputed as 
in step 1 and the process repeated. 



When the resources of the CPU (and real storage) 
are being allocated, the dispatching and 
scheduling functions are implemented in such a 
manner that options exist which allow an 
installation to designate that certain virtual 
machines are to receive preferential treatment. 



These options can impact the response time of 
interactive virtual machines and only one 
favored percentage virtual machine is allowed at 
any given time. 



The favored execution options allow an 
installation to modify the algorithms described 
above and force the system to devote more of its 
resources to a given virtual machine than would 
ordinarily be the case. The options provided 
are: 



The favored execution option. 
The favored execution percentage. 



The favored execution option means that the 
virtual machine so designated is never to be 
dropped from the active (in-queue) subset by the 
scheduler. Hhen the virtual machine is 
executable, it is to be placed in the 



Dispatching and Scheduling Support Boutines 



Most of the routines in the CP nucleus are 
reenterable and multiple control program or 
virtual machine tasks can make use of one 
routine at the same time. However, there are 
certain areas where requests for a resource must 
be serialized (as in paging) or delayed while 
previous requests are serviced (as in requests 
to schedule I/O) . 
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lh§. CP Reguest Stack 



The routine handling the request obtains a 
CPEXBLOK from free storage and stores the 
caller's registers in it; when the requested 
resource is free, the CPEXBLOK is stacked for 
the dispatcher via a call to the request stack 
manager (DHKSTKCP) . The dispatcher unstacks the 
block and exits to the requesting routine the 
next time it is entered. I/O requests are 
stacked in the same manner, except that the 
stacking vehicle is the lOBLOK, and return is 
passed to the address specified in the interrupt 
return address (lOBIBA) . In either case, it 
should be noted that the dispatcher always 
unstacks and gives control to any stacked 
lOBLOKs and CPEXBLOKs prior to dispatching a 
user. This guarantees that CP information 
needed by a virtual machine (such as page 
availability) is always as up-to-date as 
possible. 



compression except that trailing blanks are 
suppressed. The first two doublewords of each 
buffer contain linkage information described 
below, followed by the data and CCHs. 

Each spool logical record (card or print 
line) is stored as one CCW that moves data (READ 
or WRITE) , a TIC to the following CCW, and the 
full data record. Space is left at the end of 
each buffer so that a SENSE command can be 
inserted to force concurrent channel end and 
device end. For card punch channel programs 
there is an additional back chain field that 
points to the card previously punched so that 
error recovery for punch equipment checks can 
back up one card. The only exception to the 
format of READ/iRITE-TIC-Data is in buffers of 
files directed to the printer. In this case, 
immediate operation code CCWs (skips and spaces) 
are followed by the next CCW. 



File Format 



CP SPOOLING 



The spooling support in CP performs three 
functions. 

• Simulates the operation of the virtual unit 
record devices that are attached to each 
user's virtual machine configuration. The 
simulation is done in such a way that it 
appears to the program in the virtual machine 
that it is controlling a real unit record 
device. This support involves the 
interception and interpretation of virtual 
machine SIOs, the movement of data to and 
from the virtual machine's virtual storage 
space, and the reflection of the necessary 
interruption codes and ending conditions in 
PSW's, CSW's and sense bytes. This support 
is provided by the virtual spooling 
executive. 

• Operates the real unit record equipment, 
attached to the system, that transcribes 
virtual machine output spool files to the 
real printer or punch and input from the real 
card reader to DASD storage. This function 
is provided by the real spooling executive. 

• Provides an interface among the virtual 
machines, the system operator, and the 
spooling system so that the locatioh, format, 
priority and utilization of the systems 
spooling data and resources can be 
controlled. 



In addition to the data and CCWs contained in 
each spool buffer, the first two doublewords 
contain forward and backward links to the next 
and previous buffers in the file. This two-way 
linkage allows the file to be backspaced or 
restarted from any point at any time. Also, it 
means that if I/O errors are encountered while 
reading one buffer, the file is put in system 
hold status. If purged, all buffers except 
those in error are released. The two-way chain 
allows this control of the file while preventing 
fragmentation by allowing pages to be assigned 
and released individually regardless of their 
ownership. 

The first spool buffer of an output spool 
file contains a special data record called the 
tag record. This record immediately follows the 
two doublewords containing the forward and 
backward buffer linkage pointers. The tag record 
allows VM/370 users to specify information to be 
associated with spool files that they generate. 
The information is entered via the CP TAG 
command, although the tag record is not 
considered a spool file data record and is not 
printed or punched as part of the spool file. 
However, the contents may be interrogated via 
the CP TAG QDERY command. 

The format of the tag record is a NOP CCW, 
followed by a TIC to the next CCW and a 136 byte 
data field. To differentiate the tag record 
from an immediate NOP CCW (no TIC-data sequence) 
independently of the command code, the 'skip' 
bit (bit 35) in the CCW has the following 
convention: 



SPOOL DATA AND FILE FORMAT 



Data Format 



Bit 35 = for NOP CCW, TIC, data (tag 
record) 
= 1 for NOP CCW (immediate NOP 
command) 



The buffers that collect and write spool data 
are all one page (4096 bytes) in length, and 
contain the data to be transcribed and all CCWs 
necessary for operating the unit record devices 
that perform the transcription. The data is 
provided in the exact format required with no 



Each spool file in the system is controlled 
by a spool file control block (SFBLOK) that is 
resident in storage. While the file is open, 
these blocks are chained from the devices 
(either real or virtual) that are processing the 
file, and from device type file anchors after 



Section 1. Introduction 



93 



the file is closed. There is one file chain 
each for printer, reader^ and punch files. Each 
SFBLOK contains information about the file that 
describes its owner and originator (these can be 
different for transfered files) , the filename 
and filetype, and the class and number of copies 
for output files. All of these attributes can 
be examined and most can be changed by the 
file's owner or the system operator. The SFBLCK 
also contains information such as the starting 
and ending buffer addresses for the file, the 
record size, certain file status flags, etc. 



SPOOL BUFFER MAKAGEMENT 



5§§lZZi£tJlli Storage Management 



Buffers that temporarily store spool data on its 
way between DASD secondary storage and the 
user's virtual machine are allocated from a pool 
of virtual storage space that belongs to CP. 
The size of this pool varies with the real 
storage available to VM/370 (the storage 
specified at system generation or actual real 
storage, whichever is less) . Allocation is as 
follows: 



Storage_Size_Available 



Virtual Buffers 
Allocated 



256K to 655,360 bytes 128 

655,361 bytes to 1.1 megabytes 320 
over 1.1 megabytes 640 
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Real storage is not allocated for a spooling 
buffer until a virtual machine actually issues a 
SIO that attempts to transfer data between the 
buffer and the user's virtual storage space. At 
this time, a page of real storage is allocated 
to the buffer via the real storage paging 
manager. The buffer is locked in main storage 
(that is, is unavailable to be paged out) only 
for the amount of time necessary to transfer the 
data. After the data transfer is complete, the 
buffer is treated as a normal page of virtual 
storage, and can be selected to be paged out. 
This ensures that low usage spool files do not 
have buffers in real storage, while the buffers 
for high usage files should remain resident. 
The location of the spool buffer in real storage 
is transparent to the virtual spooling 
executive, because all references to the data 
therein are accomplished through the DAT feature 
of the CPU. 



£*sp S£ace Allocation 



While a spool buffer is inactive, it resides in 
real storage or on the paging device. After it 
has been filled with data from the virtual 
machine or a real input reader, it is written 
to a page of secondary DASD storage. The 
allocation of pages on the spooling disk (s) is 
managed by DMKPGT, which handles reguests for 
both pages of virtual storage and semi-permanent 
spool file residence. DHKPGT maintains separate 
allocation block chains for virtual storage and 
spooling pages. Each block contains control 
information and a bit map that allocates pages 
on a single cylinder. If none of the cylinders 
allocated have any available pages, DMKPGT 
enters its cylinder allocation routine. 

DHKPGT attempts to even out the spooling and 
paging I/O load by allocating cylinders across 
channels and devices. To minimize seek times on 
a given device, cylinders are allocated as close 
to the relative center of the spooling or paging 
area as possible. 



ElSisa Splice SujE£ort: All actual I/O for the 
page buffers on any device is controlled by the 
paging I/O executive DHKPAGIO. 



VIRTUAL SPOOLING MANAGER (DHKVSP) 



The two functions of the virtual spooling 
manager are (1) to simulate the operation of all 
spooled unit-record devices attached to the 
user's virtual machine, and (2) to read and 
write the spool files associated with those 
devices. The following virtual devices are 
supported for spooling, with the exceptions 
noted: 

IBM 2540 Card Header/Punch, except for punch 
feed read and column binary 



IBB 1403 Printer Models 
positions) 



2 and N1 (132 



IBM 3211 Printer (150 print positions) 

IBM 3505 Card Reader (except for mark senses 
reading) 

IBM 3525 Punch (except for the card read, 
print, and data protect features). 



The following consoles are supported for 
spooling when entered into the directory as the 
virtual system console: 

• IBM 1052 Printer-Keyboard, Model 7 (via the 
2150 Console) 

• IBM 3210 Console Printer-Keyboard, Models 1 
and 2 

• IBM 3215 Console Printer-Keyboard, Model 1 

All virtual printers must have the universal 
character s^t feature. No checking is done on 
the spooled printer data. However, any UCS 
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buffer commands issued by the virtual machine 
(load UCS buffer, block data checks, etc.) are 
ignored. It is up to the user and the 
installation to ensure that the output is 
directed to the proper real printer via use of 
the output CLASS feature described below. For 
the 3211 printer, forms control buffer (FCB) 
commands are accepted and simulated by means of 
a virtual FCB maintained by the executive. The 
use of the virtual FCB is the only way to 
simulate end-of-form conditions reflected by the 
detection of a channel 9 or 12 punch. When the 
spooled file is directed to a real 3211 or 1U03, 
the operator is responsible for loading the FCB 
or mounting the proper carriage tape. 



If any of the unsupported unit record 
features are reguired, the real device must be 
attached directly to the user's virtual 
machine. Thus, a 3505 reader could be a 
spooling input reader, but attached directly to 
a batch virtual machine when it is necessary to 
read mark sense cards. 



Output File Processing 



DMKVSP receives control from the virtual I/O 
executive, DHKVIO, when the user's machine 
issues a SIC to a spooled unit record device. 
EMKVIO does not pass control until it has been 
determined that the device is available (that 
is, non-busy and with no interruptions 
pending). DMKVSP first determines if the device 
is currently processing a file. If it is, 
processing continues. If this is the first 
command issued by the given device, a new output 
file must be opened. An open subroutine is 
called to build the control blocks necessary to 
manage the file and to obtain virtual storage 
and DASD buffer space. Control is then returned 
to DMKVSP. 

Before the first record of an output spool 
file is written, DMKVSP writes a tag record (NOP 
CCW, TIC, data seguence) and initializes the 
136-byte data area to blanks. It then sets the 
spool buffer displacement pointer to the first 
doubleword in the buffer beyond the tag record. 
DMSVSP then analyzes and interprets the channel 
program associated with the virtual machine's 
SIO. Each CCW is tested for validity of 
command, address, flags, alignment, protection, 
etc., and if the CCW is valid, the virtual 
machine's data is moved from his own virtual 
storage space to the buffer in the spooling 
virtual storage. When this buffer is full, it 
is written to a page of DASD secondary storage 
and a new buffer is obtained. The 
interpretation of the virtual machine's channel 
program continues until there are no more CCWs 
or until an error condition is detected that 
prohibits further processing. In either case, 
the device is marked as having the proper 
interruptions pending, a CSW is constructed, and 
DMKVSP exits to the main dispatcher. In contrast 
to nonspooled I/O, the virtual machine has 
remained in a pseudo-wait (lOWAIT) for the time 
it took to interpret the entire channel 
program. 



The output file can be logically closed by 
the virtual machine either by issuing an invalid 
CCW command code, or by the CP CLOSE command. 
In either case, DMKSPL checks for tag record 
information in the VSPXBLOK. (The VSPXBLOK, 
pointed to by the VDEVEXTH field of the VDEVBLOK 
for the output spool device, contains the tag 
information entered via the CP TAG command.) If 
tag data exists, the first spool buffer for the 
file is read in, the tag data is inserted in the 
tag record, and the buffer is rewritten to DASD 
storage. If no tag data exists, the tag record 
data field is left blank. The device is then 
cleared of pending interruptions, the file 
chains are completed, and the file is either 
queued for output on a real device of the proper 
type (printer or punch), or, if XFEB is in 
effect, is queued for input to another virtual 
machine. 



l££fi* fiiS ££0£SJ^ii?3 



Input file processing is similar to output file 
processing, except for the open and close 
functions, and the analysis of CCW commands and 
the direction of data movement. Many common 
routines are utilized to locate and verify CCWs, 
obtain buffer space, and to move the spooling 
data. 



The difference in the 
instead of creating a new 
to locate a reader file 
the system. To do this 
scans the SFBLOKs chai 
EEADERS, to find a file 
that matches that of the 
hold status. If a file 
check or intervention 
reflected to the virtual 
SFBLOK is chained to the 
reader and the channel pr 
the same manner as for an 



open function is that 

file, it is necessary 

that already exists in 

, the open subroutine 

ned from the anchor, 

with an owner userid 
caller and is not in 

is not found, a unit 
required condition is 
machine; otherwise, its 

control block for the 
ogram is interpreted in 

output file. 



After the input file is exhausted, a unit 
exception is reflected to the user machine, 
unless the user has reguested either continuous 
spooling or that an EOF not be reflected. With 
continuous spooling, the unit exception is not 
reflected until the last file for that virtual 
machine is processed. If HOEOF is specified, 
the simulation terminates with a unit check or 
intervention reguired condition (similar to what 
happens if the EOF button on a real reader is 
not pushed) . 

In either case, the input file is then 
deleted from the system, unless the user has 
specifically requested that his input files be 
saved. If the file is saved, it can be re-read 
any number of times. 



liiiSll Console Spooling 



Support of virtual console I/O for both the 
virtual machine and VM/370 is provided as an 
option for the VM/370 spooling capabilities. 
This support fulfills the following 
requirements: 



Section 1. Introduction 



95 



Provides hardcopy support 
Facility virtual machines. 



for CMS Batch 



Provides hardcopy support for display devices 
used as systen or virtual machine consoles. 

Allows disconnected virtual machines to spool 
virtual console output, CP commands and 
system resources to disk instead of losing 
the output. 

Improves the performance of virtual machines 
that currently produce a large amount of 
console output. 
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2ili£St file Processina 



Whenever a SIC is issued to a virtual machine 
console, the virtual console manager (DBKVClil) 
determines if the spooling option is active. If 
it is, control is passed to the virtual spooling 
manager at DMKVSPBP to insert the data into a 
spool file buffer. While console spooling 
utilizes, basically, the same code as printer 
spooling, the following exceptions are made: 



A skip to channel 1 CCW is inserted 
every 60 lines of output. 



after 



• The operator's virtual console spool buffer 
is written out after every 16 lines of 
output. 

• The virtual spool buffer is written out to 
the allocated spool device when the first CCW 
is placed in that virtual buffer. The linkage 
area of the virtual spool buffer takes the 
form of a CLOSE file to allow checkpoint 
(DMKCKP) to recover the active spool file in 
the event of a shutdown because of system 
failure. The data in the virtual buffer, not 
yet written out to the spool device will not 
be recovered. 

To maintain a pseudo closed file status for 
console spool files, DMKSPL now assigns spool 
identifications to all output spool files 
where they are first gueued . 

A virtual system reset, device reset, or IPL 
i[oes not close the virtual console spool 
file. The LOGOFF, FORCE, or DETACH of 
virtual console commands does close the 
virtual console spool file. The SHUTDOWN 
command does close the operator's console 
spool file. If the SHUTDOWN command is 
issued by a Class A user other than the 
operator, the console spool file for both the 
user and operator is closed. 

The inclusion of the spool file tag record in 
a virtual console spool file is processed by 
DMKVSP and DMKSEL as described for printer spool 
files in "Output File Processing" under "Virtual 
Spooling Manager." 



HEAL SPOOLING MANAGEB (DMKRSP) 



The real spooling manager operates the real unit 
record devices that are attached to the system 
and that are used to transcribe input data into 
reader spool files and user output spool files 
onto the real printers and punches. The 



Both the input and output operations of DHKBSP 
are interruption driven. Thus, DMKRSP does not 
process unless an internally or externally 
generated not-ready to ready device end 
interruption occurs. External interruptions are 
generated by the hardware in the normal manner, 
while internal, "pseudo interruptions," are 
generated by the software when an output file 
has been queued on the real printer or punch 
file chain, or when the operator issues a START 
command to a drained device. 

Upon receipt of the initial device end for a 
printer or punch, DMKRSP searches the 
appropriate file chain for the SFBLOK of a file 
whose class matches that of the device that was 
made ready. When the SFBLOK is located 
(provided the file is not in a HOLD status) , it 
is unchained from the output gueue and chained 
to the real device block that services the file. 
A page of real main storage is then obtained for 
use as a buffer, and the output separator 
routine (DMKSEP) is called to print output 
identifier pages. When DMKSEP returns control 
to DMKRSP, the first buffer of the file is paged 
into real main storage, and the CCWs in the 
channel program that it contains are adjusted so 
that their data addresses correspond to the real 
addresses at which the data resides. The real 
SIO supervisor (DMKIOSQH) is then called to 
start the channel program, and DMKRSP exits to 
the dispatcher (DMKDSPCH) to await the 
interruption. 

When the channel end/device end interruption 
for the completed buffer is unstacked to DMKRSP, 
the forward chain file link field locates the 
next buffer. This buffer is paged-in, and the 
process is repeated until the final buffer is 
processed. At this point, the number of copies 
requested for the file is decremented. If the 
number of copies is 0, processing is terminated 
and the file is deleted from the system; 
otherwise, the process is repeated as many times 
as necessary. 

When file processing is complete, a scan of 
the appropriate output queue is again made, and 
if a file is found it is processed. If the 
gueue is empty, or if a file with a matching 
class is not found, an exit is taken to DMKDSPCH 
to wait for another ready interruption. 

Output file processing can be modified by 
either the system operator, by a spooling 
support command or as a result of system errors. 
The operator commands allow a given file to be 
backspaced or restarted, and the files of 
individual users or the whole system to be held 
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and released for output. I/O errors also affect 
the spooling system, and a description of how 
they are processed is in the section "Error 
Recovery." 



lD.Ey.t. Iii§. PEOcessing 



Reader file processing is initiated by the 
receipt of a device end interruption from a 
spooling card reader. No explicit operator 
command is required to start the processing of 
an input file. When the device end is unstacked 
to DMKHSP, an open subroutine is called to build 
the necessary control blocks and to obtain the 
virtual, real, and DASD buffer space required 
for the file. A channel program to read ^^ 
cards is built in the buffer, and DHKIOSQR is 
called to start the reader. 

When the interruption for the first buffer is 
unstacked, the first card is checked for its 
validity as a userid card. The minimum 
information that this card must contain is the 
userid of the owner of the input file. It may 
appear anywhere on the card, with the 
restriction that it must be the first 
information punched. Optional information on 
the userid card can include a filename and type 
and/or the class of the virtual card reader to 
which the file is to be directed. If the userid 
is valid, the file processing continues; 
otherwise, the operator receives an error 
message and processing is terminated. 

After each file buffer is read, it is written 
onto disk by the paging I/O routines in the same 
way that virtual output files are handled. When 
a unit exception signaling physical end-of-file 
is received from the reader, the file is closed 
by writing the final buffer to disk and 
completing and queuing the SFBLOK to the 
reader's file chain. If the owner of the file 
is currently logged on, he is given a message 
indicating that a file has been read and if he 
has an available card reader, it is posted with 
a device end interruption. An available reader 
is one of the correct class which is ready, is 
not busy, has no active file, and has no pending 
interruptions . 



^^countin^ Card Processing 



Various routines in CP accumulate, format, and 
punch account cards that contain system usage 
information for certain users. These routines 
format the information into an 80-column card 
image preceded by a punch CCN and call DMKACOAQ 
to queue the card for real output. DMKACOAQ 
calls DUKACOPU to punch the card on a real 
punch, if one is available; otherwise, the card 
is queued in main storage until a punch is free. 
Hhen a punch finishes processing its last file, 
a test is made to see if any accounting cards 
have been queued. If they have, DHKACOPO is 
called to process them. 

In addition to the cards generated by CP to 
account for a virtual machine's use of system 
resources, the user may request cards to be 



punched in order to account for the use of 
virtual machine resources by jobs running under 
his userid. In order to do so, the user must 
have the account option (ACCT) entered into the 
directory. 

To punch an accounting card, the user must 
issue a code X'OOIC DIAGNOSE instruction with a 
pointer to either a parameter list containing 
user specified "charge to" information, or a 
data area containing up to 70 bytes of user 
specified information to be punched into the 
accounting card. DMKHVC validates the 
instruction operands, builds an account buffer 
(ACNTBLOK), and DMKflCQQO is called to queue the 
card for real output. For additional 
information about this user option, see 
"DIAGNOSE Interface (DMKHVC) " under "Privileged 
Instructions ." 

Hhen the user accounting option is being 
utilized, the user must keep in mind that each 
additional accounting record requested is 
occupying real storage space. Degradation of 
system performance occurs if available storage 
becomes filled with accounting data. 



SPOOLING COMMANDS 



The spooling commands provide an interface 
between the user, the system operator, and the 
spooling system. There are three types of 
spooling commands: 

• Those that affect virtual devices 

• Those that affect real devices 

• Those that affect spool files that are queued 
within the system 

The commands that affect virtual devices are 
generally available to all system users, and a 
user can only affect the status of devices that 
are attached to his own virtual machine. 
Commands that affect the status of the real 
system's spooling devices can be used by the 
system operator only. Commands that affect 
closed spool files that are awaiting processing 
are generally available to all users, with some 
additional capabilities assigned to the system 
operator. For example, a user may alter the 
characteristics only of those files that have an 
owner's userid that matches his own, whereas the 
system operator may change any spool file in the 
system. 



liis States and Attributes 



Each spool file in the system has a number of 
attributes that are assigned to it, either 
explicitly or by default, at the time that it is 
created. These attributes and their values are 
as follows: 

• Filename and filetype can be 24 character 
fields. Either or both can be replaced by a 
user-supplied value. 
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• Spoolid number is a system-assigned number 
between 1 and 9900. It is automatically 
assigned when the file is created (input) or 
closed (output) , and is unique within the 
system. The file's owner, the device type, 
and the id number are specified. Usually, 
the userid defaults to the identification of 
the user issuing the given command. Because 
the identification number rather than the 
filename and filetype is an identifier, 
duplicate user-assigned names do not present 
an identification problem. 

• The number of logical records (cards or 
print lines) in the file is an integer 
between 1 and 16 million. For printer 
files, the record count also includes any 
immediate operation code space or skip 
CCWs. 

• The originating user is the identification 
of the file's creator, if the file has been 
internally transferred from the originator's 
printer or punch to the new owner's card 
reader. 

• The number of copies requested for an output 
file is between 1 and 99. Unless altered by 
the user or operator, it defaults to 1. 

• The device type is used by DIAGNOSE for a 
file transferred to a reader to determine 
the virtual type of output device. 

In addition to those attributes, a file that 
is queued for real output or virtual input 
always has a class associated with it. A class 
is a single alphameric character from A through 
Z or from to 9. It controls both the real or 
virtual device on which the file will be 
printed, punched, or read, and the relative 
priority and sequence of output on the device. 
While each file is assigned a single class, each 
real spooling output device can be assigned from 
one to four classes. The device then processes 
only files that have a class attribute that 
corresponds to one of its own, and processes 
these files in the order that its own classes 
are specified. 

For example, if a printer is assigned the 
classes A, D, 2, it processes any printer file 
with a class of A before it searches the printer 
output queue for a file with class D. All class 
D files are printed before class 2 files. 

The output class for a file is assigned at 
the time the file is created and is the class 
that is associated with the virtual device that 
created it. While each real spooling device can 
have up to four classes, each virtual spooling 
device can have only one. When a user logs onto 
to the system, the class associated with a 
device is the one defined in his directory entry 
for that device. However, he can alter this 
class at any time by the SPOOL command. As 
files are created and closed by a device, they 
take on the device's output class. 

After they are closed and are awaiting 
output, their class can be changed by a CHANGE 
command issued either by the file's owner or the 
system operator. The system operator can alter 
the system generated output class (es) of a real 
output device by the START command. Output 



files transferred to a user's virtual reader can 
also be controlled by class. If the receiving 
user has several readers, the input to each can 
be limited to files of a certain class. In 
addition, the OBDEB command allows sequencing of 
input files by class as well as spoolid number. 

output priorities can also be managed by 
altering the hold status of a file. Individual 
users can alter the hold status with the CHANGE 
command, while the system operator can change 
(hold or free) the files of specific individual 
users. 



ZiEtS3l £§li£§ S£oolin3 Commands 



These commands affect the status of a user's 
virtual spooling devices: 



Command Meaning 

CLOSE Terminates spooling operations on a 
specified device. It clears the 
device of any pending interrupt 
conditions, and for output files, 
updates the tag record, completes and 
queues the file for real output. 
Optional operands allow the user to 
specify a filename and filetype, and 
to override for the given file any 
standard CLASS, HOLD/NOHOLD or COPY 
operands set into the output device by 
the SPOOL command. 

SPOOL Establishes the file attributes that 
apply to files created on, or read by, 
the given device. It establishes the 
class that will be in effect, whether: 
files are to be automatically held, 
input files are to be saved or purged 
after reading, and output files are to 
be directed to the real system 
printers and punches or are to be 
transferred to a user's virtual 
reader. 



55^2 P5ii£:§ §££oiiB3 Commands 



The operator can use these commands to control 
the activity of the real spooling devices: 



Command 
BACKSPAC 



DRAIN 



STABT 



Meanincj 

Backspaces an active spooling device 
for either a specified number of pages 
(printers only) or to the beginning of 
the file (printers or punches) . 

Stops the operation of a specified 
output or input device after it has 
finished processing the file on which 
it is currently working. A printer 
must be drained prior to the issuance 
of the LOADBUF command. Unit record 
devices are normally drained prior to 
system shutdown. 

Bestart a device after it has been 
drained. Options allow the operator 
to specify the spooling output class 
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for the output device and output 
separator records. 

FLUSH Imnediately halts the output on the 
specified device and either flushes 
that copy of the file from the system, 
or puts it into the system hold status 
for future processing. 

BEPEAT Supplements the number of copies 
requested by the user for the file 
when it was created. The operator can 
specify a number from 1 to 99 that is 
added to the number specified by the 
user. 

LOADBUF Loads the universal character set 
buffer of the FCB of the specified 
printer with the specified image. If 
requested, the system verifies the 
loading by printing its contents on 
the affected printer. 

SPACE Forces the output on the specified 
printer to be single spaced, 
regardless of the skipping or spacing 
commands specified by the file's 
creator. 



Sfiool File Hanagement Commands: The spooling 
commands alter the attributes and status of 
closed spool files that are queued and awaiting 
processing. When a command applies to an 
individual file, the device type (EDB, PUN, PRT) 
and the spoolid number must be provided to 
identify the file. In most commands requiring a 
spoolid, the keyword CLASS followed by a valid 
spool class or the keyword ALL are acceptable 
substitutes for the spoolid number. This causes 
the command to be executed for all files of the 
given class or device type. The userid is the 
identification of the user issuing the command, 
except that the system operator must explicitly 
supply the identification of the user whose 
files he wishes to affect or he must specify the 
keyword SYSTEM, which giveg access to all files 
(valid for CHANGE, PURGE, ORDER, and TRANSFER 
commands also) . 



Command 
CHANGE 



HOLD 



FREE 



PURGE 



Meaning 

Changes the filename and filetype, the 
number of copies, and the class of the 
specified file. Any of the above 
attributes of a file can be determined 
via the QUERY command. 

Places, via the system operator, the 
specified file in a hold status. The 
file is not printed or punched is 
released by the system operator. The 
operator can hold any user files by 
device type. 

Opposite of the HOLD command. Allows 
a file or group of files that were 
previously held to become available 
for processing. However, the user 
cannot reset a hold that was set by 
the operator with the HOLD command. 

Removes unwanted spool files from the 
system before they are printed or 
punched. 



ORDER Reorders the input files in a virtual 
card reader. It can order files by 
identification number, by class, or by 
any combination of the two. 

TRANSFER Transfers a virtual reader to another 
user's virtual reader without any 
processing. The TRANSFER command 
causes a changing in the owning userid 
field in the file's SFBLOK. 



SPOOL FILE ERROR RECOVERY 



H^ii S§£2E^ IZQ 1EE2E§ 



I/O errors on real spooling unit record devices 
are handled by a transient routine that is 
called by DHKIOS after it has sensed the unit 
check associated with the error on a spooling 
device. If appropriate, a restart CAW is 
calculated and DMKIOS is requested to retry the 
operation, in some cases waiting for a device 
end that signals that the failing device has 
been made ready after manual corrective measures 
have been taken. If, after retrying the 
operation the error is unrecoverable, DHKIOS is 
informed that a fatal error has occurred. 
DMKIOS then unstacks the interruption, flagged 
as a fatal error, and passes control to real 
spooling executive. The routines that handle 
unstacked interruptions in real spooling 
executive only module operations that have been 
completed correctly or those that are fatal 
errors. If a fatal error is unstacked, the 
recovery mechanism depends on the operation in 
progress. 

For fatal reader errors, processing of the 
current file is terminated and any portion of 
the file that has been read and stored on disk 
is purged. The owner of the file is not 
informed of the presence of a fractional part of 
the file in the system. 

For fatal printer or punch errors, the SFBLOK 
for the partially completed file is re-gueued to 
the appropriate output list and processing can 
be resumed by another available printer or 
punch, or can be deferred until the failing 
device is repaired. 

In any case, the failing device is marked 
logically offline, and no attempt is made by the 
system to use it until the operator varies it 
back online via the VARY command. 



DASD Errors Durinfl S£00ling 



DASD I/O errors for page writes are transparent 
to the user. A new page for the buffer is 
assigned, the file linkage pointers are 
adjusted, and the buffer is rewritten. The 
failing page is not de-allocated and no 
subsequent request for page space is granted 
access to the failing page. If an unrecoverable 
error is encountered while reading a page, 
processing depends on the routine that is 
reading the file. If the processing is being 
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If the checkpoint start procedure encounters 
I/O errors or invalid DASD data on the 
checkpoint cylinders, the operator is notified. 
The FORCE option of the checkpoint start 
performs all the checkpoint start functions 
except that, invalid or unreadable files are 
bypassed. Dhile this is at best a partial 
recovery, the only other alternative is a cold 
(COLD) start where all spool file data is lost. 



^*sp S_Eool Space Exhausted 



KECOVERY MANAGEMENT SUPPORT (RMS) 
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The machine check handler (MCH) minimizes lost 
computing time caused by machine malfunction. 
MCH does this by attempting to correct the 
malfunction immediately, and by producing 
machine check records and messages to assist the 
service representatives in determining the cause 
of the problem. 

The channel check handler (CCH) aids the I/O 
supervisor (DMKIOS) to recover from channel 
errors. CCH provides the device dependent error 
recovery programs (ERPs) with the information 
needed to retry a channel operation that has 
failed. 

This support is standard and model independent 
on the external level (from the user's point of 
view there are no considerations, at system 
generation time, for model dependencies) . 



BECOVEBY FROM SYSTEM FAILURE 



SYSTEM INITIALIZATION FOR RH S 



Should the system suffer an abnormal 
termination, CF attempts to perform a warm 
start. Spool file and device data, as well as 
other system information is copied from real 
storage to warm start cylinders on DASD 
storage. When the systme is reinitialized, the 
spool data and other system data is retrieved 
from the warm start cylinders and operation 
continues. 

If the warm start data in real storage had 
damaged by the abnormal termination, the warm 
start procedure recognizes the situation and 
notifies the operator that a warm start cannot 
be performed. Another recovery method would be 
to attempt a checkpoint start. 

The spool file recovery routines (DMKCKS) 
dynamically checkpoint on DASD storage; the 
status of all open reader files, the status of 
all closed output files, real spooling device 
data, and system hold queue information. This 
information is stored on checkpoint cylinders 
that are allocated, along with warm start 
cylinders, at system generation. 

When a checkpoint (CKPT) start is requested, 
spool file and spooling device information is 
retrieved from the checkpoint cylinders. Spool 
file blocks are chained to their appropriate 
reader, printer or punch chains; record 
allocation blocks are reconstructed; spooling 
device status is restored; and, system hold 
queues are chained to the proper devices, 
system operation then continues. 



DMKCPI calls to initialize the error recording 
at cold start and warm start. DHKIOEFL gives 
control to DMKIOG to initialize the MCH area.. A 
store CPD ID (STIDP) instruction is performed to 
determine if VM/370 is running in a virtual 
machine environment, or running standalone on 
the real machine. If VM/370 is running in a 
virtual machine, the version code is set to a 
hexadecimal 'FF' by DMKPRV. If the version code 
returned is hexadecimal 'FF', the RMS functions 
are not initialized beyond setting the wait bit 
on in the machine check new PSW (virtual) . This 
occurs because machine check interruptions and 
channel errors (other than channel data checks) 
are not reflected to any virtual machine. 
VM/370, running on the real machine, determines 
whether the virtual machine should be 
terminated. 

If the version code is not X'FF,' DMKIOG 
determines what channels are online by 
performing a STORE CHANNEL ID (STIDC) 
instruction and saves the channel type for each 
channel that is online. The maximum machine 
check extended logout length (MCEL) indicated by 
the STORE CPD ID (STIDP) instruction is added to 
the length of the MCH record header, fixed 
logout length and damage assessment data field. 
DMKIOG then calls DMKFRE to obtain the necessary 
storage to be allocated for the MCH record area 
and the CP executing block (CPEXBLOK) . DMKIOG 
saves the pointers for the machine check record 
and the CPEXBLOK in DMKMCH. DMKIOG obtains the 
storage for the I/O extended logout area and 
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initializes the logout area and the ECSW to Is. 
The I/O extended logout pointer is saved at 
location 172 and control register 15 is 
initialized with the address of the extended 
logout area. The length of the CCH record and 
the online channel types are saved in DMKCCH. 
It should be noted that the ability of a CPU to 
produce an extended logout or I/O extended 
logout and the length of the logouts are both 
model and channel dependent. If VM/370 is being 
initialized on a Model 165 II or 168, the 2860, 
2870, and 2880 standalone channel nodules are 
loaded and locked by the paging supervisor and 
the pointers are saved in DMKCCH. If VM/370 is 
being initialized on any other model, the 
integrated channel support is assumed; this 
support is part of the channel control 
subroutine of DMKCCH. Before returning to 
EMKIOE the MCH/CCH recording cylinder for error 
recording is initialized. DMKIOE passes control 
back to DMKCPI and control register 1U is 
initialized with the proper mask to record 
machine checks . 



scheme. Functional recovery by MCH is made by 
correcting storage protect feature (SPF) keys 
and intermittent errors in real storage. 



SYSTEM HECOVEBY: System recovery is attempted 
when functional recovery is impossible. System 
recovery is the continuation of system 
operations at the expense of the interrupted 
user, whose virtual machine operation is 
terminated. System recovery can only take place 
if the user in question is not critical to 
continued system operation. An error in a system 
routine that is considered to be critical to 
system operation precludes functional recovery 
and would require a system-supported restart. 



SYSTEM-SUPPORTED RESTART: When the machine check 
occurs in a critical routine, the primary system 
operator is notified that the system cannot 
continue to operate. An automatic reload of the 
system occurs. This type of recovery is tried 
when functional and system recovery have failed 
or could not be tried. 



OVERVIEW OF MACHINE CHECK HANDLER 



A machine malfunction can originate from the 

CPU, real storage or control storage. When any 

of these fails to work properly, the CPU 
attempts to correct the malfunction. 

When the malfunction is corrected, the 
machine check handler (MCH) is notified by a 
machine check interruption and the CPU logs out 
fields of information in real storage, detailing 
the cause and nature of the error. The model 
independent data is stored in the fixed logout 
area and the model dependent data is stored in 
the extended logout area. The machine check 
handler uses these fields to analyze the error, 
format an error record, and write the record out 
on the error recording cylinder of SYSRES. 
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Recovery from machine malfunctions can be 
divided into four categories: functional 
recovery, system recovery, system-supported 
restart and system repair. These levels of error 
recovery are discussed in their order of 
acceptability, functional recovery being most 
acceptable and system repair being least 
acceptable : 



SYSTEM REPAIR: System repair is recovery that 
requires the services of maintenance personnel 
and takes place at the discretion of the 
operator. Usually, the operator has tried to 
recover by system-supported restart one or more 
times with no success. An example of this type 
of error is when a hard error occurs so 
frequently that system-supported restart is not 
successful . 



SYSTEM/370 RECOVERY FEATURES 



The operation of the Machine Check Handler 
depends on certain automatic recovery actions 
taken by the hardware and on logout information 
given to it by the hardware. 



CPU Retry 



CPU errors are automatically retried by 
microprogram routines. These routines save 
source data before it is altered by the 
operation. When the error is detected, a 
microprogram returns the CPU to the beginning of 
the operation, or to a point where the operation 
was executing correctly, and the operation is 
repeated. After several unsuccessful retries, 
the error is considered permanent. 



fCC Validity Checkigg 
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ECC checks the validity of data from real and 
control storage, automatically correcting 
single-bit errors. It also detects multiple-bit 
errors but does not correct them. Data enters 
and leaves storage through a storage adapter 
unit. This unit checks each doublewcrd for 
correct parity in each byte. If a single-bit 
error is detected, it is corrected. The 
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corrected doubleword is then sent tack into real 
or control storage and on to the CPU. When a 
multiple-bit error is detected, a machine check 
interruption occurs, and the error location is 
placed in the fixed logout area. MCH gains 
control and attempts to recover from the error. 



Control Kegisters 



Two control registers are used by MCH for 
loading and storing control information (see 
ligure 19) . Control register 14 contains mask 
bits which specify whether certain conditions 
can cause machine check interruptions and mask 
bits which control conditions under which an 
extended logout can occur. Control register 15 
contains the address of the extended logout 
area. 
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Figure 19- RMS Control Register Assignments 



interruption. To minimize the possibility of 
losing logout information by recursive machine 
check interruptions, the machine check new PSW 
gives control to DHKMCH with the system disabled 
for further interruptions. There is always a 
danger that a machine malfunction may occur 
immediately after DMKMCH is entered and the 
system is disabled for interruption. Disabling 
all interruptions is only a temporary measure to 
give the initial analysis subroutine time to 
make the following emergency provisions: 

• It disables for soft machine check 
interruptions. Soft recording is not enabled 
until the error is recorded. 

• It saves the contents of the fixed and 
extended logout areas in the machine check 
record. 

• It alters the machine check new PSW to point 
to the term subroutine. The term subroutine 
handles second machine check errors. 

• It enables the machine for hard machine check 
interruption. 

• If a virtual user was running when the 
interruption occurred, the running status 
(GPRS, FPRs, PSW, M.C. old PSW, CRs, etc.) is 
saved in the user's VMBLOK. 

• It initially examines the machine check data 
for the following error types: 

MCIC=ZERO 

PSW invalid 

System damage 

Timing facilities damage 

The occurrence of any of these errors is 
considered uncorrectable by DMKMCH; the 
primary system operator is informed, the 
error is formatted and recorded, and the 
system is shutdown followed by an automatic 
restart function. 

• If the instruction processing damage bit is 
on, it tests for the following types of 
malfunctions: 



Machine Check Handler Subroutines 



VM/370 Machine Check Handler module (DMKMCH) 
consists of the following functions: 



Initial analysis subroutine 
Main storage analysis subroutine 
SPF analysis subroutine 
Recovery facility mode switching 
Operator communication subroutine 
Virtual user termination subroutine 
Soft recording subroutine 
Buffer error subroutine 
Termination subroutine 



I°iti§i ill§l£§i^ Subroutine 



— Multiple-Bit Error in Main Storage 
Control is given to the main storage 
analysis subroutine. 

— SPF Key Error — Control is given to the 
SPF analysis subroutine. 

— Retry failed — If the CPU was in 
supervisor state the error is considered 
uncorrectable and the VM/370 system is 
terminated. If the CPU was in problem 
state, the virtual machine is reset or 
terminated and the system continues 
operation. 

If CPU retry or ECC was successful on a soft 
error, control is given to the soft recording 
subroutine to format the record, write it out 
on the error recording cylinder, and update 
the count of soft error occurrences. 



The initial analysis subroutine of DMKMCH 
receives control by a machine check 



If external damage was reported, control is 
given to the soft recording subroutine to 
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format the record and write it out on the 
error recording cylinder. 



I?§.i!l Storage Analysis Subroutine 



The main storage analysis subroutine is given 
control when the machine check interruption was 
caused by a multiple-bit storage error. An 
initial function points the machine check new 
PSN to an internal subroutine to indicate a 
solid machine check, in case a machine check 
interruption occurs while exercising main 
storage. 

Damaged storage areas associated with any 
portion of the CP nucleus itself cannot be 
refreshed; multiple-bit storage errors in CP 
cause the VM/370 system to be terminated. An 
automatic restart reinitializes VH/370. 

If the damage is not in the CP nucleus, main 
storage is exercised to determine if the failure 
is solid or intermittent. If the failure is 
solid, the 4K page frame is marked unavailable 
for use by the system. If the failure is 
intermittent, the page frame is marked invalid. 
The change bits associated with the damaged page 
frame are checked to determine if the page had 
been altered, by the virtual machine. If no 
alteration had occurred, VlJ/370 assigns a new 
page frame to the virtual machine and a backup 
copy of the page is brought into storage the 
next time the page is referenced. If the page 
had been altered VM/370 resets or terminates the 
virtual machine, clears its virtual storage, and 
sends an appropriate message to the user. 
Normal system operation continues for all other 
users. 



Storage Protect 
Subroutine 



Feature (SPF) 



Analjrsis 



If an SPF machine check occurs, which is 
associated with a virtual machine, the SPF 
analysis subroutine exercises all 16 keys in the 
failing storage 2K page frame. If an SPF 
machine check does not occur, the machine check 
is intermittent and the swptable for the page 
associated with the failing storage address is 
located. The storage key for the failing 2R 
storage page frame is retrieved from the 
swptable and the change and reference bits are 
set on in the storage key. The storage key is 
then stored into the affected failing storage 2K 
page frame. If an SPF machine check occurs in 
exercising the 16 keys 5 times each, then the 
machine check is considered solid and the 
following actions are taken. (1) The virtual 
machine is selectively reset or terminated by 
the virtual machine termination subroutine; (2) 
The 4K page frame associated with the failing 
address is removed as an available system 
resource. This is accomplished by locating the 
cortable for the defective page and altering the 
corfpnt and corpbpnt pointers to make the page 
unavailable to the system. The cordisa bit in 
this cortable is set on to identify the reason 
for the status of this page in a system dump. 



Recovery Facility Mode Switching 



The recovery facility mode switching subroutine 
(DMKMCHMS) allows the service representative to 
change the mode that CPD retry and ECC recording 
are operating in. This subroutine receives 
control when a user with privilege class F 
issues some form of the SET MODE command. A 
check is initially made to determine if this is 
VM/370 running under VM/370. If this is the 
case, the request is ignored and control is 
returned to the calling routine. The format of 
the MODE command is as follows: 

SET MODE {RETRY I MAIN} { QOIET |RECORD } 
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RETRY and MAIN imply CPU retry and main 
storage, respectively. 

QDIET causes the specified facility to be 
placed in quiet mode. RECORD causes the count 
of soft errors to be reset to zero and the 
specified facility to be placed in record node. 



0E§£3t2£ Communication Subroutine 



The operator communciation subroutine is invoked 
when the integrity of the system has degraded to 
a point where automatic shutdown and reload of 
the system has been tried and was unsuccessful, 
or could not be attempted due to the severity of 
the hardware failure. A check is first made to 
determine if the system operator is logged on as 
a user, next a check is made to determine if the 
system operator is disconnected. If either of 
these checks is not affirmative a message cannot 
be issued directly to the system operator. A 
LPSW is performed to place the CPU in a disabled 
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wait state with a recognizable wait state code 
in the CPD instruction counter. 



Virtual User Teraination Subroutine 



The virtual aachine termination subroutine 
selectively resets or terminates a virtual user 
whose operation has been interrupted by an 
uncorrectable machine check. First, the machine 
is marked nondispatchable to prevent the damaged 
machine from running before reset or termination 
is performed. The machine check record is 
formatted and DMKIOEMC is called to record the 
error. Then the user is notified by a call to 
EMKQCNWT that a machine check has occurred and 
that his operation is terminated. The primary 
system operator is notified of the virtual user 
termination by a message issued by a call to 
DMKQCNHT. If the virtual machine is running in 
the virtual=real area, DMKUSO is called to log 
the virtual machine off the system and to return 
the storage previously allocated to the virtual 
machine and to clear any outstanding virtual 
machine I/O reguests. The HOLD option of LOGOFF 
is invoked to allow a user on a dial facility to 
retain the connection and thus permit LOGON 
without re-establishing the line connection. 
However, if the virtual machine is running in 
the virtual area, and DMKCFW is then called to 
put the virtual machine in console function 
mode, the user must re-initialize the system to 
commence operation. 



Soft Eecordina Subroutine 



The soft recording subroutine performs two basic 
functions: 

• Formats a machine check record and calls 
DMKIOEMC to record the error on the error 
recording cylinder. 

• Maintains the threshold for CPU retry and ECC 
errors and switches from recording to quiet 
mode when the threshold value is exceeded. 
To accomplish this, a counter is maintained 
by DMKMCH for successful CPU retry and 
corrected ECC events. 



CPU Retry Recordina Mode: Recording mode (bit U 
of control register 1U set to one) is the 
initialized state, and normal operating state of 
VW/370 for CPU retry errors. Recording mode may 
also be entered by use of the CP SET command. 
When 12 soft machine checks have occurred, the 
soft recording subroutine switches the CPU from 
recording mode to quiet mode. For the purpose 
of model-independent implementation this is 
accomplished by setting bit 4 of control 
register 14 to zero. Because in quiet mode no 
soft machine check interruptions occur, a switch 
from quiet mode to recording mode can be made by 
issuing the SET MODE RETRY |MAIN RECORD command. 
While in recording mode, corrected CPU 
RETRYIMAIN reports are formatted and recorded on 
the VM/370 error recording cylinder, but the 
primary systems operator is not informed of 
these occurrences. 



CPD Retrj[ fiUiSl Mode ; Quiet mode (bit U of 
control register 14 set to 0) can be entered in 
one of two ways: (1) when 12 soft machine 
checks have occurred, or (2) when the SET MODE 
RETRY QUIET command is executed by a class F 
user. In this mode, both CPU retry and ECC 
reporting are disabled. The CPU remains in 
quiet mode until the next system IPL (warm start 
or cold start) occurs or a SET MODE RETRYIMAIN 
RECORD command is executed by a class F user. 

ECC Recordina Modes: To achieve model 
independent support, RMS does not set a specific 
mode for ECC recording. The mode in which ECC 
recording is initialized depends upon the 
hardware design for each specific CPD model. 
For the IBM System/370 Models 135, 145, 158, and 
168, the hardware initialized state (therefore 
the normal operational state for VM/370) is 
quiet mode. For the IBM Systea/370 Models 155 
II and 165 II, the hardware initialized state 
(the normal operational state for VM/370) is 
record mode. An automatic restart incident due 
to a VM/370 failure does not reset tiie ECC 
recording mode in effect at the time of 
failure. 

The change from record to quiet mode for ECC 
recording can be initiated in either of the 
following ways; (1) by issuing the SET MODE 
{MAINIRETRY) QUIET command, or (2) automatically 
whenever 12 soft machine checks have occurred. 
For the purpose of model independent 
implementation this occurs by setting bit U of 
control register 14 to zero. 

The change from quiet to record mode for ECC 
recording can be accomplished by use of the SET 
MODE MAIN RECORD command. This recording mode 
option is for use by maintenance personnel only. 
It should be noted that CPU retry is placed in 
recording mode if it is not in that state when 
the SET MODE MAIN RECORD command is issued. 

While in recording mode, corrected ECC 
reports are formatted and recorded on the error 
recording cylinder, but the primary systems 
operator is not informed of these incidents. 



Buffer Error Subroutine 



On CPU models equipped with a high speed buffer 
(155 II, 158, 165 II, 168) or a data lookaside 
table (DLAT) (165 II, 168) the deletion of 
buffer blocks because of hardware failure is 
reported via a DEGRADATION report machine check 
interruption. MCH enables itself for 
degradation report machine check interruptions 
at system initialization by setting bit 5 of 
control register 14 to 1. If a machine check 
interruption occurs that indicates high speed 
buffer or DLAT damage, MCH formats the record 
and calls DMKIOEMC to record it on the error 
recording cylinder, informs the primary systems 
operator of the failure, and returns control to 
the system to continue normal operation. 
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Termination Subroutine 



The termination subroutine is given control if a 
hard machine check interruption occurs while 
DHKHCH is in the process of handling a machine 
check interruption. Note that soft error 
reporting is disabled for the entire time that 
MCH is processing an error. 

An analysis is performed of the machine check 
interruption code of the first error to 
determine if it was a soft error. If it was, 
the first error is recorded, the system status 
is restored and control is restored to the point 
where the first error occurred. If the first 
error was a hard error, the operator 
communication subroutine is given control to 
issue a message directly to the system operator, 
and to terminate CP operation. 



Normally, when DHKCCH returns control to the 
I/O supervisor, the error recovery program for 
the device which experienced the error is 
scheduled. When the ERP receives control, it 
prepares to retry the operation if analysis of 
the lOEBBLOK indicates that retry is possible. 
Depending on the device type and error 
condition, the ERP either effects recovery or 
marks the event fatal and returns control to the 
I/O supervisor. The I/O supervisor calls the 
recording routine DMKIOE to record the channel 
error. 

The primary system operator is notified of 
the failure, and DMKIOE returns control to the 
system and normal processing continues. 



CHANNEL CONTROL SUBROOTIHE 



OVERVIEW OP CHANNEL CHECK HANDLER 



The channel check "handler (CCH) aids the I/O 
supervisor in recovering from channel errors and 
informs the operator or service representative 
of the occurrence of channel errors. 

CCH received control from the I/O supervisor 
when a channel data check, channel control 
check, or interface control check occurs. CCH 
produces an I/O error block (lOERBLOK) for the 
error recovery program and a record to be 
written on the error recording cylinder for the 
system operator or service representative. The 
operator or service representative may obtain a 
copy of the record by using the CPERBP programs. 
A message about the channel error is issued each 
time a record is written on the error recording 
cylinder. 

When the I/O supervisor program detects a 
channel error during routine status examination 
following an SIO, TIO, HIO, or an I/O 
interruption it passes control to the channel 
check handler (DHKCCH) . DHKCCH analyzes the 
channel logout information and constructs an 
lOERBLOK, if the error is a channel control or 
interface control check. An ECSH is constructed 
and placed in the lOERBLOK. The lOERBLOK 
provides information for the device dependent 
error recovery procedures, DHKCCH also 
constructs a record to be recorded on the error 
recording cylinder. Normally, CHKCCH returns 
control to the I/O supervisor after constructing 
an lOERBLOK and a record. However, if DHKCCH 
determines that system integrity has been 
damaged (system reset or invalid unit address, 
etc.) then CF operation is terminated. CP 
termination causes DHKCCH to issue a message 
directly to the system operator and place the 
CPU in a disabled wait state with a recognizable 
wait code in the CPU instruction counter. 

Recovery is not initiated for channel errors 
associated with I/O events inititated by a 
virtual machine, however these causes 
termination of the virtual machine after it has 
been notified of the failure. The error is 
recorded by DMKIOECC on the error recording 
cylinder. 



Control is passed to the channel control 
subroutine of DHKCCH after a SIO with failing 
status stored, or an I/O interrupt because of a 
channel control check, interface control check, 
or channel data check. 

If "logout pending" is indicated in the CSH, 
the CP termination flag is set. The existence 
of real device blocks (RCHBLOK, RCUBLOK, 
RDEVBLOK) , for the failing device address, is 
determined by a call to DHKSCNRU and an 
indicator is set if they do exist. An indicator 
is also set if the lOBLOK for the failing device 
address exists. A call to DHKFBEE obtains 
storage space for the channel check record and 
the channel control subroutine builds the 
record. If the indicators show that the real 
device blocks and the lOBLOK exist, a call to 
DHKFBEE obtains storage space and the channel 
control subroutine builds the I/O error block 
(lOERBLOK) ; if these blocks do not exist, the 
lOERBLOK is not built. The lOERBLOK is used for 
two purposes: 



1. The device dependent error recording 
program (ERP) uses the lOERBLOK to attempt 
recovery on CP initiated I/O events. If 
the I/O events that resulted in a channel 
check are associated with a virtual 
machine, the I/O fatal flag is set in the 
lOBLOK and the virtual machine is reset, 
cleared, and put into CP read status. The 
length and address of the channel check 
record is placed in the lOERBLOK and the 
lOERBLOK is chained off the lOBLOK. 

2. DMKIOECC uses the lOERBLOK to record the 
channel check record on the error recording 
cylinder. 



The channel control subroutine gives control 
to a channel dependent error analysis routine to 
build or save the extended channel status word 
(ECSi) . Hhen the channel control subroutine 
regains control, eight active addresses are 
saved in the channel check record. 

If the CP termination flag is set, the I/O 
extended logout data from the channel check 
record is restored to main storage for use by 
SEREP. If the system operator is both logged on 
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as a user and connected to the system, a message 
(DMKCCH603H) is sent to him advising him of the 
channel error. A LPSH is then executed to place 
the CPU in a disabled wait state with a wait 
state code of 002 in the CPU instruction 
counter. 

If the CP termination flag is not set, a 
check is made to determine if an lOERBLOK was 
built by the channel control subroutine. 

If an lOERBLOK was not built, DMKIOECC is 
called to record the channel check record on the 
error recording cylinder. The system operator 
is then sent a message (DMKCCH601I or 
DMKCCH602I) informing him of the error and 
control is then returned to DMKIOS to continue 
system operation. 
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DMKIOE continues normal processing, 



INDIVIDUAL ROUTINES 



2860 Channel (Models J65 II, J 6 8) 



The 2860 logout area is checked to determine if 
a complete logout exists; if not, CP termination 
is necessary. 

A check is made in the logout area for 

validity of the CSW fields and bits are set in 

the channel check record's ECSW field to 
indicate bad fields. 

The channel logout is then checked and 
seguence codes are set based on the presence of 
a channel control check, or an interface control 
check. If a channel control check is present, 
the codes set are determined through parity. 
The count determines if parity is good and sets 
a resultant condition code. 

The logout area is examined to ensure that 
the unit address has valid parity and is the 
same address passed by DMKIOS. If so, the unit 
address valid bit in the ECSH is set. If the 
unit address is not valid the unit address valid 
bit is reset to indicate the invalid condition. 

The ECSH field in the channel check record is 
moved to the lOERBLOK, if one exists. 

After completing the ECSH the 2680 routine 
moves the 2860 I/O extended logout into the 
channel check record, set the I/O extended 
logout area to ones, and returns to the channel 
control subroutine. 



A separate channel error analysis routine is 
provided for each type of channel for which 
DMKCCH can be used. The purpose of these 
routines and the channel control subroutine is 
to analyze the channel logout to determine the 
extent of damage and to create a seguence and 
termination code to be placed in the ECSH in the 
lOERBLCK. At system initialization, the correct 
model dependent channel recovery routine is 
loaded and the storage necessary to support the 
routine is allocated. The model dependent error 
analysis subroutines and routines and their 
functions are as follows: 



2870 Channel (Models J 65 II, J 68) 



If the channel failed to logout completely, at 
least part of the logout area is all Is . If a 
fullword of ones is found, a CP termination 
condition exists. 

A check is made in the logout area for valid 

CSH fields, and bits are set in the channel 

check record's ECSH field to indicate bad 
fields. 



Int evirated Channels (Models J35, JU5, J55_II, 
158.) 



Since all of these systems have integrated 
channels one common subroutine is used to handle 
all of these CPU types. This subroutine: 

• Indicates CP termination if the ECSH is not 
complete, the channel has been reset, or 
reset codes are invalid 

• Moves the ECSH to the lOERBLOK 



The termination and seguence codes are set 
depending on the presence of an interface 
control check or channel control check. If a 
channel control check is present, the codes set 
are determined through parity, count, and/or 
data transfer checks. For the 2870, parity can 
be determined directly from the channel logout. 

The logout area is also examined to ensure 
valid parity in the unit address and to ensure 
that the address is the same as that passed to 
DMKCCH by DMKIOS. If so, the unit address valid 
bit in the ECSH is set. 



Moves the hardware stored unit address and 
the I/O extended logout to the channel check 
record 

Sets the I/O extended logout area and ECSH 
area to Is 



Returns control 
subroutine 



to the channel control 



The third word of the logout area is also 
analyzed for type II errors. If a type II error 
is found, a CP termination condition exists. 

The ECSH field in the channel check record is 
moved to the lOERBLOK, if one exists. 

Before returning to the channel control 
subroutine, the 2870 routine moves the 2870 I/O 
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extended logout into the channel check record 
and sets the I/O extended logoat area to ones. 



2880 Channel (ijodels 165 II and 168) 



This routine analyzes 9 
logout . 



words of the 28 word 



The 2880 analysis routine handles channel 
data checks, interface control checks, and 
channel control checks. 

Termination code 3 (system reset) is not set 
in the ECSH because the 2880 channel does not 
issue system reset to the devices. Retry codes 
of zero to five are possible. 

Note: There are several catastrophic conditions 
under which the CP termination flag can be set, 
in the 2880 analysis routine. They are: 

• The channel did not complete the logout. 

• The CSW is not reliable. 

• The unit address in the I/O interruption 
device address field is not correct. 

Only a channel check record is needed if the 
channel has recognized an internal error and has 
recovered from it without any damage. Ho 
recovery action is necessary in these cases. 

If the channel address in the I/O 
interruption device address field does not match 
the channel address in the logout, a CP 
termination condition exists. 

If the channel was doing a scan and the unit 
control word had a parity check a CP termination 
condition exists. If there was no parity check, 
there was no damage during the scan and only a 
channel check record is required. 

Depending on the sequence the channel has 
entered, the termination and sequence codes are 
set; command address, unit address, and unit 
status validity is determined; and the sequence 
code is set valid. The ECSW field in the 
channel check record is moved into the lOEBBLOK, 
if one exists. 

Before returning to the channel control 
subroutine, the 2880 routine moves the I/O 
extended logout into the channel check record 
and sets the I/O extended logout area to ones. 



ERBOR RECORDIKG INTERFACE FOR VIRTUAL MACHINES 



The error recording interface provides a means 
of recording errors encountered by operating 
systems running in a virtual machine under 
VM/370. If the virtual operating system is 
VM/370, it must be the Release 2.0 version or 
later. An SVC 76 issued by a virtual machine is 
used to signal VH/370 that error recording is 
required. The SVC interruption handler in 
DHKPSA examines general registers and 1 to 
determine if valid parameters have been passed. 



If valid parameters are not found, the SVC is 
reflected back to the virtual machine and no 
recording takes place. If valid parameters are 
passed, a pageable routine (DHKVEB) processes 
the error record. 

DNKVEB validates the record passed by the 
virtual machine. If invalid conditions are 
found, no recording takes place. Control is 
returned to the SVC interruption routine in 
DMKPSa to reflect the SVC to the virtual machine 
as an SVC interruption. The action taken by the 
virtual machine is dependent on the operating 
system running in the virtual machine, not 
VM/370. If the record is valid, it is modified 
by changing virtual information to real. The 
actual recording is accomplished by using 
existing modules in DMKIOE and DMKIOF. 

Control is then returned to the instruction 
following the SVC 76 rather than reflecting the 
SVC. This eliminates the duplication of error 
recording in VM/370 and the operating system in 
the virtual machine. If DMKVEB determines that 
the recording represented a permanent I/O error, 
a message is sent to the primary system 
operator. 



ERBOR RECORDING AND RECOVERY 



The error recording facility is made up of four 
modules. One module (DMKIOE) is resident and 
the other three (DMKIOC, DMKIOF, and DMKIOG) are 
pageable. 

The error recording modules record temporary 
errors (statistical data recording) for CP 
generated I/O except for DASD devices with a 
buffered log. 
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When the recorder is entered from DMKIOS, it 
is entered at DMKIOERR. This entry is used for 
unit checks and channel data checks. A test is 
made of the failing CSW (located in the 
lOERBLOK) to see if the error was a channel 
error. If it was, control is passed to routine 
for recording channel checks. 

The lOERBLOK sense data, lOBLOK flags, and 
VMBLOK privilege class are examined to determine 
if the error should be recorded. 



ERROR RECORD WRITING 



After an error record is formatted, it is added 
to the error recording cylinder using DMKRPAGT 
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and DMKRPAPT. The error recording cylinders 
have page sized records (U096 bytes) . Each page 
contains a header (8 bytes) which signifies: the 
cylinder and page number of the page (4 bytes) , 
the next available space for recording within 
page (2 bytes) , a page in-use indicator (1 
byte) , and a flag byte. Each record within the 
page is recorded with a 4-byte prefix. 

If an error record is too large to be added 
into a page, a new page is retrieved, updated 
with record, and placed back on the error 
recording cylinder with the paging routines. 

Two cylinders are used for error recording: 
one cylinder is used exclusively for recording 
the I/O errors and the other cylinder for 
recording MCH/CCH errors. The cylinders that 
are used for error recording are specified by 
the user at system generation time. If either 
error recording cylinder becomes 90 per cent 
full, a message is issued to the operator using 
DMKQCNHT to warn him of the condition. If 
either cylinder becomes full, another message is 
issued to inform the operator and recording is 
stopped on that cylinder. Recording continues 
on the cylinder that is not full. 

If a channel check error is to be recorded, 
the recorder is entered at DMKIOEHB or DMKIOECC. 
The channel check handler determines the entry. 
A channel check error record is formatted. 
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Hardware environmental counter records are 
formed using routine DMKIOEEV. This routine is 
scheduled by DMKIOS after control is returned 
from the ERP. Sense data information is stored 
in the lOERBLOK by the ERP. The record formed 
is called a nonstandard record. 



recording. The paging routines, DMKRPAPT and 
DMKRPAGT, are used to read the error recording 
cylinder's pages (i»096 byte records). As each 
page record is read, it is examined to see if 
this record is the last recorded. If so, a 
pointer in storage is saved so recording can 
continue on that page record. Control is then 
returned to the caller. If either error 
recording cylinder is in an unrecognizable 
format, that cylinder is automatically 
reformatted by CP. 



DASD ERROR RECOVERY, ERP (DMKDAS) 



Error recovery is attempted for CP initiated I/O 
operations to its supported devices and for 
user-initiated operations to CP supported 
devices that use a DIAGNOSE interface. The 
primary control blocks used for error recovery 
are the RDEVBLOK, the lOBLOK and the lOERBLOK. 
In addition, auxiliary storage is sometimes used 
for recovery channel programs and sense 
buffers. 

The initial error is first detected by the 
I/O interruption handler which performs a SENSE 
operation if a unit check occurs. Unit check 
errors are then passed to an appropriate ERP. 
If a channel check is encountered, the channel 
check interruption handler determines whether or 
not retry is possible and passes control to an 
ERP through the I/O interruption handler. DASD 
errors are processed as described below. 



• Channel control check is treated as seek 
check. It is retried 10 times. 

• Interface control check is treated as seek 
check. It is retried 10 times. 

• Channel data check is treated as data check. 
It is retried 10 times. 



Clear and Format Recording Area 



DMKIOEFB is called by the 
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DMKIOEFL is called by DMKCPI to find the first 
available page that can be used for error 



HS-it £li§ck Errors 

Eauipment check: Retry the operation 10 times 
for 3330, 3340, 3350, and 2305 devices; twice 
for the 2314 and 2319. 

19. ES£2E5 JSflSiS 3I!i^ liSSiSS S^^E£SS M-ElSS • 
Recalibrate and retry the channel program 10 
times (2314/2319). 

52 £§£2£^ loSl!^* Execute a READ HOME ADDRESS and 
check home address against seek address. If 
they are the same, consider the error permanent. 
If they are not egual recalibrate and retry the 
channel program 10 times (2314/2319) . For other 
devices, return to caller. 



Seek check: Retry the 
that 3330/3350 seek 
hardware. 



operation 10 times except 
checks are retried by 



Intervention required: Issue a message to 
console and wait for solicited device end. This 
procedure is repeated once. 
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M^^ ou± check: One retry of the operation. 

5§.t§. checks; For 2314/2319 retry the operation 
256 times, with a recalibrate being executed 
every 16th time. For the 2305/33U0, retry the 
operation 10 times. For the 3330/3350, the 
operation is retried by hardware. 

Overrun: Retry the operation 10 times. 

hissing address marker: Retry the operation 10 
tines. 

Command reject: The command is not retried. 

Chainina check: Test for command reject. If not 
present, retry the operation 10 times. 

Jsviiouseaili ^ata Eresent: Issue a BUFFER 
UNLOAD command and retry the operation. 

l£§ck conditipjQ check: This error should not 
occur. CP does not use alternate tracks in its 
paging or spooling management. Hhen a disk pack 
is formatted, any track that is marginal is 
marked as permanently allocated and, therefore, 
made unavailable for use by CP. 

The error recovery routine keeps track of the 
number of retries in the lOBRCNT field of the 
lOBLOK. This count determines if a retry limit 
has been exeeded for a particular error. On 
initial entry from DMKIOS for an error 
condition, the count is zero. Each time a retry 
is attempted the count is increased by one. 

The ERP preserves the original error CSW and 

sense information by placing a pointer to the 
original lOERBLOK in the RDEVBLOK. Additional 

lOERBLCKs, which are received from DNKIOS on 

failing restart attempts, are discarded. The 

original lOEBBLOK is thus preserved for 
recording purposes. 

If after a specified number of retries, 
DHKDAS fails to correct the error situation, the 
operator may or may not be notified of the error 
condition. Control is returned to DMKIOS. 
DHKIOS is notified of the permanent error by 
posting the lOBLOK (IOBSTAT=IOBFATAL) . The error 
is recorded via DHKIOS by DMKIOERR, if DMKDAS 
and DMKIOE determine that the error condition 
warrants recording. 



back when the task has finished. This enables 
the ERP to receive control even if the retry was 
successful and allows the freeing of all storage 
gotten for CCHs and temporary buffers. The 
lOBRCAH is set to the recovery CCH string 
address . 



In handling 
situation, the ER 
operator and then 
arrive. This is a 
DMKIOS with the ERP 
on and the lOBSTRT 
off. Hhen the devi 
the original ch 
interrupted is then 



an intervention required 
P sends a message to the 
waits for the device end to 
ccomplished by a return to 

bit in the lOBSTAT field set 
bit in the lOBFLAG field set 
ce end interruption arrives, 
annel program which was 

started. 



The ERP flags of the lOERBLOK are also used 
to indicate when special recovery is being 
attempted. For example, a READ HOME ADDRESS 
command when a no record found error occurs. 

The other two indicators are self explanatory 
and are explained in Figure 20. 
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1 Action to be 


lOBSTAT 


lOBFLAG 


lOBSTAT 


Performed 


lOBERP 


lOBRSTRT 
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by DMKIOS 
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Return control 
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device end 








arrives 


1 


1 





Restart using 
lOBBCAH 








1 


Permanent I/O 
Error 











Retry successfu. 



Figure 20. Summary of lOB 



Indicators 



If the error is uncorrectable or intervention 
is required, the ERP calls DMKMSH to notify 
operator. The specific message is identified in 
the MSGPARM field of the lOERBLOK. 



If the error is corrected by a restart, the 
temporary or transient error is not recorded. 
Control is returned to DMKIOS with the error 
flag off. 

Before returning control to DMKIOS on either 
a permanent error or a successful recovery, the 
ERP frees all auxiliary storage gotten for 
recovery CCHs, buffers, and lOERBLOKs, and 
updates the statistical counters for 2314 and 
2319 devices. 



TAPE ERROR RECOVERY, ERP (DMKTAP) 



Error recovery is attempted for user-initiated 
tape I/O operations to CP supported devices that 
use the DIAGNOSE interface. The primary control 
blocks used for error recovery are the RDEVBLOK, 
the lOBLOK, and the lOEBBLOK. In addition, 
auxiliary storage is used for recovery channel 
programs (repositioning and erase) . 



The DMKIOS interface with the ERP uses the 
lOBSTAT and lOBFLAG fields of the lOBLOK to 
determine the action required when the BRP 
returns to DMKIOS. 

Hhen retry is to be attempted the EBP turns 

on the restart bit of the lOBFLAG field. The BRP 

bit of lOBSTAT field is also turned on to 

indicate to DMKIOS that the ERP wants control 



The interruption handler, DMKIOS, performs a 
SENSE operation when a unit check occurs. Tape 
errors are then passed to DMKTAP. The sense 
information associated with a unit check is 
contained in the lOERBLOK. If a channel check is 
encountered, the channel check interruption 
handler determines if retry is possible and 
passes control to the ERP through the I/O 
interruption handler. 
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The ERP looks for two other specific 
conditions. If the error count field is not 
zero, entry must be due to a recovery attempt. 
Thus, it may be a solicited device end to 
correct an intervention required condition or a 
retry attempt for either tape repositioning or 
channel program re-execution. 



The ERP keeps track of the number of retries 
in the lOBRCHT field of the lOBLOK to determine 
if a retry limit has been exceeded for a 
particular error. If the specified number of 
retries fails to correct the error, the error is 
recorded and DMKIOS is notified of the permanent 
error by turning on a status flag in the lOBLOK 
(IOBSTAT=IOBFATAL) . 



If the error is corrected by DHKTAP, the 
temporary error is not recorded and control is 
returned to DMKIOS with error flags all off. 
When repositioning is required in order to 
attempt recovery, additional ERP flags are 
contained in the ICERBLOK to indicate paths for 
specific errors (that is, data check on write 
must reposition, erase, and then reissue 
original channel program) . 



All error recovery is started the same except 
for intervention required errors. The lOBFLAG 
is turned on to indicate RESTART 
(IOBFLAG=IOBRSTRT) , and the lOBRCAH (lOBLOK 
Restart CAW) is filled with the restart channel 
address word. In addition, an lOBSTAT flag is 
turned on to indicate that the ERP is in control 
so that control can be returned to ERP during 
all tape error recovery (IOBSTAT=ICBERP) . In the 
case of an intervention required error, the ERP 
sends a message to the operator, and then 
returns to DMKIOS with indications that tell 
DMKIOS the ERP is waiting for a device end on 
this device. This is done by clearing the 
restart flag and returning to DMKIOS with only 
the lOBERP flag on. 



When ERP has determined a permanent error 
situation or successfully recovered from an 
error, all auxiliary storage obtained for 
recovery CCWs, buffers, and lOERBLOKs is freed 
before a return is made to DMKIOS (see Figure 23 
for a summary of the lOB indicators), also, the 
statistical counters for 2400, 3410, and 3420 
devices are updated. 



3270 REMOTE SUPPORT ERROR RECOVERY 



Recovery from errors associated with bisync 
lines, and the related channel and transmission 
control unit hardware is processed by DHKBSC. 
Recovery from errors associated with data and 
control processing by the remote station (the 
device) as defined by remote status and sense 
byte definition (see IBM 3270 Information 
Displaj ComEonent DescrxEtion, Order No. 
GA27-2749) is processed "by DMKRGF. Control 
blocks associated with these errors are the 
CONTASK, the RDEVBLOK, the BSCBLOK, the NICBLOK, 
the lOBLOK, and the lOERBLOK. 

The interruption handler, DMKIOS, performs a 
SENSE operation upon detection of a unit check 
condition (lOERBLOK) . The related sense data is 
analyzed as it relates to the previous operation 
(CONTASK or BSCBLOK, whichever is applicable) . 
If a channel check is encountered by the channel 
check interruption handler, the channel check 
interruption (DMKBSC) procedures determine if 
recovery can be attempted. If it cannot be 
retried, that operation is aborted and an 
appropriate message is sent to the system 
operator. 

Depending on the error encountered, ERP 
receives control and either DMKBSC or DMKGRA and 
DMKGRB determines if this is the first entry 
into the ERP for this task. The lOBRCNT (lOB 
error count) field of the lOB is zero on initial 
entry. On this first entry, the pointer to the 
lOERBLOK is placed in the RDEVIOER field of the 
RDEVBLOK. This preserves the original error CSH 
and sense information for recording. 
Thereafter, lOERBLOKs are discarded before a 
retry is attempted or a permanent error is 
passed to lOS. 

The ERP looks for two other specific 
conditions. If the error count field is not 
zero, entry must be due to a recovery attempt. 
Thus, it may be a solicited device end to 
correct an intervention required condition or a 
retry attempt channel program re-execution. 

The ERP keeps track of the number of retries 
in the lOBRCNT field of the lOBLOK to determine 
if a retry limit has been exceeded for a 
particular error. If the specified number of 
retries fails to correct the error, the error is 
recorded and DMKIOS is notified of the permanent 
error by turning on a status flag in the lOBLOK 
(I0BSTAT=I03FATAL) . 

If the error is corrected, the temporary 
error is not recorded and control is returned to 
DMKIOS with error flags all off. 

When ERP has determined a permanent error 
situation or successfully recovered from an 
error, all auxiliary storage obtained for 
recovery CCWs, buffers, and lOERBLOKs is freed 
before a return is made to DMKIOS (see Figure 23 
for a summary of the lOB indicators). Also, the 
statistical counters for 3270 are updated. 



If the error is uncorrectable or operator 
intervention is necessary, ERP calls the message 
writer to write the specific message. 
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THE CONVERSATIONAL MONITOR SYSTEM (CHS) 



Introduction to CMS 

Interruption handling 

Functional information (how CMS works) 

— Register usage 

— DMSNUC structure 
-- Storage structure 

— Free storage management 

— SVC handling 

OS macro simulation 



The Conversational Monitor System (CMS) , the 
major subsystem of VM/370, provides a 
comprehensive set of conversational facilities 
to the user. Several copies of CMS may run 
under CP, thus providing several users with 
their own time-sharing system. CMS is designed 
specifically for the VM/370 virtual machine 
environment. 



Reference, 
processing. 



Figure 23 describes CHS command 



THE FILE SYSTEM 



CMS interfaces with virtual disks, tapes, and 
unit record equipment. The CMS residence device 
is kept as a read-only, shared, system disk. 
Permanent user files nay be accessed from up to 
nine active disks. CMS controls logical access 
to those virtual disks, while CP facilities 
manage the device sharing and virtual-to-real 
mapping. 

Oser files in CMS are identified with three 
designators: the filename, the filetype, which 
can imply specific file characteristics to the 
CMS file management routines, and the filemode, 
which describes the location and access mode of 
the file. 



Each copy of CHS supports a single user. 
This means that the storage area contains only 
the data pertaining to that user. Likewise, 
each CHS user has his own machine configuration 
and his own files. Debugging is simpler because 
the files and storage area are protected from 
other users. 

Programs can be debugged from the terminal. 
The terminal is used as a printer to examine 
limited amounts of data. After examining 
program data, the terminal user can enter 
commands on the terminal to alter the program. 
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Part of the CHS environment is related to the 
virtual machine environment created by CP. Each 
user is completely isolated from the activities 
of all other users, and each machine in which 
CHS executes has virtual storage available to it 
and managed for it. The CP commands are 
recognized by CHS. For example, the commands 
allow messages to be sent to the operator or to 
other users, and virtual devices to be 
dynamically detached from the virtual machine 
configuration. 



THE CHS COMMAND LANGUAGE 



The CMS command language offers terminal users a 
wide range of functions. It supports a variety 
of programming languages, service functions, 
file manipulation, program execution control, 
and general system control. The CMS commands 
that are useful in debugging are discussed in 
"Debugging with CMS" in this section. For 
detailed information on all other CHS commands, 
refer to the VM^370: CHS Command and Macro 



The compilers available under CMS default to 
particular input filetypes, such as ASSEMBLE, 
but the file manipulation and listing commands 
do not. Files of a particular filetype form a 
logical data library for a user; for example, 
the collection of all COBOL source files, or of 
all object (TEXT) decks, or of all EXEC 
procedures. This allows selective handling of 
specific groups of files with ninimua input by 
the user. 



User files can be created directly from the 
terminal with the CMS EDIT facility. EDIT 
provides extensive context editing services. 
File characteristics such as record length and 
format, tab locations, and serialization options 
can be specified. The system includes standard 
definitions for certain filetypes. 

CMS automatically allocates compiler work 
files at the beginning of command execution on 
whichever active disk has the greatest amount of 
available space, and deallocates them at 
completion. Compiler object decks and listing 
files are normally allocated on the same disk as 
the input source file or on the primary 
read/write disk, and are identified by combining 
the input filename with the filetypes TEXT and 
LISTING. These disk locations may be overridden 
by the user. 

A single user file is limited to a maximum of 
65533 records and must reside on one virtual 
disk. The file management system limits the 
number of files on any one virtual disk to 3U00. 
All CMS disk files are written as 800-byte 
records, chained together by a specific file 
entry that is stored in a table called the 
master file directory; a separate master file 
directory is kept for, and on, each virtual 
disk. The data records may be discontiguous, 
and are allocated and deallocated 
automatically. A subset of the master file 
directory (called the user file directory) is 
made resident in virtual storage when the disk 
directory is made available to CMS; it is 
updated on the virtual disk at least once per 
command if the status of any file on that disk 
has been changed. 
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virtual disks nay be shared by CMS users; the 
facility is provided by VM/370 to all virtual 
machines, although a user interface is directly 
available in CMS commands. Specific files may 
be spooled between virtual machines to 
accomplish file transfer between users. 
Commands allow such file manipulations as 
writing from an entire disk or from a specific 
disk file to a tape, printer, punch, or the 
terminal. Other commands write from a tape or 
virtual card reader to disk, rename files, copy 
files, and erase files. Special macro libraries 
and text or program libraries are provided by 
CMS, and special commands are provided to update 
and use them. CMS files can be written onto and 
restored from unlabeled tapes via CHS commands. 

Caution: Multiple write access under CMS can 
produce unpredictable results. 

Problem programs which execute in CMS can 
create files on unlabeled tape in any record and 
block size; the record format can be fixed, 
variable, or undefined. Figure 21 describes the 
CHS file system. 



PROGRAM DEVELOPMENT 



CMS includes commands to create and compile 
source programs, to modify and correct source 
programs, to build test files, to execute test 
programs and to debug from the terminal. The 
commands of CMS are especially useful for OS and 
DOS/VS program development, but also may be used 
in combination with other operating systems to 
provide a virtual machine program development 
tool. 

CMS utilizes the OS and DOS/VS compilers via 
interface modules; the compilers themselves 
normally are not changed. To provide suitable 
interfaces, CMS includes a certain degree of OS 
and DOS/VS simulation. The seguential, direct, 
and partitioned access methods are logically 
simulated; the data records are physically kept 
in the chained 800-byte blocks which are 
standard to CMS, and are processed internally to 
simulate OS data set characteristics. CMS 
supports VSAM catalogs, data spaces, and files 
on OS and DOS disks using the DOS/VS Access 
Method Services. OS SVC functions such as 
GETMAIN/FREEHAIN and TIHE are simulated. The 
simulation restrictions concerning what types of 
OS object programs can be executed under CMS are 
primarily related to the OS/PCP, HFT, and MVT 
Indexed Sequential Access Method (ISAM) and the 
telecommunications access methods, while 
functions related to multitasking in OS and 
EOS/VS are ignored by CHS. 



SVC Interruptions 



The Conversational Monitor System is SVC 
(supervisor call) driven. SVC interruptions are 
handled by the DMSITS resident routines. Two 
types of SVCs are processed by DMSITS: internal 
linkage SVC 202 and 203, and any other SVCs. 
The internal linkage SVC is issued by the 
command and function programs of the system when 
they require the services of other CMS programs. 
(Commands entered by the user from the terminal 
are converted to the internal linkage SVC by 
DMSINT) . The OS SVCs are issued by the 
processing programs (for example, the 
Assembler) . 

INTERNAL LINKAGE SVCS: Hhen DMSITS receives 
control as a result of an internal linkage SVC 
(202 or 203), it saves tllie contents of the 
general registers, floating-point registers, and 
the SVC old PSW, establishes the normal and 
error return addresses, and passes control to 
the specified routine. (The routine is specified 
by the first 8 bytes of the parameter list whose 
address is passed in register 1 for SVC 202, or 
by a halfword code following SVC 203.) 

For SVC 202, if the called program is not 
found in the internal function table of nucleus 
(resident) routines, then DMSITS attempts to 
call in a module (a CMS file with filetype 
MODULE) of this name via the LOADHOD command. 

If the program was not found in the function 
table, nor was a module successfully loaded, 
DMSITS returns an error indicator code to the 
caller. 

To return from the called program, DMSITS 
restores the calling program's registers, and 
makes the appropriate normal or error return as 
defined by the calling program. 
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In handling non-CMS SVC calls, DMSITS refers 
first to a user-defined SVC table (if any — set 
up by the DMSHDS program) . 

If the user-defined SVC table is present, any 
SVC number (other than 202 or 203) is looked for 
in that table. If it is found, control is 
transferred to the routine at the specified 
address. 



INTERRUPTION HANDLING IN CMS 



CMS receives virtual SVC, input/output, program, 
machine, and external interruptions and passes 
control to the appropriate handling program. 



If the SVC number is not found in the 
user-defined SVC table (or if the table is 
nonexistent) , the standard system table of OS 
calls is searched for that SVC number. If the 
SVC number is found, control is transferred to 
the corresponding address in the usual manner. 
If the SVC number is not in either table, then 
the supervisor call is treated as an ABEND 
call. 
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DMSMJC Area of Storage 



Disk Storage 
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The DMSHDS initialization program sets up the 
user-defined SVC table. It is possible for a 
user to provide his own SVC routines. 



lIl£iJ^/fOut£ut Interruptions 



All input/output interruptions are received by 
the I/O interrupt handler, DMSITI. DMSITI saves 
the I/O old PSH and the CSH (channel status 
word) . It then determines the status and 
requirements of the device causing the 
interruption and passes control to the routine 
that processes interruptions from that device. 
DMSITI scans the entries in the device table 
until it finds the one containing the device 
address that is the same as that of the 
interrupting device. The device table (DEVTAB) 
contains an entry for each device in the 
system. Each entry for a particular device 
contains, among other things, the address of the 
program that processes interruptions from that 
device. 

When the appropriate interrupt handling 
routine completes its processing, it returns 
control to DHSITI. At this point, DMSITI tests 
the wait bit in the saved I/O old PSW. If this 
bit is off, the interruption was probably caused 
by a terminal (asynchronous) I/O operation. 
DMSITI then returns control to the interrupted 
program by loading the I/O old PSW. 

If the wait bit is on, the interruption was 
probably caused by a nonterminal (synchronous) 
I/O operation. The program that initiated the 
operation most likely called the DHSIOW function 
routine to wait for a particular type of 
interruption (usually a device end.) In this 
case, DMSITI checks the pseudo-wait bit in the 
device table entry for the interrupting device. 
If this bit is off, the system is waiting for 
some event other than the interruption from the 
interrupting device; DMSITI returns to the wait 
state by loading the saved I/O old PSW. (This 
PSW has the wait bit on.) 

If the pseudo-wait bit is on, the system is 
waiting for an interruption from that particular 
device. If this interruption is not the one 
being waited for, DMSITI loads the saved I/O old 
PSW. This will again place the machine in the 
wait state. Thus, the program that is waiting 
for a particular interruption will be kept 
waiting until that interruption occurs. 

If the interruption is the one being waited 
for, DMSITI resets both the pseudo-wait bit in 
the device table entry and the wait bit in the 
I/O old PSW. It then loads that PSW. This 
causes control to be returned to the DHSIOW 
function routine, which, in turn, returns 
control to the program that called it to wait 
for the interruption. 

IISIINAI: lOIM UPTIOli S : Terminal input/output 
interruptions are handled by the DMSCIT module. 
All interruptions other than those containing 
device end, channel end, attention, or unit 
exception status are ignored. If device end 



status is present with attention and a write CCW 
was terminated, its buffer is unstacked. An 
attention interrupt causes a read to be issued 
to the terminal, unless attention exits have 
been queued via the ST AX macro. The attention 
exit with the highest *T>f lority is given control 
at each attention until the queue is exhausted, 
then a read is issued. Device end status 
indicates that the last I/O operation has been 
completed. If the last I/O operation was a 
write, the line is deleted from the output 
buffer and the next write, if any, is started. 
If the last I/O operation was a normal read, the 
buffer is put on the finished read list and the 
next operation is started. If the read was 
caused by an attention interrupt, the line is 
first checked for the commands RT, HO, HT, or 
HX, and the appropriate flags are set if one is 
found. Unit exception indicates a canceled 
read. The read is reissued, unless it had been 
issued with ATTHEST=NO, in which case unit 
exception is treated as device end. 

BEADER/PDHCH/PEINTER_INTERROPTIONS: 
Interruptions from these devices are handled by 
the routines that actually issue the 
corresponding I/O operations. When an 
interruption from any of these devices occurs, 
control passes to DMSITI. Then DHSITI passes 
control to DHSIOW, which returns control to the 
routine that issued the I/O operation. This 
routine can then analyze the cause of the 
interruption. 

gSEH CONTROLLED DEVICE INTERRUPTIONS: Interrupts 
from devices under user control are serviced the 
same as CHS devices except that DHSIOW and 
DHSITI manipulate a user created device table, 
and DMSITI passes control to any user written 
interrupt processing routine that is specified 
in the user device table. Otherwise, the 
processing program regains control directly. 



II2Siaj Interruptions 



The program interruption handler, DHSITP, 
receives control when a program interruption 
occurs. When DHSITP gets control, it stores the 
program old PSW and the contents of the 
registers 1U, 15, 0, 1, and 2 into the program 
interruption element (PIE) . (The routine that 
handles the SPIE macro instruction has already 
placed the address of the program interuption 
control area (PICA) into PIE.) DHSITP then 
determines whether or not the event that caused 
the interruption was one of those selected by a 
SPIE macro instruction. If it was not, DHSITP 
passes control to the DHSABN ABEND recovery 
routine. 

If the cause of the interruption was one of 
those selected in a SPIE macro instruction, 
DHSITP picks up the exit routine address from 
the PICA and passes control to the exit 
routine. Upon return from the exit routine, 
DHSITP returns to the interrupted program by 
loading the original program check old PSW. The 
address field of the PSW was modified by a SPIE 
exit routine in the PIE. 
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l3Lternal Interru£tions 



On return 
contains: 



froB a routine, register 15 



An external interruption causes control to be 
passed to the external interrupt handler DMSITE. 
If the user has issued the HNDEXT macro to trap 
external interrupts, DMSITE passes control to 
the user's exit routine. If the interrupt was 
caused by the timer, DMSITE resets the timer and 
types the BLIP character at the terminal. The 
standard BLIP timer setting is two seconds, and 
the standard BLIP character is upper case, 
followed by the lower case (it moves the 
typeball without printing) . Otherwise, control 
is passed to the DEBUG routine. 



Return 

_Code_ 



<0 

>0 



Meaning 

No error occurred 
Called routine not found 
Error occurred 



If a CMS routine is called by an SVC 202, 
registers through ll are saved and restored by 
CMS. 

Most CMS routines use register 12 as a base 
register . 



!3§.2liill§ Check InterruEtions 



Hard machine check interruptions on the real CPU 
are not reflected to a CMS virtual user by CP. 
A message prints on the console indicating the 
failure. The user is then disabled and must IPL 
CMS again in order to continue. 



FUNCTIONAL INFORMATION 



The most important thing to remember about CMS, 
from a debugging standpoint, is that it is a 
one-user system. The supervisor manages only 
one user and keeps track of only one user's file 
and storage chains. Thus, everything in a dump 
of a particular machine relates only to that 
virtual machine's activity. 

You should be familiar with register usage, 
save area structuring, and control block 
relationships before attempting to debug or 
alter CMS. 



Structure of DMSNUC 



DMSNUC is the portion of storage in a CHS 
virtual machine that contains system control 
blocks, flags, constants, and pointers. 

The CSECTs in DMSNUC contain only symbolic 

references. This means that an update or 
modification to CMS, which changes a CSECT in 

DMSNUC, does not automatically force all CMS 

modules to be recompiled. Only those modules 

that refer to the area that was redefined must 
be recompiled. 



USEBSECT (User Area) 



The USERSECT CSECT defines space that is not 
used by CMS. A modification or update to CMS 
can use the 18 fullwords defined for USEBSECT. 
There is a pointer (AUSER) in the NUCON area to 
the user space. 



DEVTAB (Device Table) 



l§3ister Usac|e 
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The use of Registers and 2 

s. 



On entry 
SVC 202: 

Register 
1 

12 

13 

14 

15 



to a command or routine called by 



the PLIST supplied 
of the 



Contents 

The address of 

by the caller 

The address entry point 

called routine 

The address of a work area (12 

doublewords) supplied by SVCINT 

The return address to the SVCINT 

routine 

The entry point (same as register 

12) 



The DEVTAB CSECT is a table describing the 
devices available for the CMS system. The table 
contains the following entries: 

1 console 
10 disks 
1 reader 
1 punch 
1 printer 
4 tapes 

You can change some existing entries in 
DEVTAB. Each device table entry contains the 
following information: 



Virtual device address 
Device flags 
Device types 
Symbol device name 
Address of the interrupt 
(for the console) 



processing routine 



The virtual address of the console is defined 
at IPL time. The virtual address of the user 
disks can be altered dynamically with the ACCESS 
command. The virtual address of the tapes can 
be altered in the device table. Changing the 
virtual address of the reader, printer, or punch 
will have no effect. 
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STRDCTORE OF CMS STORAGE 



• Loader Tables (Top pages of storage) 



Figure 22 describes how CMS uses its virtual 
storage. The pointers indicated (MAINSTRT, 
HAINHIGH, FREELOWE, and FREEUPPR) are all found 
in NUCON (the nucleus constant area) . 



The sections 
following uses: 



of CMS storage have 



the 



• DMSNUC (X« 00000" to approximately X«03000«) 

This area contains pointers, flags, and other 
data updated by the various system routines. 



The top of storage is occupied by the Loader 
Tables that are required by the CMS loader. 
These tables indicate which modules are 
currently loaded in the User Program Area 
(and the Transient Program Area after a LOAD 
COMMAND) . The size of the Loader Tables can 
be varied by the SET LDRTBLS command. 
However, to successfully change the size of 
the Loader Tables, the SET LDRTBLS command 
must be issued immediately after IPL. 



FREE STORAGE MANAGEMENT 



Low Storage DMSFBEE Free Storage 
(Approximately X'03000' to X'OEOOO' 



Area 



This area is a free storage area, from which 
requests from DMSFREE are allocated. The top 
part of this area contains the File Directory 
for the System Disk (SSTAT) . If there is 
enough room (as there will be in most cases) , 
the FREETAB table also occupies this area, 
just below the SSTAT. 



• Transient Program Area (X'OEOOO" to X« 10000') 

Because it is not essential to keep all 
nucleus functions resident in storage all the 
time, some of them are made "transient." 
This means that when they are needed, they 
are loaded from the disk into the Transient 
Program Area. Such programs may not be 
longer than two pages, because that is the 
size of the Transient Area. (A page is 4096 
bytes of virtual storage.) All transient 
routines must be serially reusable since they 
are not read in each time they are needed. 



Free storage can be allocated by the GETMAIN or 
DMSFREE macros. Storage allocated by the 
GETMAIN macro is taken from the user program 
area, beginning after the high-address of the 
user program. 

Storage allocated by the DMSFREE macro can be 
taken from several areas. 

If possible, DMSFREE requests are allocated 
from the low-address free storage area. 
Otherwise, DMSFREE requests are satisfied from 
the storage above the user program area. 

There are two types of DMSFREE requests for 
free storage: requests for USER storage and 
NUCLEUS storage. Because the two types of 
storage are kept in separate UK pages, it is 
possible for storage of one type to be available 
in low storage, while no storage of the other 
type is available. 



^ETMAIN Free Storage Management 



CMS Nucleus (X' 10000' to X'20000') 

Segment 1 of storage contains the reenterable 
code for the CMS Nucleus routines. In shared 
CMS systems, this is the "protected segment." 
That is, this segment must consist only of 
reenterable code, and may not be modified 
under any circumstances. This fact implies 
certain system restrictions for functions 
which require that storage be modified, such 
as the fact that DEBUG breakpoints or CP 
address stops cannot be placed in this 
segment, in a saved system. 



All GETMAIN storage is allocated in the user 
program area, starting after the end of the 
user's actual program. Allocation begins at the 
location pointed to by the NUCON pointer 
MAINSTRT. The location MAINHIGH in NUCON is the 
"high-extend" pointer for GETMAIN storage. 

Before issuing any GETMAIN macros, user 
programs must use the STRINIT macro to set up 
user free storage pointers. The STRINIT macro is 
issued only once, preceding the initial GETMAIN 
request. The format of the STRINIT macro is: 



• User Program Area (X' 20000' to Loader Tables) 

User programs are loaded into this area by 
the LOAD command. Storage allocated by means 
of the GETMAIN macro instruction is taken 
from this area, starting from the high 
address of the user program. In addition, 
this storage area can be allocated from the 
top down by DMSFREE, if there is not enough 
storage available in the low DMSFREE storage 
area. Thus the usable size of the User 
Program Area is reduced by the amount of free 
storage which has been allocated from it by 
DMSFREE. 



I [label] I STRINIT | | TYPCALL= | SVC || 
I I II IBALRII 

I I I •■ L JJ 



where: 



TYPCALL=|SVC | 
IBALRj 



indicates how control is passed to 
DMSSTG, the routine that processes the 
STRINIT macro. Because DMSSTG is a 
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END OF STORAGE 



VIRTUAL 
STORAGE 



FREEUPPR- 



FREELOWE- 



System Loader Table (Size determined 
by SET LDRTBLS command) storage Key = XT' 



DMSFREE requests when 
no more low storage available 




-L Unused portion of User 
Program Area 



MAIN HIGH 



MAINSTRT- 



X'20000' 



Storage Key ^ X'E' 



GETMAIN requests 




The User's Program 

(program is loaded via the 

LOAD command) 



Storage Key = X'E' 



X'10000- 



X'EOOO' ■ 



X'3000' 



X'O' 



CMS Nucleus 

In "saved systems" this area 

is a protected segment , 

(that is, all code must be 

reentrant and cannot be 

modified) 

Storage Key = X'F' 



Transient Program Area 

Storage Key = X'E' 



Low Storage DMSFREE Free Storage Area 
DMSFREE requests are filled from 
this area. The upper part of this 
area contains the System Disk MFD 
followed by the FREETAB, if there is 
enough room. 

Storage Key = X'E' or X'F* 



DMSNUC 

System Control Blocks, flags, constants, 
and pointers. 

Storage Key = X'F" 



*The half-page containing OPSECT and TSOBLOKS 
has a storage key = X'E' 



Figure 22. CMS Storage Map 




CONTROL BLOCKS 
■IN FREE STORAGE- 



LDRST 



CMSSAVE 



User 
\ Program 
Area 



CMSCB 




DMSNUC 



USERSECT 



SUBSECT 



TSOBLKS 



OPSECT 



DMSABW 



DMSFRT 



DMSERT 



DBGSECT 



CVTSECT 



FVS 



DIOSECT 



SVCSECT 



PGMSECT 



lOSECT 



EXTSECT 



AFTSECT 



ADTSECT 



DEVTAB 



Terminal Buffer and Saveareas 



SYSREF 



MACDIRCandTXTDIRC 



NUCON 



X'3000' 

X'2AD8' 

X'2A40' 

X'29B0' 

X'2800' 

X'2350' 

X'2300' 
X'2190' 
X-IDDC 

X'ICCB' 

X'lADB' 

X'19E8' 

X'1748' 

X'lBBO' 
X'1620' 

X'1550' 

X'1200' 

X'DFO' 
X'C90' 
X'700' 
X'600' 
X'2E0' 
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nucleus-resident routine, other 
nucleus-resident routines can branch 
directly to it (TYPCALL=BALR) while 
routines that are not nucleus-resident 
must use linkage SVC (TYPCALL=SVC) . If 
no operands are specified the default 
is TYPCALL=SVC. 



H 
MAIN 
of t 
As s 
area 
poin 
are 
this 
toun 
the 



hen the 
STET and M 
he user's 
torage is 
to satis 
ter is ad 
always in 

pointer 
dary . As 
MAINHIGH p 



STRINIT ma 
AINHIGH ar 
program, i 
allocated 
fy GETMAIN 
justed upw 
multiples 

is alw 
the alloca 
ointer is 



cro IS e 

e initiali 

n the user 

from the 

requests, 
ard. Su 

of double 
ays on 
ted storag 
adjusted d 



xecuted, both 

zed to the end 

program area. 

user program 

the MAINHIGH 

ch adjustments 

words, so that 

a doubleword 

e is released, 

ownward. 



The pointer MAINHIGH can never be higher than 
FBEELOHE, the "low-extend" pointer for DMSFREE 
storage allocated in the user program area. If 
a GETMAIN request cannot be satisfied without 
extending MAINHIGH above FREELOHE, GETMAIN 
takes an error exit, indicating that 
insufficient storage is available to satisfy the 
request. 



Refer to Figure 22 for a 
virtual storage usage. 

The format of an element 
element chain is as follows: 



description of CMS 
on the GETMAIN free 



0(0) 



4(4) 



FREPTR — pointer to next free 
element in the chain, or 
if there is no next element 

FRELEN — length, in bytes, of 
this element 

Remainder of this free element 



When issuing a variable length GETMAIN, six 
and a half pages are reserved for CMS usage; 
this is a design value. A user who needs 
additional reserved pages (for example, for 
larger directories) should free up some of the 
variable GETMAIN storage from the high end. 



The area between MAINSTRT and MAINHIGH may 
contain blocks of storage that are not 
allocated, and that are therefore available for 
allocation by a GETMAIN instruction. These 
blocks are chained together, with the first one 
pointed to by the NUCON location MAINSTRT. 



DMSFBEE Free Storage Manaflement 



The DMSFREE macro allocates CMS free 
The format of the DMSFBEE macro is: 



storage. 



[label] I DMSFREE | DMORDS= 



/ n I |,MIN=/ n \ 
t (0)/ I \0)f 



r r TT r r n 

|,TYPE=|DSER II |,ERR=|laddr I I 

I INUCLEUSII I i f II 

L L JJ L L JJ 



|,AREA=|LON II 
I IHIGHII 

L L J J 



|,TYPCALL=|SVC | | 
I IBALRII 

L L JJ 



where: 



label 



DWORDS= 



a valid assembler language label. 



{,S,} 



MIN = 



is the number of doublewords of free 
storage requested. DHORDS=n specifies 
the number of doublewords directly and 
DHOEDS= (0) indicates that register 
contains the number of doublewords 
requested. 



{,",} 



indicates a variable request for free 
storage. If the exact number of 
doublewords indicated by the DWORDS 



operand is not available 
block of storage that is 
or equal to the minimum 
HIN=n specifies the mini 
doublewords of free stor 
while MIN=(1) indicate 
minimum is in register 1 
amount of free storage 
returned to the requestin 
general register 0. 



the JLargest 

greater than 

is returned. 

mum number of 

age directly 

s that the 

The actual 

allocated is 

g routine via 



TYPE=|USER I 
INOCLEUSI 

L J 

indicates the type of CMS storage with 
which this request for free storage is 
filled: USER or NUCLEUS. 
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ERR=|laddr| 
I * I 



is the return address if any error 
occurs, "laddr" is any address that 
can be referred to in a LOAD ADDRESS 
(LA) instruction. The error return is 
taken if there is a macro coding error 
or if there is not enough free storage 
available to fill the request. If * 
is specified for the return address, 
the error return is the same as a 
normal return. 



AREA=|LOH I 
I HIGH I 



indicates the area of CMS free storage 



from which this 
storage is filled, 
low storage area 
the the transient 
indicates the area 



request for free 

LOU indicates the 

between DHSNUC and 

program area. HIGH 

of storage between 



the user program area and the CMS 

loader tables. If AREA is not 

specified, storage is allocated 
wherever it is available. 



r T 

TYPCALL=|SVC | 

|BALB| 



indicates how control is passed to 
DMSFREE. Because DMSFREE is a 
nucleus-resident routine, other 
nucleus-resident routines can branch 
directly to it (TYPCALL=BALR) while 



routines that are not nucleus-resident 
must use linkage SVC (TYPCALL=SVC) . 



The pointers FREEUPPR and PREELOWE in NDCOH 
indicate the amount of storage that DMSFREE has 
allocated from the high portion of the user 
program area. These pointers are initialized to 
the beginning of the loader tables. 

The pointer PREELOWE is the "low-extend" 
pointer of DMSFREE storage in the user program 
area. As storage is allocated from the user 
program area to satisfy DMSFREE requests, this 
pointer is adjusted downward. Such adjustments 
are always in multiples of UK bytes, so that 
this pointer is always on a 4K boundary. As the 
allocated storage is released, this pointer is 
adjusted upward. 



The pointer FHEELOHE can 
MAINHIGH, the "high-extend" 



never be lower than 
pointer for GETMAIN 



storage. If a DMSFREE request cannot be 
satisfied without extending PREELOWE below 
MAINHIGH, DMSFREE takes an error exit, 
indicating that insufficient storage is 
available to satisfy the request. Figure 22 
shows the relationship of these storage areas. 

The FREETAB free storage table is kept in 
free storage, usually iii low-storage, just below 
the master file directory for the system disk 
(S-disk) . However, the FREETAB may be located 
at the top of the user program area. This table 
contains one byte for each page of virtual 
storage. Each such byte contains a code 
indicating the use of that page of virtual 
storage. The codes in this table are as 
follows: 
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Code 

USERCODE (X'01«) 



8UCC0DE (X'02') 

TRNCODB (X«03«) 

USARCODE (X«Oa«) 

SYSCODE (X'05') 



Meanincj 

The page is assigned to user 

storage. 

The page is assigned to 
nucleus storage. 



The page is part of 
transient program area. 



the 



The page is part of the user 
program area. 

The page is none of the 
above. The page is assigned 
to systen storage, system 
code, or the loader tables. 



Other DHSFHEE storage pointers are maintained 
in the DMSFRT CSECT, in NUCON. The four chain 
header blocks are the most important fields in 
DMSFET. The four chains of unallocated elements 
are: 

• The low-storage nucleus chain 

• The low-storage user chain 

• The high-storage nucleus chain 

• The high-storage user chain 

For each of these chains of unallocated 
elements, there is a control block consisting of 
four words, with the following format: 



0(0) 



4(4) 



8(8) 



12(C) 



where: 



POINTER 



— pointer to the first 
free element on the 
chain; it is zero, if 
the chain is empty. 



SUM — the number of elements on 
the chain. 



MAX — a value equal to or 
greater than the size 
of the largest element. 



FLAGS- 

Flag 

byte 



I SKEY - I TCODE -| Unused 
[Storage IFREETAB | 
I key I code | 



POINTER points to the first element on this 
chain of free elements. If there are 
no elements on this free chain, the 
POINTER field contains all zeros. 



FLAGS The following flags are used: 

• FLCLN (X»80«) — Clean-up flag. 
This flag is set if the chain must 
be updated. This is necessary in 
the following circumstances: 

If one of the two high-storage 
chains contains a IK page that 
is pointed to by FREELOHE, then 
that page can be removed from 
the chain, and FREELOHE can be 
increased. 

All completely unallocated 4K 
pages are kept on the user 
chain, by convention. Thus, if 
one of the nucleus chains 
(low-storage or high-storage) 
contains a full page, then this 
page must be transferred to the 
corresponding user chain. 

• FLCLB (X'40M — Destroyed flag. 
Set if the chain has been 
destroyed. 

• FLHC (X'20») — High-storage chain. 
Set for both the nucleus and user 
high-storage chains. 

• FLNU (X'10») — Nucleus chain. Set 
for both the low-storage and 
high-storage nucleus chains. 

• FLPA (X'08«) — Page available. 
This flag is set if there is a full 
UK page available on the chain. 
This flag may be set even if there 
is no such page available. 

SKEY contains the 1-byte storage key 
assigned to storage on this chain. 

TCODE contains the 1-byte FREETAB table code 
for storage on this chain. 



^llSSSiiSS 2§§I Zl§§ Storage 



When DMSFREE with TyPE=USEE (the default) is 
called, one or more of the following steps are 
taken in an attempt to satisfy the request. As 
soon as one of the following steps succeeds, 
then user free storage allocation processing 
terminates. 



NUN 



MAX 



contains the number of elements on 
this chain of free elements. If there 
are no elements on this free chain, 
this field contains all zeros. 



avoids failing s 
a number not ex 
bytes, of the 1 
free chain. Th 
element of a giv 
if that size ex 
However, this n 
larger than the 
free element on 



earches. It contains 
ceeding the size, in 
argest element on the 
us, a search for an 
en size is not be made 
ceeds the MAX field, 
umber may actually be 
size of the largest 
the chain. 



1. Search the low-storage user chain for a 
block of the required size. 

2. Search the high-storage user chain for a 
block of the required size. 

3. Extend high-storage user storage downward 
into the user program area, modifying 
FREELOHE in the process. 

1. For a variable request, put all available 
storage in the user program area onto the 
high-storage user chain, and then allocate 
the largest block available on either the 
high-storage user chain or the low-storage 
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user chain. The allocated block will not 
be satisfactory unless it is larger than 
the minimum requested size. 



Ail2£3iiill3 Nucleus Free Storage 



When DMSFREE with TYPE=NUCLEDS is called, the 
following steps are taken in an attempt to 
satisfy the request, until one succeeds: 

1. Search the low-storage nucleus chain for a 
block of the required size. 

2. Get free pages from the low-storage user 
chain, if any are available, and put them 
on the low-storage nucleus chain. 

3. Search the high-storage nucleus chain for a 
block of the required size. 



4. Get free pages from the high-storage user 
chain, if they are available, and put thea 
on the high-storage nucleus chain. 

5. Extend high-storage nucleus storage 
downward into the user program area, 
modifying FBEELONE in the process. 

6. For variable requests, put all available 
pages from the user chains and the user 
program area onto the nucleus chains, and 
allocate the largest block available on 
either the low-storage nucleus chains, or 
the high-storage nucleus chains. 



£§1§§§1!13 Storage 



The DMSFHET macro releases free storage 
previously allocated with the DHSFREE macro. 
The format of the DMSFHET macro is: 



[label] I DMSFRET | DHORDS= 



/ n \,LOC=/laddr ) 
1(0)1 t (1) / 



I r r TT r r tt 

I I ,ERR=|laddr| I | ,TYPCALL= | SVC || 

II I * II I IBALHII 

I L L JJ L L JJ 



w her e : 
label 



EHORDS= 



is any valid assembler language label. 



{(S.l 



is the number of doublewords of 
storage to be released. DWORDS=n 
specifies the number of doublewords 
directly and DHORDS= (0) indicates that 
register contains the number of 
doublewords being released. 



LOC=/laddr| 
I (1 



(1) I 



is the address of the block of storage 
being released. "laddr" is any 
address that can be refereed to in a 
LOAD ADDRESS (LA) iastruction. 
LOC=laddr specifies the address 
directly while L0C=(1) indicates the 
address is in register 1 . 



ERR=|laddr| 
I 1 I 



is the return address if an error 
occurs, "laddr" is any address that 
can be referred to by a LOAD ADDRESS 
(LA) instruction. The error return is 
taken if there is a macro coding error 
or if there is a problem returning the 
storage. If * is specified, the error 
return address is the same as the 
normal return address. 



TYPCALL=|SVC | 
IBALRI 

L J 

indicates how control is passed to 
DHSFRET. Because DNSFRET is a 
nucleus-resident routine, other 
nucleus-resident routines can branch 
directly to it (TYPCALL=BALR) while 
routines that are not nucleus-resident 
must use SVC linkage (TYPCALL=SVC) . 

When DHSFRET is called, the block being 
released is placed on the appropriate chain. At 
that point, the final update operation is 
performed, if necessary, to advance FREELOWE, or 
to move pages from the nucleus chain to the 
corresponding user chain. 

Similar update operations are performed, when 
necessary, after calls to DMSFREE, as well. 



££2;§§Sl&3 &li22lt§§ Storage 



Storage allocated by the GETMAIN macro 
instruction may be released in any of the 
following ways: 

1 . A specific block of such storage may be 
released by means of the FREEMAIN macro 
instruction. 

2. The STRINIT macro instruction releases all 
storage allocated by any previous GETMAIH 
requests. 
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3. Almost all CMS commands issue a STRINIT 
macro instruction. Thus, executing almost 
any CMS command causes all GETMAIN storage 
to be released. 

Storage allocated by the DMSFREE macro 
instruction may be released in any of the 
following ways: 

1 . A specific block of such storage may be 
released by means of the DMSFRET macro 
instruction. 

2. Whenever any user routine or CMS command 
abnormally terminates (so that the routine 
DMSABN is entered) , and the ABEND recovery 
facility of the system is invoked, all 
DMSFREE storage with TYPE=0S1R is released 
automatically. 



Except in the case of ABEND recovery, storage 
allocated by the DMSFREE macro is never released 
automatically by the system. Thus, storage 
allocated by means of this macro instruction 
should always be released explicitly by means of 
the DMSFRET macro instruction. 



DMSFREE Service Routines 



The system uses the DMSFRES macro instruction to 
request certain free storage management 
services. 

The format of the DMSFRES macro is: 



particular, it is 
possible to release a 
was never allocated. 



sometimes 
block which 



r~ — — — 
IClabel]|DMSFRES| 


INIT1 


r r TT 


"I 




INIT2 


1 ,TYPCALL=|SVC || 






CHECK 


1 IBALRII 






CKON 


L L J J 






CKOFF 








UREC 






I 


CALOC 




1 



where : 
label 

ISIT1 



is any valid 
label. 



assembler language 



invokes the first free storage 
initialization routine, so that free 
storage requests can be made to access 
the system disk. Before this routine 
is invoked, no free storage requests 
may be made. After this routine has 
been invoked, free storage requests 
■ay be made, but these are subject to 
the following restraints until the 
second free storage management 
initialization routine has been 
invoked: 

• All requests for USER type storage 
are changed to requests for NUCLEUS 
type storage. 

• Error checking is limited before 
initialization is complete. In 



INIT2 



CHECK 



CKON 



• All requests that are satisfied in 
high storage must be of a temporary 
nature, since all storage allocated 
in high storage is released when 
the second free storage 
initialization routine is invoked. 

When CP • s saved system facility is 
used, the CMS system is saved at the 
point just after the A-Disk has been 
made accessible. It is necessary for 
DMSFRE to be used before the size of 
virtual storage is known, since the 
saved system can be used on any size 
virtual machine. Thus, the first 
initialization routine initializes 
DMSFRE so that limited functions can 
be requested, while the second 
initialization routine performs the 
initialization necessary to allow the 
full functions of DMSFRE to be 
exercised . 

invokes the second initialization 
routine. This routine is invoked 
after the size of virtual storage is 
known, and it performs initialization 
necessary to allow all the functions 
of DMSFRE to be used. The second 
initialization routine performs the 
following steps: 

1. Releases all storage that has 
been allocated in the 
high-storage area. 

2. Allocates the FREETAB free 
storage table. This table 
contains one byte for each 4K 
page of virtual storage, and so 
cannot be allocated until the 
size of virtual storage is 
known. 

3. The FREETAB table is initialized, 
and all storage protection keys 
are initialized. 

4. All completely unallocated UK 
pages on the low— storage nucleus 
free storage chain are removed to 
the user chain. Any other 
necessary operations are 
performed. 

invokes a routine which checks all 
free storage chains for consistency 
and correctness. Thus, it checks to 
see whether any free storage pointers 
have been destroyed. This option can 
be used at any time for system 
debugging. 



turns on a flag 
routine to be i 
is made to DMS 
can be useful 
(for example, 
identify the r 
storage manage 
should be ta 



which causes the CHECK 
nvoked each time a call 
FREE or DMSFRET. This 
for debugging purposes 
when you wish to 
outine destroying free 
■ent pointers) . Care 
ken when using this 
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option, since the CHECK routine is 
coded to be thorough rather than 
efficient. Thus, after the CKON 
option has been invoked, each call to 
DHSFBEE or DMSFBET takes Buch longer 
to be completed than before. 

CKOFF turns off the flag that was turned on 
by the CKOH option. 

UBEC is used by DMSABN during the ABEND 
recovery process to release all user 
storage. 

CALOC is used by DMSABN after the ABEND 
recovery process has been completed. 
It invokes a routine that returns, in 
register 0, the number of doublewords 
of free storage that have been 
allocated. DMSABN uses this number to 
determine whether ABEND recovery has 
been successful. 



Code Error 

c. The block overlaps another block already 
on the free storage chain. 

7 (DMSFBET) The address given for the block 
being released is not doubleword aligned. 

8 (DMSFRES) An Invalid request code was 
passed to the DHSFBES routine. Because all 
request codes are generated by the DMSFRES 
macro, this error code should never 
appear. 

9 (DMSFREE, DMSFRET, or DMSFRES) Unexpected 
and unexplained error in the free storage 
management routine. 



CMS HANDLING OF PSN KEYS 



j£ror Codes from DMSFRES, DMSFREE, and DMSFRET 



A nonzero return code upon return from DMSFRES, 
DMSFREE, or DMSFRET indicates that the request 
could not be satisfied. Register 15 contains 
this return code, indicating which error has 
occurred. The following codes apply to the 
DMSFRES, DMSFREE, and DMSFRET macros. 

Code Error 

1 (DMSFREE) Insufficient storage space is 
available to satisfy the request for free 
storage. In the case of a variable 
request, even the minimum request could not 
be satisfied. 



(DMSFREE or DMSFRET) 
destroyed . 



User storage pointers 



3 (DMSFREE, DMSFRET, or DMSFRES) Nucleus 
storage pointers destroyed. 

4 (DMSFREE) An invalid size was requested. 
This error exit is taken if the requested 
size is not greater than zero. In the case 
of variable requests, this error exit is 
taken if the minimum request is greater 
than the maximum request. (However, the 
latter error is not detected if DMSFREE is 
able to satisfy the maximum request.) 

5 (DMSFRET) An invalid size was passed to the 
DMSFRET macro. This error exit is taken if 
the specified length is not positive. 

6 (DMSFRET) The block of storage which is 
being released was never allocated by 
DMSFREE. Such an error is detected if one 
of the following errors is found: 

a. The block does not lie entirely inside 
either the low-storage free storage area 
or the user program area between 
FREEIOHE and FREEOFPR. 

b. The block crosses a page boundary that 
separates a page allocated for USER 
storage from a page allocated for 
NUCLEUS type storage. 



The the CMS nucleus protection scheme protects 
the CMS nucleus from inadvertent destruction by 
a user program, iithout it, it would be 
possible, for example, for a FORTRAN user who 
accidentally assigns an incorrectly subscripted 
array element to destroy nucleus code, wipe out 
a crucial table or constant area, or even 
destroy an entire disk by destroying the 
contents of the master file directory. 

In general, user programs and disk-resident 
CMS commands run with a PSW key of X'E', while 
nucleus code runs with PSW key of X'O*. 

There are, however, some exceptions to this 
rule. Certain disk-resident CMS commands run 
with a PSW key of X»0», because they have a 
constant need to modify nucleus pointers and 
storage. The nucleus routines called by the 
GET, PUT, READ, and WRITE macros run with a user 
PSW key of X'E', to increase efficiency. 



TWO macros are available to any routine that 
wishes to change its PSW key for some special 
purpose. These are the DMSKEY macro and the 
DMSEXS macro. 

The DMSKEY macro may be used to change the 
PSW key to the user value or the nucleus value. 
The DMSKEY NUCLEUS option causes the current PSW 
key to be placed in a stack, and a value of to 
be placed in the PSW key. The DMSKEY USER 
option causes the current PSW key to be placed 
in a stack, and a value of X'E' to be placed in 
the PSW key. The DMSKEY RESET option causes the 
top value in the DMSKEY stack to be removed and 
re-inserted into the PSW. 



It is a requirement of the CMS system that 
when a routine terminates, the DMSKEY stack must 
be empty. This means that a routine should 
execute a DMSKEY RESET option for each DMSKEY 
NUCLEUS option and each DMSKEY USER option 
executed by the routine. 

The DMSKEY key stack has a current maximum 
depth of seven for each routine. In this 
context, a "routine" is anything invoked by an 
SVC call. 
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The DMSKEY LASTOSER option causes the current 
PSH key to be placed in the stack, and a new key 
inserted into the PSW, determined as follows: 
the SVC system save area stack is searched in 
reverse order (top to botton) for the first save 
area corresponding to a user routine. The FSW 
key which was in effect in that routine is then 
taken for the new PSW key. (If no user routine 
is found in the search, then L&STOSER has the 
same effect as USER.) This option is used by OS 
nacro simulation routines when they must enter a 
user-supplied exit routine; the exit routine is 
entered with the PSW key of the last user 
routine on the SVC system save area stack. 

The HOSTACK option of DBSKEY may be used with 
NUCLEUS, USER, or LASTUSER (as in, for example, 
DMSKEY NUCLEUS, MOSTACK) if the current key is 
not to be placed on the DMSKEY stack. If this 
option is used, then no corresponding DMSKEY 
RESET should be issued. 

The DMSEXS ("execute in system mode") macro 
instruction is useful in situations where a 
routine is running with a user protect key, but 
wishes to execute a single instruction which, 
for example, sets a bit in the MUCON area. The 
single instruction may be specified as the 
argument to the DMSEXS macro, and that 
instruction will be executed with a system PSH 
key. 

Whenever possible, CMS commands run with a 
user protect key. This protects the CMS nucleus 
in cases where there is an error in the system 
command which would otherwise destroy the 
nucleus. If the command must execute a single 
instruction or small group of instructions that 
modify nucleus storage, then the DMSKEY or 
DMSEXS macros are used, so that the system PSH 
key will be used for as short a period of time 
as possible. 



SVC TYPES AND LINKAGE CONVENTIONS 



SVC conventions are important to any discussion 
of CMS because the system is driven by SVCs 
(supervisor calls) . SVCs 202 and 203 are the 
most common CMS SVCs. 



SVC 202 



SVC 202 is used both for calling nucleus 

resident routines, and for calling routines 

written as commands (for example, disk resident 
modules) . 

A typical coding sequence for an SVC 202 call 
is the following: 

LA R1,PLIST 

SVC 202 

DC AL4 (ERRADD) 

Hhenever SVC 202 is called, register 1 must 
point to a parameter list (PLIST) . The format of 
this parameter list depends upon the actual 
routine or command being called, but the SVC 
handler will examine the first eight bytes of 
this parameter list to find the name of the 
routine or command being called. 

The "DC AL4 (address) " instruction following 
the SVC 202 is optional, and may be omitted if 
the programmer does not expect any errors to 
occur in the routine or command being called. 
If included, an error return is made to the 
address specified in the DC. DMSITS determines 
whether this DC was inserted by examining the 
byte following the SVC call inline. A nonzero 
byte indicates an instruction, a zero value 
indicates that "DC AL** (address) " follows. 



CHS SVC HANDLING 



SVC 203 



DMSITS (INTSVC) is the CMS system SVC handling 
routine. The general operation of DMSITS is as 
follows: 

1. The SVC new PSH (low-storage location 
X'60') contains, in the address field, the 
address of DHSITS1. The DMSITS module will 
be entered whenever a supervisor call is 
executed. 



SVC 203 is called by CMS macros to perform 

various internal system functions. It is used 
to define SVC calls for which no parameter list 

is provided. For example, DMSFREE parameters 
are passed in registers and 1. 

A typical calling sequence for an SVC 203 
call is as follows: 



2. 



3. 



4. 



5. 



DMSITS allocates a system and user save 
area. The user save area is used as a 
register save area (or work area) by the 
called routine. 

The called routine is called (via a LPSV or 
BALR) . 



Upon return from the called routine, 
save areas are released. 



the 



Control is returned to the caller (the 
routine which originally made the SVC 
call) . 



SVC 
DC 



203 
H'code* 



The halfword decimal code following the SVC 
203 indicates the specific routine being 
called. DMSITS examines this halfword code, 
taking the absolute value of the code by an LPR 
instruction. The first byte of the result is 
ignored, and the second byte of the resulting 
halfword is used as an index to a branch table. 
The address of the correct routine is loaded, 
and control is transferred to it. 

It is possible for the address in the SVC 203 
index table to be zero. In this case, the index 
entry will contain an 8-byte routine or command 
name, which will be handled in the same way as 
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the 8-byte naae passed in the parameter list to 
an STC 202. 

The prograiier indicates an error return by 
the sign of the half word code. If an error 
return is desired, then the code is negative. 
If the code is positive, then no error return is 
■ade. The sign of the half word code has no 
effect on deteraining the routine which is to be 
called, since DHSITS takes the absolute value of 
the code to determine the routine called. 



parameter list is invalid or cannot be 
found, DHSITS handles the situation in the 
saffle way it handles an error return froa a 
legitiaate SVC routine. The error code is 
-3. 

3. Invalid SVC 203 code. If an invalid code 
follows SVC 203 inline, then an error 
■essage is displayed, and the ABEND routine 
is called to terninate execution. 



Since only the second byte of the absolute 
value of the code is examined by DHSITS, seven 
bits (bits 1-7) are available as flags or for 
other uses. Thus, for example, DHSFREE uses 
these seven bits to indicate such things as 
conditional requests and variable requests. 

When an SVC 203 is invoked, DHSITS stores the 
half word code into the NUCON location CODE203, 
so that the called routine can examine the seven 
bits made available to it. 

All calls made by means of SVC 203 should be 

made by macros, with the macro expansion 

computing and specifying the correct halfword 
code. 



§§§££h HierSEchjr for SVC 202 



When a program issues SVC 202, passing a routine 
or command name in the parameter list, then 
DHSITS must be searched for the specified 
routine or command. (In the case of SVC 203 
with a zero in the table entry for the specified 
index, the same logic must be applied.) 

The search algorithm is as follows: 

1. First, a check is made to see if there is a 
routine with the specified name currently 
occupying the system Transient Area. If 
this is the case, then control is 
transferred there. 



Dser Handled SVCs 



The programmer may use the HNDSVC macro to 
specify the address of a routine which will 
handle any SVC call other than for SVC 202 and 
SVC 203. 

In this case, the linkage conventions are as 
required by the user-specified SVC-handling 
routine. 



OS and DOS/VS Macro Simulation SVC Calls 



CBS supports selected SVC calls g 
and DOS/VS macros, by simulating 
these macro calls. DHSITS is th 
interrupt handler. If the SET DO 
been issued, a flag in NDCON will 
DOS/VS macro simulation is to be 
is then passed to DHSDOS. Otherw 
simulation is assumed and DHSITS 
to the appropriate OS simulation r 



enerated by OS 
the effect of 
e initial SVC 
S command has 
indicate that 
used. Control 
ise, OS macro 
passes control 
outine. 



2. second, the system function name table is 
searched, to see if a command by this name 
is nucleus- resident. If successful, 
control goes to the specified nucleus 
routine. 

3. Next, a search is made for a disk file with 
the specified name as the filename, and 
MODULE as the filetype. The search is made 
in the standard disk search order. If this 
search is successful, then the specified 
module is loaded (via the LOADMOD command) , 
and control passes to the storage location 
now occupied by the command. 

H. If all searches so far have failed, then 
DHSINA (ABBREV) is called, to see if the 
specified routine name is a valid system 
abbreviation for a system command or 
function. user-defined abbreviations and 
synonyms are also checked. if this search 
is successful, then steps 2 through U are 
repeated with the full function name. 

5. If all searches fail, then an error code of 
-3 is issued. 



Invalid SVC Calls 



Commands Entered from the Terminal 



There are several types of invalid SVC calls 
recognized by DHSITS. 

1. Invalid SVC number. If the SVC number does 
not fit into any of the four classes 
described above, then it is not handled by 
DHSITS. An appropriate error message is 
displayed at the terminal, and control is 
returned directly to the caller. 

2. Invalid routine name in SVC 202 parameter 
list. If the routine named in the SVC 202 



ihen a command is entered from the terminal, 
DHSINT processes the command line, and calls the 
scan routine to convert it into a parameter list 
consisting of eight-byte entries. The following 
search is performed: 

1. DHSINT searches for a disk file whose 
filename is the command name, and whose 
filetype is EXEC. If this search is 
successful, EXEC is invoked to process the 
EXEC file. 
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2. 



If not found, the command name is 
considered to be an abbreviation and the 
appropriate tables are examined. If found, 
the abbreviation is replaced by its full 
equivalent and the search for an EXEC file 
is repeated. 

If there is no EXEC file, DMSINT executes 
SVC 202, passing the scanned parameter 
list, with the command name in the first 
eight bytes. DMSITS will perform the 
search described for SVC 202 in an effort 
to execute the command. 



transient program area may not invoke the BEHSBE 
command. In addition, it may not invoke the OS 
macro HTO, which generates an SVC 35, which is 
handled by DMSSVT. 

DMSITS starts programs running in the user 
program area enabled for all interruptions but 
starts programs running in the transient program 
area disabled for all interruptions. The 
individual program may have to use the SSM (SET 
SYSTEM MASK) instruction to change the current 
status of its system mask. 



3. If DMSITS returns to DMSINT with a return 
code of -3, indicating that the search was 
unsuccessful, then DMSINT uses the CP 
DIAGNOSE facility to attempt to execute the 
command as a CP command. 

a. If all these searches fail, then DMSINT 
displays the error message UNKNOWN CP/CMS 
COMMAND. 



CALLED ROUTINE START-UP TABLE 



Figures 2t and 25 show how the PSH and registers 
are set up when the called routine is entered. 



RETURNING TO THE CALLING ROUTINE 



See Figure 23 for a description of 
search for a command name. 



this 



When the called routine finishes processing, 
control is returned to DMSITS, which in turn 
returns control to the calling routine. 



USER AND TRANSIENT PROGRAM AREAS 



Return Location 



TWO areas can hold programs that are loaded from 
disk. These are called the user program area 
and the transient program area. (See Figure 22 
for a description of CMS storage usage.) 

The user program area starts at location 
X' 20000' and extends upward to the loader 
tables. Generally, all user programs and 
certain system commands (such as EDIT, and 
COPYFIIE) run in the user program area. Because 
only one program can be running in the user 
program area at any one time, it is impossible 
(without unpredictable results) for one program 
running in the user program area to invoke, by 
means of SVC 202, a module that is also intended 
to be run in the user program area. 

The transient program area is two pages long, 
running from location X'EOOO' to location 
X'FFFF'. It provides an area for system 
commands that may also be invoked from the user 
program area by means of an SVC 202 call. When 
a transient module is called by an SVC, it is 
normally run with the PSN system mask disabled 
for I/O and external interruptions. 

The transient program area also handles 
certain OS macro simulation SVC calls. OS SVC 
calls are handled by the OS simulation routines 
located either in the CMSSEG discontiguous 
shared segment or in the user program area, as 
close to the loader tables as possible. If 
DMSITS cannot find the address of a supported OS 
SVC handling routine, then it loads the file 
DMSSVT MODULE into the transient area, and lets 
that routine handle the SVC. 

A program running in the transient program 
area may not invoke another program intended to 
run in the transient program area, including OS 
macro simulation SVC calls that are handled by 
DMSSVT. For example, a program running in the 



The return is accomplished by loading the 
original SVC old PSH (which was saved at the 
time DMSITS was first entered) , after possibly 
modifying the address field. The address field 
modification depends upon the type of SVc call, 
and on whether the called routine indicated an 
error return. 



For SVC 202 
indicates a normal 
register 15, and 
nonzero code in 
routine indicates 
makes a normal re 
If the called rout 
DMSITS passes the 
routine, if one w 
terminates if none 



and 203, the called routine 

return by placing a zero in 

an error return by placing a 

register 15. If the called 

a normal return, then DMSITS 
turn to the calling routine, 
ine indicates an error return, 

error return to the calling 
as specified, and abnormally 

was specified. 



For an SVC 202 n 
ALU (address) ", a normal 
instruction following th 
an error return causes an 
followed by "DC ALU(addr 
is made to the instructio 
an error return is made t 
in the DC. In either cas 
the return code passed 
routine. 



ot followed by "DC 
return is made to the 
e SVC instruction, and 
ABEND. For an SVC 202 
ess)", a normal return 
n following the DC, and 
o the address specified 
e, register 15 contains 
back by the called 



For an SVC 203 with a positive halfword code, 
a normal return is made to the instruction 
following the halfword code, and an error return 
causes an ABEND. For an SVC 203 with a negative 
halfword code, both normal and error returns are 
made to the instruction following the halfword 
code. In any case, register 15 contains the 
return code passed back by the called routine. 



For macro simulation 
user-handled SVC calls. 



SVC calls, and for 
no error return is 
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COser enters ^ 
n.m.,t j 

terminal j f 



Read line 

from terminal 




Issue SVC 202 
(See the SVC 202 
Subroutine) 



Expand Line by 
inserting the 
command name 
EXEC to; 
EXEC name 



Name is now the 
real name from the 
Synonym Table 



Pass line 

toCP 

for processing 




Display Ready 
message, with 
error code if 
RC = 



f SVC 202 name J 




Attempt to execute 
LOADMOD name 
MODULE from disk 



O 




Pais control to the 
routine (in the nucleus, 
transient area, or 
user area) to execute 



thee 



and 



/Return to routine thatV 
\issued the SVC 202 J 



Notes: 

1. If the terminal line was actually from an EXEC file, or if the 
command SET IMPEX OFF has been executed, implied EXEC 
is not in effect. 

2. A -3 return code indicates SVC 202 processing did not find 
the command. 

3. If the terminal line was actually from an EXEC file, or if the 
command SET IMPEX OFF has been executed, implied CP 
is not in effect. 



Figure 23. CMS CoBimand (and Request) Processing 
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r ■" ■ " ~ 

1 Called Type 


Sjstea Hask 


Storage Key 


Problea Bit | 


1 S¥C 202 or 203 
1 - Nucleus 
1 resident 


Disabled 


Systea 


Off 1 


1 SVC 202 or 203 
1 - Transient 
1 area NODDLE 


Disabled 

Enabled 

Enabled 
Disabled 

Disabled 


Oser 


Off 1 


1 SVC 202 or 203 
1 - Dser area 


Dser 

Dser 
Systea 

Systea 


Off 1 


1 User— handled 


Off 1 


1 OS - DOS/VS 
1 Nucleus 
1 resident 


Off 1 


1 OS - DOS/VS 
1 Transient 
1 area aodule 


Off 1 



Figure 24. PSR Fields When Called Routine Starts 



Type 

SVC 202 
or 203 



Other 



Registers 
- 1 



Saae as 
caller 



I Saae as 
caller 



Registers 
2-11 



Dnpredic- 
table 



Same as 
caller 



Register 
12 

Address 
of 

called 
routine 



Address 

of 

caller 



Register 


Register 


13 


ia 


Dser 


Return 


save 


address 


area 


to 




DMSITS 


Dser 


Return 


save 


address 


area 


to 




DMSITS 



Register 
15 




Figure 25. Register Contents Hhen Called Routine Starts 



recognized by DMSITS. As a result, DMSITS 
always returns to the calling routine by loading 
the SVC old PSW which was saved when DMSITS was 
first entered. 

Isgister Restoration 



Upon entry to DMSITS, all registers are saved as 
they were when the SVC instruction was first 
executed. Dpon exiting from DMSITS, all 
registers are restored froa the area in which 
they were saved at entry. 

The exception to this is register 15 in the 
case of SVC 202 and 203. Dpon return to the 
calling routine, register 15 always contains the 
value which was in register 15 when the called 
routine returned to DMSITS after it had 
coapleted processing. 



£§il§^ Rouiine Modifications to Systea Area 



If the called routine has system status, so that 
it runs with a PSW storage protect key of 0, 



then it may store new values into the System 
Save Area. 

If the called routine wishes to modify the 
location to which control is to be returned, it. 
must modify the following fields: 



For SVC 202 and 
NDMRET and ERRET 
address) fields. 

For other SVCs, it 
field of OLDPSli. 



203, it must modify the 
(normal and error return 



oust modify the address 



To aodify the registers that are to be returned 
to the calling routine, the fields EGPR1, EGPR2, 
..., EGPR15 oust be modified. 

If this action is taken by the called 
routine, then the SVCTRACE facility may print 
misleading information, since SVCTRACE assumes 
that these fields are exactly as they were when 
DMSITS was first entered. Whenever an SVC call 
is made, DMSITS allocates two save areas for 
that particular SVC call. Save areas are 
allocated as needed. For each SVC call, a system 
and user save area are needed. 
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when the SVC called routine returns, the save 
areas are not released, but are kept for the 
next SVC. at the completion of each command, 
all SVC save areas allocated by that command are 
released. 

The system save area is used by DHSITS to 
save the value of the SVC old PSW at the time of 
the SVC call, the calling routine's registers at 
the time of the call, and any other necessary 
control information. Because SVC calls can be 
nested, there can be several of these save areas 
at one time. The system save area is allocated 
in protected free storage. 

The user save area contains 12 doublewords 
(24 words) , allocated in unprotected free 
storage. DMSITS does not use this area at all, 
but simply passes a pointer to this area (via 
register 13.) The called routine can use this 
area as a temporary work area, or as a register 
save area. There is one user save area for each 
system save area. The field OSAVEPTR in the 
system save area points to the user save area. 

The exact format of the system save area can 
be found in the Y 11/370; Data Areas and Control 
^l2£lL I;22i£" The most important fields," and 
their uses7 are as follows: 



EGPRS (16 Fullwords, separately labeled 
EGPEO, EGPE1, EGPB2, EGPB3 , -.., 
EGPR15) The entry registers. The 
contents of the general registers at 
entry to DMSITS are stored in these 
fields. 

EFPRS (U Doublewords, separately labeled 
EFPHO, EFPR2, EFPRU, EFPR6) The entry 
floating-point registers. The 
contents of the floating-point 
registers at entry to DMSITS are 
stored in these fields. 

SSaVENXT (Fullword) The address of the next 
system save area in the chain. This 
points to the system save area which 
is being used, or will be used, for 
any SVC call nested in relation to the 
current one. 

SSAVEPRV (Fullword) The address of the 
previous system save area in the 
chain. This points to the system save 
area for the SVC call in relation to 
which the current call is nested. 

OSAVEPTR (Fullword) Pointer to the user save 
area for this SVC call. 



CALLER (Fullword) The address of the SVC 
instruction that resulted in this 
call. 



CMS INTERFACE FOR DISPLAY TERMINALS 



CALLEE 



CODE 



OLDPSVI 



NRMRET 



EBRET 



(Doubleword) Eight-byte symbolic name 
of the called routine. For OS and 
user- handled SVC calls, this field 
contains a character string of the 
form SVC nnn, where nnn is the SVC 
number in decimal. 

(Halfword) For SVC 203, this field 
contains the halfword code following 
the SVC instruction line. 



(Doubleword) The SVC old PSH at 
time that DHSITS was entered. 



the 



(Fullword) The address of the calling 
routine to which control is to be 
passed in the case of a normal return 
from the called routine. 

(Fullword) The address of the calling 
routine to which control is to be 
passed in the case of an error return 
from the called routine. 



CMS has an interface that allows it to display 
large amounts of data in a very rapid fashion. 
This interface for display terminals is much 
faster and has less overhead than the normal 
write because it displays up to 1760 characters 
in one operation, instead of issuing 22 
individual writes of 80 characters each (that is 
one write per line on a display terminal) . Data 
that is displayed in the screen output area with 
this interface is not placed in the console 
spool file. 

The DISPW macro allows you to use this 
display terminal interface. It generates a 
calling sequence for the CHS display terminal 
interface module, DHSGIO. DHSGIO creates a 
channel program and issues a. DIAGNOSE 
instruction (Code 58) to display the data. 
DHSGIO is a TEXT file which must be loaded in 
order to use DISPH. The format of the CHS DISPH 
macro is: 




bufad |,LINE=n| | ,BYTES=bbbb| 
I xilE Ef 1 I xilTESf 1 76 | 

L J L J 

[ERASE=YES] [CANCEL=YES] 
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where : 

label 

fcufad 



|LIHE=n| 
iLIMB=0| 

L Jl 



is an optional aacro statement label. 

is the address of a buffer containing 
the data to be written to the display 
teriainal. 



is the number of the line, to 23, on 
the display terminal that is to be 
written. Line number is the 
default. 



OS DATA MANAGEMENT SIMULATION 



The disk format and data base organization of 
CMS are different from those of OS. A CMS file 
produced by an OS program running under CMS and 
written on a CMS disk, has a different format 
than that of an OS data set produced by the same 
OS program running under OS and written on an OS 
disk. The data is exactly the same, but its 
format is different. (An OS disk is one that 
has been formatted by an OS program, such as 
IBCDASDI.) 



|BYTES=bbbb| 
|BYTESfl760| 

L J 

is the number of bytes (0 to 1760) to 
be written on the display terminal. 
1760 bytes is the default. 

[ERASE=YES] 

specifies that the display screen is 
to be erased before the current data 
is written. The screen is erased 
regardless of the line or number of 
bytes to be displayed. specifying 
EBASE=YES causes the screen to go into 
"MORE" status. 

[CANCEL=YES] 

causes the CANCEL operation to be 
performed: the output area is 
erased. 



OS MACRO SIMULATION UNDER CMS 



When a language processor or a user-written 
program is executing in the CMS environment and 
using OS-type functions, it is not executing OS 
code. Instead, CMS provides routines that 
simulate the OS functions required to support OS 
language processors and their generated object 
code. 

CMS functionally simulates the OS macros in a 
way that presents equivalent results to programs 
executing under CMS. The OS macros are 
supported only to the extent stated in the 
publications for the supported language 
processors, and then only to the extent 
necessary to successfully satisfy the specific 
requirement of the supervisory function. 

The restrictions for COBOL and PL/I program 
execution listed in "Executing a Program that 
Uses OS Macros" in the TM^ilO: 21 angina and 
Sistem Generation Guide exist because of the 
limited simulation by CMS of the OS macros. 

Figure 26 shows the OS macro functions that 
are partially or completely simulated, as 
defined by SVC number. 



HANDLING FILES THAT RESIDE ON CMS DISKS 



CMS can read, write, or update any OS data that 
resides on a CHS disk. By simulating OS macros, 
CMS simulates the following access methods so 
that OS data organized by these access methods 
can reside on CMS disks: 

direct identifying a record by a key or 

by its relative position within 
the data set. 

partitioned seeking a named member within 
the data set. 

sequential accessing a record in a sequence 
relative to preceding or 
following items in the data 
set. 

Refer to Figure 26 and the "Simulation 
Notes", then read "Access Method Support" to see 
how CMS handles these access methods. 

Because CMS does not simulate the indexed 
sequential access method (ISAM) , no OS program 
which uses ISAM can execute under CMS. 
Therefore, no program can write an indexed 
sequential data set on a CHS disk. 



HANDLING FILES THAT RESIDE ON OS OR DOS DISKS 



By simulating OS macros, CMS can read, but not 
write or update, OS sequential and partitioned 
data sets that reside on OS disks. Using the 
same simulated OS macros, CMS can read DOS 
sequential files that reside on DOS disks. The 
OS macros handle the DOS data as if it were OS 
data. Thus a DOS sequential file can be an input 
to an OS program running under CMS. 

However, an OS sequential or partitioned data 
set that resides on an OS disk can be written or 
updated only by an OS program running in a real 
OS machine. 

CMS can execute programs that read and write 
VSAM files from OS programs written in the VS 
BASIC, COBOL, or PL/I programming languages. 
This CMS support is based on the DOS/VS Access 
Method Services and Virtual Storage Access 
Method (VSAM) and therefore the OS user is 
limited to those VSAM functions that are 
available under DOS/VS. 
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1 Hacro 


SVC 




i Title 


Number 


Function 


i XOAPi 


00 


Bead ©rewrite direct access volumes 


1 HAIT 


01 


Wait for an I/O completion 


1 POST 


02 


Post the I/O completion 


1 EXIT/BETUBH 


03 


Beturn from a called phase 


i GETNAIN 


OH 


Conditionally acquire user storage 


1 FBEEMAIN 


05 


Release user-acquired storage 


1 GETPOOL 


— 


Simulate as SVC 10 


1 FBEEFOOL 


- 


Simulate as SVC 10 


1 LINK 


06 


Link control to another phase 


1 XCTL 


07 


Delete, then link control to another 
load phase 


1 LOAD 


08 


Bead a phase into storage 


1 DELETE 


09 


Delete a loaded phase 


1 GET MAIN/ 


10 


Manipulate user free storage 


1 FBEEMAIN 






1 TIMEi 


11 


Get the time of day 


1 ABEND 


13 


Terminate processing 


1 > SPIEi 


ia 


Allow processing program to 
handle program interrupts 


1 BESTOBEi 


17 


Effective NOP 


1 BLDL/FIND* 


18 


Manipulate simulated partitioned 
data files 


1 OPEN 


19 


Activate a data file 


1 CLOSE 


20 


Deactivate a data file 


1 STOHi 


21 


Manipulate partitioned directories 


1 OPEMJ 


22 


Activate a data file 


1 TCLOSE 


23 


Temporarily deactivate a data file 


1 DEVTYPEi 


24 


Obtain device-type physical 
characteristics 


1 TBKBAL 


25 


NOP 


1 HTO/WTORi 


35 


Communicate with the terminal 


1 EXTBACTi 


tlO 


Effective NOP 


1 IDENTIFYi 


41 


Add entry to loader table 


1 ATTACHi 


42 


Effective LINK 


1 CHAPi 


44 


Effective NOP 


1 TTIHEBi 


46 


Access or cancel timer 


1 STIMEBi 


47 


Set timer 


1 DEQi 


48 


Effective NOP 


1 SNAPi 


51 


Dump specified areas of storage 


1 EMQi 


56 


Effective HOP 


1 FBEEDBUF 


57 


Belease a free storage buffer 


1 _.STAE 


60 


Allow processing program to 
decipher ABEND conditions 


1 DETACHi 


62 


Effective NOP 


1 CHKPTi 


63 


Effective NOP 


1 BDJFCBi 


64 


Obtain information from FILEDEF 
command 


1 SYMADi 


68 


Handle data set error conditions 


1 BSPi 


69 


Backup a record on a tape or disk 


1 GET/PUT 


- 


Access system-blocked data 


1 BEAD/WRITE 


- 


Access system-record data 


1 HOTE/POINT 


— 


Manage data set positioning 


1 CHECK 


- 


Verify BEAD/HBITE completion 


1 TGET/TPUT 


93 


Read or write a terminal line 


1 TCLEABQ 


94 


Clear terminal input queue 


1 STAX 


96 


Create an attention exit block 


|i Simulated in 


the transient routine "DMSSVT". Other simulation 


1 routines reside in the 


nucleus. 



Figure 26. Simulated OS Supervisor Calls 



SIMULATION NOTES 



Because CHS has its own file system and is a 
single-user system operating in a virtual 
machine with virtual storage, there are certain 



restrictions for the simulated OS function in 
CMS. For example, HIARCHY options and options 
that are used only by OS multitasking systems 
are ignored by CMS. 



Listed below are descriptions of all the OS 
macro functions that are simulated by CMS as 
seen by the programmer. Implementation and 



Section 1. Introduction 



131 



prograi results that differ froa those given In 

OS/¥S Sujgervisor Services and Macro Instructions 
are stated. HIABCBY options and those used only 
by OS multitasking systeas are ignored by CHS. 
Validity checking is not performed within the 
simulation routines. The entry point name in 
LIHK, XCTL, and LOAD (SVC 6, 7, 8) must be a 
member name or alias in a TXTLIB directory 
unless the COBPSWT is set to on. If the COMPSHT 
is on, SVC 6, 7, and 8 must specify a MODULE 
name. This switch is turned on and off by using 
the COMPSWT macro. See the VM/370: CMS Command 
55^ M35E5 B5JS£J1££ foj^ descriptions of all CMS 
user macros. 



L0iD-SVC8 



Bacro-SVC Ho. 
XD&P-SVCO 



SAIT-SVC1 



£i:J£.§££££§§ is iiniessslsiiofi 

The type" option must be" R~or 
H; the V, I, and K options are 
not supported. The 
BLKBSF-ADDB must point to an 
item number acguired by a NOTE 
macro. Other options 
associated with V, I, or K are 
not supported. 

All options of HAIT are 
supported. The HAIT routine 
waits for the completion bit 
to be set in the specified 
ECBs. 



GETPOOL/ 
FREEPOOL 



The DCB and HIABCHY options 
are ignored by CMS. All other 
options of LOAD are supported. 
LOAD loads the specified 
program into storage (if 
necessary) and returns the 
address of the specified entry 
point in register zero. 
However, if the specified 
entry point is not in core 
when SVC 8 is Issued, and the 
subroutine contains VCONs 
which cannot be resolved 
within that TXTLIB member, CMS 
attempts to resolve these 
references, and nay return 
another entry point address. 
To insure a correct address in 
register zero, the user should 
bring such subroutines into 
core either by the CMS 
LOAD/IHCLDDE commands or by a 
VCON in the user program. 

All the options of GETPOOL 
and FBEEPOOL are supported. 
GETPOOL constructs a buffer 
pool and stores the address of 
a buffer pool control block in 
the DCB. FBEEPOOL frees a 
buffer pool constructed by 
GETPOOL. 



P0ST-SVC2 



EXIT/BETDBN 
-SVC3 



GETMAlN-SVCa 



FREE MAI 1I-SVC5 



LIHK-SVC6 



XCTL-SVC7 



All options of 
supported. POST 
completion code 
completion bit 
specified ECB. 



POST are 

sets a 

and a 

in the 



DELETE-SVC9 



Post ECB, execute end of task 
routine, release phase 
storage, unchain and free 
latest request block, and 
restore registers depending on 
whether this is an exit or 
return from a linked or an 
attached routine. 

All the options of GETMAIN are 
supported. GETMAIN gets 
blocks of free storage. 

All the options of FBEEMAIN 
are supported. FBEEMAIN frees 
blocks of storage acguired by 
GETMAIN. 

The DCB and HIABCBY options 
are ignored by CMS. All other 
options of LINK are supported. 
LINK loads the specified 
program into storage (if 
necessary) and passes control 
to the specified entry point. 

The DCB and HIABCHY options 
are ignored by CMS. All other 
options of XCTL are supported. 
XCTL loads the specified 
program into storage (if 
necessary) and passes control 
to the specified entry point. 



GETMAIN/ 
FBEEMAIN- 
SVC10 



TIME-SVC11 



ABEND-SVC13 



SPIE-SVCia 



BEST0RE-SVC17 



All the options of DELETE are 
supported. DELETE decreases 
the use count by one and if 
the result is zero frees the 
corresponding virtual 

storage. Code 4 is returned 
in register 15 if the phase is 
not found. 

All the options of GETMAIN 
and FBEEMAIN are supported. 
Subpool specifications are 
ignored. 

All the options of TIME except 
MIC are supported. TIME 
returns the time of day to the 
calling program. 

The completion code parameter 
is supported. The DUMP 
parameter Is not. If a STAE 
request is outstanding, 
control is given to the proper 
STAE routine. If a STAE 
routine is not outstanding, a 
message indicating an ABEND 
has occurred is printed on the 
terminal along with the 
completion code. 

All the options of SPIE are 
supported. The SPIE routine 
specifies interruption exit 
routines and program 
interruption types that will 
cause the exit routine to 
receive control. 

The BESTORE routine in CMS is 
a NOP. It returns control to 
the user. 
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BLDL-SVC18 



FIHD-SVC18 



ST0M-SVC21 



OPEN/OPENJ- 
SVC19/22 



CLOSE/TCLOSE- 
SVC20/23 



DETTYPE-SVC2a 



WTO/1ITOR-SVC35 



EXTRACT-SVCUO 



BLDL is an effective MOP for 
LINKLIBs and JOBLIBs. For 
MACLIBs, item numbers are 
filled in the TTR field of the 
BLDL list; the K, Z, and user 
data fields, as described in 
OS^VS Data Management Macro 
Instructions, are set to 
zeros. The 'alias' bit of the 
C field is supported, and the 
remaining bits in the C field 
are set to zero. 

All the options of FIND are 
supported. FIND sets the 
read/write pointer to the item 
number of the specified 
■ember. 

All the options of STOW are 
supported. The 'alias' bit is 
supported, but the user data 
field is not stored in the 
MACLIB directory since CMS 
MACLIBs do not contain user 
data fields. 

All the options of OPEN and 
OPENJ are supported except for 
the DISP and RDBACK options 
which are ignored. OPEN 
creates a CMSCB (if 
necessary) , completes the DCB, 
and merges necessary fields of 
the DCB and CMSCB. 

All the options of CLOSE and 
TCLOSE are supported except 
for the DISP option, which is 
ignored. The DCB is restored 
to its condition before OPEN. 
If the device type is disk, 
the file is closed. If the 
device type is tape, the 
REREAD option is treated as a 
REWIND. 

All the options of DEVTYPE are 
supported. DEVTYPE moves 
device characteristic 

information for a specified 
data set into a specified user 
area. 



All options of 
are supported 
options cone 
multiple console 
displays a mes 
operator's con 
displays a mes 
operator's conso 
a reply, moves 
the specified 
completion bi 
specified ECB, a 



WTO and WTOR 

except those 
erned with 

support. WTO 
sage at the 
sole. WTOR 
sage at the 
le, waits for 

the reply to 
area, sets a 
t in the 
nd returns. 



The EXTRACT routine in CMS is 
essentially a NOP. The user 
provided answer area is set to 
zeros and control is returned 
to the user with a return code 
of U in register 15. 



IDENTIFY-SVC41 



ATTACH-SVC42 



CHAP-SVCtm 

TTIMER-SVCU6 
STIMER-SVCU7 



DEQ-SVCU8 



SNAP-SVC51 



ENQ-SVC56 



FREEDB0F-SVC57 



STAE-SVC60 



The IDENTIFY routine in CMS 
adds a RPQDEST block to the 
load request chain for the 
requested name and address. 

All the options of ATTACH are 
supported in CMS as in OS 
PCP. The following options 
are ignored by CMS: DCB, 
LPMOD, DPMOD, HIARCHY, GSPV, 
GSPL, SHSPV, SHSPL, SZERO, 
PORGE, ASYNCH, and TASKLIB. 
ATTACH passes control to the 
routine specified, fills in an 
ECB completion bit if an ECB 
is specified, passes control 
to an exit routine if one is 
specified, and returns control 
to the instruction following 
the ATTACH. 

Because CMS is not a 
multitasking system, a phase 
requested by the ATTACH macro 
must return to CMS. 

The CHAP routine in CMS is a 
NOP. It returns control to 
the user. 



All the options 
supported. 



of TTIMER are 



All options of STIMER are 
supported except for TASK and 
WAIT. The TASK option is 
treated as if the REAL option 
had been specified, and the 
WAIT option is treated as a 
NOP; it returns control to the 
user. 

The DEQ routine in CMS is a 
NOP. It returns control to 
the user. 

All the options of SNAP are 
supported except for the DCB, 
SDATA, and PDATA options, 
which are ignored. SNAP always 
dumps output to the printer. 
The dump contains the PSW, the 
registers, and the storage 
specified. 

The ENQ routine in CMS is a 
NOP. It returns control to 
the user. 

All the options of FHEEDBOF 
are supported. FREEDBDF 
returns a buffer to the buffer 
pool assigned to the specified 
DCB. 

All the options of STAE are 
supported except for the XCTL 
option, which is set to 
XCTL LYES; the PURGE option, 
which is set to HALT; and the 
ASYNCH option, which is set to 
MO. STAE creates, overlays, 
or cancels a STAE control 
block as requested. STAE 
retry is not supported. 
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DETACH-SVC62 



CHKPT-SVC63 



RDJFCB~SVC6U 



SYNADAF-SVC68 



SYNADRLS-SVC68 



BSP-SVC69 



TGET/TPOT- 
SVC93 



TCLEABQ-SVC94 



STAX-SVC96 



MOTE 



POINT 



CHECK 



DCB 



The DETACH routine in CMS is a 
NOP. It returns control to 
the user. 

The CHKPT routine is a NOP. 
It returns control to the 
user. 

All the options of RDJFCB are 
supported. RDJFCB causes a 
Job File Control Block (JFCB) 
to be read from a CMS Control 
Block (CMSCB) into real 
storage for each data control 
block specified. CMSCBs are 
created by FILEDEF commands. 

All the options of SYNADAF are 
supported. SYNADAF analyzes 
an I/O error and creates an 
error message in a work 
buffer. 

All the options of SYNADRLS 
are supported. SYNADRLS frees 
the work area acquired by 
SYNAD and deletes the work 
area from the save area 
chain . 

All the options of BSP are 
supported. BSP decrements the 
item pointer by one block. 

TGET and TPOT operate as if 
EDIT and HAIT were coded. 
TGET reads a terminal line. 
TPUT writes a terminal line. 

TCLEARQ in CMS clears the 
input terminal queue and 
returns control to the user. 

Updates a queue of _CMTAXEs 
each of which defines TiT 
attention exit level. 

All the options of NOTE are 
supported. NOTE returns the 
item number of the last block 
read or written. 

All the options of POINT are 
supported. POINT causes the 
control program to start 
processing the next read or 
write operation at the 
specified item number. The 
TTR field in the block address 
is used as an item number. 

All the options of CHECK are 
supported. CHECK tests the 
I/O operation for errors and 
exceptional conditions. 

The following fields of a DCB 
■ay be specified, relative to 
the particular access method 
indicated: 



ACCESS METHOD SUPPORT 



The manipulation of data is governed by an 
access method. To facilitate the execution of 
OS Code under CMS, the processing program must 
see data as OS would present it. For instance, 
when the processors expect an access method to 
acquire input source cards; sequentially, CMS 
invokes specially written routines that simulate 
the OS sequential access method and pass data to 
the processors in the format that the OS access 
methods would have produced. Therefore, data 
appears in storage as if it had been manipulated 
using an OS access method. For example, block 
descriptor words (BDW), buffer pool management, 
and variable records are updated in storage as 
if an OS access method had processed the data. 
The actual writing to and reading from the I/O 
device is handled by CMS file management. 

The essential work of the Volume Table of 
Contents (VTOC) and the Data Set Control Block 
(DSCB) is done in CMS by a Master File Directory 
(MFD) which updates the disk contents, and a 
File Status Table (FST) (one for each data 
file) . All disks are formatted in physical 
blocks of 800 bytes. 

CMS continues to update the OS format, within 
its own format, on the auxiliary device, for 
files whose filemode number is 4. That is, the 
block and record descriptor words (BDH and RDM) 
are written along with the data. If a data set 
consists of blocked records, the data is written 
to, and read from, the I/O device in physical 
blocks, rather than logical records. CMS also 
simulates the specific methods of manipulating 
data sets. 

To accomplish this simulation, CMS supports 
certain essential macros for the following 
access methods: 



BDAM 



BPAM 



(direct) — identifying a record 
by a key or by its relative 
position within the data set. 



(partitioned) — seeking 
member within data set. 



a named 



BSAM/QSAM 



VSAM 



(sequential) — accessing a 
record in a sequence relative to 
preceding or following records. 

(direct or sequential) — 
accessing a record sequentially 
or directly by key or address. 
Note: CMS support of OS TSAM 
files is based on DOS/VS Access 
Method Services and Virtual 
Storage Access Method (VSAM) . 



Therefore, the 
restricted to 
available under 
Method Services. 



OS user is 

those functions 

DOS/VS Access 

See the section 



"CMS Support for OS and DOS VSAM 
Functions" for details. 

CMS also updates portions of the OS control 
blocks that are needed by the OS simulation 
routines to support a program during execution 
(see Figure 27) . Most of the simulated 
supervisory OS control blocks are contained in 
the following two CMS control blocks: 
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I ^£erand 

I BFALH 

IBLKSIZE 

IBUFCB 

IBUFL 

IBUFMO 

IDDMAHE 

IDSORG 

lEODAD 

(EXIST 

IKEYLEN 

IlIMCT 

(LBECL 

IMACRF 

lOPTCD 

(BECFH 

ISYNAD 

|KCP 



BDAM 

F,D 

n (number) 

a (address) 

n 

n 

s(synbol) 

DA 

a 
n 
n 

B,H 

A,B,F,B 
F,V,0 
a 



BPAH 

F,D 

n 

a 

n 

n 

s 

PO 

a 

a 



n 
B,W 

F,V,0 

a 

n 



BSAM 

f7d 

n 

a 

n 

n 

s 

PS 

a 

a 

n 

n 

F,V,B,S,A,(!,0 

a 
n 



flSAM 

FrD 

n 

a 

n 

n 

s 

PS 

a 

a 



G,P,L,M 



F,V,B,0,A,M,S 
a 



Figure 27. DCB Fields That Can be Specified for Each Access Method 



CMSCVT 

simulates the Communication Vector 
Table. Location 16 contains the address 
of the CVT control section. 



CMSCB 

is allocated from system 
whenever a FILEDEF comman 

(SVC19) is issued for a d 
CMS control Block (CMSCB) 
File Control Block (FCB) 
file, and partial simulati 
File Control Block (JFCB) 
Block (lOB) , and Data 

(DEB) . 



free storage 
d or an OPEN 
ata set. The 

consists of a 

for the data 
on of the Job 
, Input/Output 

Extent Block 



The Data Control Block (DCB) and the Data 
Event Control Block (DECB) are used by the 
access method simulation routines of CMS. 

The GET and PUT macros are not supported for 
use with spanned records. BEAD and HBITE are 
supported for spanned records, provided the 
filemode number is 4, and the data set is 
Physical Sequential (BSAM) format. 

GET (QSAM) 

All the QSAM options of GET are supported. 
Substitute mode is handled the same as move 
mode. If the DCBBECFH is FB, the filemode 
number is 4, and the last block is a short 
block, an EOF indicator (X' 61FFFF61 • ) must be 
present in the last block after the last 
record. 



PDTX 

PUTX support is provided only for data sets 
opened for QSAM-OPDATE with simple 
buffering. 

BEAD/HBITE (BISAM) 

BISAM is not supported in CMS. 

BEAD/HBITE (BSAM and BPAM) 

All the BSAM and BPAM options of BEAD and 
RBITE are supported except for the SE option 
(read backwards) . 

BEAD (Offset Bead of Keyed BDAM data set) 

This type of BEAD is not supported because it 
is only used for spanned records. 

BEAD/HBITE (BDAM) 

All the BDAM and BSAM (create) options of 
BEAD and HBITE are supported except for the B 
and BU options. 



BDAM Bestrictions 



The four methods of accessing BDAM records are: 

1. fielative Block BEB 

2. Relative Track TIE 

3. Belative Track and Key TTKey 
U. Actual Address MBBCCHHB 

The restrictions on those methods are as 
follows: 



GET (QISAM) 

QISAM is not supported in CMS. 

POT (QSAM) 

All the QSAM options of POT are supported. 
Substitute mode is handled the same as move 
mode. If the DCBBECFM is FB , the filemode 
number is 4, and the last block is a short 
block, an EOF indicator is written in the 
last block after the last record. 

PUT (QISAM) 

QISAM is not supported in CMS. 



Only the BDAM identifiers underlined above 
can be used to refer to records, since CMS 
files have a two— byte record identifier. 

CMS BDAM files are always created with 255 
records on the first logical track, and 256 
records on all other logical tracks, 
regardless of the block size. If BDAM 
methods 2, 3, or 4 are used and the BECFM is 
D or V, the BDAM user must either write 255 
records on the first track and 256 records on 
every track thereafter, or he must not update 
the track indicator until a NO SPACE FOUND 
message is returned on a write. For method 3 
(HBITE ADD) , this message occurs when no more 
dummy records can be found on a HBITE 
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request. For nethods 2 and H, this will not 
occurr and the track indicator will be 
updated only when the record indicator 
reaches 256 and overflows into the track 
indicator. 

Two files of the same filetype, which both 
use keys, cannot be open at the same time. 
If a program that is updating keys does not 
close the file it is updating for some 
reason, such as a system failure or another 
I PL operation, the original keys for files 
that are not fixed format are saved in a 
temporary file with the same filetype and a 
filename of tKEYSAVE. To finish the update, 
run the program again. 

Once a file is created using keys, additions 
to the file must not be made without using 
keys and specifying the original length. 

The number of records in the data set extent 
must be specified using the FILEDEF command. 
The default size is 50 records. 



extent resulting in a cylinder switch, also 
produces a return code of 4. 



The ACCESS Command 

Before CMS can read an OS data set or DOS file 
that resides on a non-CMS disk, you must issue 
the CMS ACCESS command to make the disk on which 
it resides available to CMS. 

The format of the ACCESS command is: 

ACCESS cuu mode[/ext] 

You must not specify options or file 
identification when accessing an OS or DOS 
disk. 



The FILEDEF Command 



The miniBUB LRECL for a 
keys is eight bytes. 



CHS BDAM file with 



BEADIHG 
MACROS 



OS DATA SETS AND DOS FILES USING OS 



CMS users can read OS sequential and partitioned 
data sets that reside on OS disks. The CMS 
MOVEFILE coBfland can be used to manipulate those 
data sets, and the OS QSAM, BPAM, and BSAN 
aacros can be executed under CMS to read them. 

The CMS MOVEFILE command and the same OS 
macros can also be used to manipulate and read 
DOS sequential files that reside on DOS disks. 
The OS macros handle the DOS data as if it were 
OS data. 



The following OS Release 20.0 BSAH, BPAM, and 
QSAM aacros can be used with CMS to read OS data 
sets and DOS files: 



BLDL 


ENQ 


RDJFCB 


BSP 


FIND 


READ 


CHECK 


GET 


SYNADAF 


CLOSE 


NOTE 


SYNADRLS 


DEQ 


POINT 


WAIT 


DSVTYPE 


POST 





CMS supports the following disk formats for 
the OS and OS/VS sequential and partitioned 
access methods: 

• split cylinders 

• user labels 

• track overflow 

• alternate tracks 



As in OS, the CMS support of the BSP macro 
produces a return code of 4 when attempting to 
backspace over a tape mark or when a beginning 
of an extent is found on an OS data set or a DOS 
file. If the data set or file contains split 
cylinders, an attempt to backspace within an 



You issue the FILEDEF command to assign a CMS 
file identification to the OS data set or DOS 
file so that CMS can read it. The format of the 
FILEDEF command used for this purpose is: If you 
are issuing a FILEDEF for a DOS file, note that 
the OS program that will use the DOS file must 
have a DCB for it. For "ddname" in the FILEDEF 
coBBand line, use the ddname in that DCB. Hith 
the DSN operand, enter the file-id of the DOS 
file. 

sometimes, CMS issues the FILEDEF command for 
you. Although the CMS MOVEFILE command, the 
supported CMS program product interfaces, and 
the CMS OPEN routine each issue a default 
FILEDEF, you should issue the FILEDEF command 
yourself to be sure the appropriate file is 
defined. 



After you have issued the ACCESS and FILEDEF 
coBBands for an OS sequential or partitioned 
data set or DOS sequential file, CHS commands 
(such as ASSEMBLE and STATE) can refer to the OS 
data set or DOS file just as if it were a CMS 
file. 

Several other CMS commands can be used with 
OS data sets and DOS files that do not reside on 
CMS disks. See the VM/370: CHS Command and Macro 
Reference for a complete description of the CMS 
ACCESS, FILEDEF, LISTDS, MOVEFILE, QDERY, 
RELEASE, and STATE commands. 

For restrictions on reading OS data sets and 
DOS files under CMS, see the "VM/370 
Restrictions" in "Part 1. Debugging with 
VM/370". 

The CMS FILEDEF command allows you to specify 
the I/O device and the file characteristics to 
be used by a program at execution time. In 
conjunction with the OS simulation scheme, 
FILEDEF simulates the functions of the Data 
Definition JCL statement. 

FILEDEF Bay be used only with programs using 
OS aacros and functions. For example: 
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filedef filel disk proga data a1 



After Issuing this command, your program 
referring to FILE1 would access PROGA DATA on 
your A-disk. 

If you wished to supply data from your 
terminal for FILE1, you could issue the command: 

filedef filel terminal 

and enter the data for your program without 
recompiling. 

fi tapein tap2 (recfm fb Irecl 50 block 100 
9track den 800) 

After issuing this command, programs referring 
to TAPEIN will access a tape at virtual address 
182. (Each tape unit in the CMS environment has 
a symbolic name associated with it.) The tape 
must have been previously attached to the 
virtual machine by the VM/370 operator. 



The AUXPROC Option of the FILEDEF Command 



The AUXPROC option can only be used by a program 
call to FILEDEF and not from the terminal. The 
CHS language interface programs use this feature 
for special I/O handling of certain (utility) 
data sets. 

The AUXPROC option, followed by a fullword 
address of an auxiliary processing routine, 
allows that routine to receive control from 
DMSSEB before any device I/O is performed. At 
the completion of its processing, the auxiliary 
routine returns control to DMSSEB signalling 
whether I/O has been performed or not. If not, 
DMSSEB performs the appropriate device I/O. 

6PR15 is used by the auxiliary processing 
routine to inform to DMSSEB of the action that 
has been or should be taken with the data block 
as follows: 



GPR15=0 



No I/O performed by AUXPROC routine; 
DMSSEB will perform I/O. 



GPR15<0 I/O performed by AUXPROC routine and 
error was encountered. DMSSEB will 
take error action. 



GPR15>0 I/O performed by AUXPROC routine with 
residual count in GPR15; DMSSEB 
returns normally. 



DOS/VS SUPPORT UNDER CMS 



CHS supports interactive program development for 
DOS/VS. This includes creating, compiling, 
testing, debugging, and executing commercial 
application programs. The DOS/VS programs can 
be executed in a CMS virtual machine or in a CMS 
Batch Facility virtual machine. 

DOS/VS files and libraries can be read under 
CMS. VSAM data sets can be read and written 
under CMS. 

The CMS/DOS environment (called CMS/DOS) 
provides many of the same facilities that are 
available in DOS/VS. However, CMS/DOS supports 
only those facilities that are supported by a 
single (background) partition. The DOS/VS 
facilities supported by CMS/DOS are: 

• DOS/VS linkage editor 

• Fetch support 

• DOS/VS Supervisor and I/O macros 

• DOS/VS supervisor control block support 

• Transient area support 

• DOS/VS VSAM macros 

The CMS/DOS environment is entered each time 
the CMS SET DOS ON command is issued. In the 
CHS/DOS environment, CMS supports many DOS/VS 
facilities. When you no longer need DOS/VS 
support under CMS, you issue the SET DOS OFF 
command and DOS/VS facilities are no longer 
available. 

CHS/DOS can execute programs that use the 
sequential (SAM) and virtual storage (VSAM) 
access methods, and can access DOS/VS 
libraries. 

CMS/DOS cannot execute programs that have 
execution-time restrictions, such as programs 
that use sort exits, teleprocessing access 
methods or multitasking. DOS/VS COBOL, DOS 
PL/I, and assembler language programs are 
executable under CMS/DOS. 

All of the CP and CMS online debugging and 
testing facilities (such as the CP ADSTOP and 
STORE commands and the CHS DEBUG environment) 
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are supported in the CHS/DOS environment. Also, 
CP disk error recording and recovery is 
supported in CMS/DOS. 

Hith its support of a CMS/DOS environment, 
CKS becomes an important tool for DOS/VS 
application program development. Because 
CHS/DOS was designed as a DOS/VS program 
development tool, it assumes that a DOS/VS 
system exists, and uses it. The following 
sections describe what is supported, and what is 
not. 



IBM 2314 Direct Access Storage Facility 

IBM 2319 Disk Storage 

IBM 3330 Disk Storage, Models 1 and 2 

IBM 3330 Disk Storage, Model 11 only as a 

Model 1 or 2 

IBM 3340 Direct Access Storage Facility 

IBM 3314 Direct Access Storage 

IBM 3350 Direct Access Storage, only in 3330 

Model 1 compatibility mode 



RSCS INTRODDCTION 



CMS SUPPORT FOR OS AND DOS VSAM FUNCTIONS 



The introduction 
information: 



provides the following 



CMS supports interactive program development for 
OS and DOS programs using VSAM. CHS supports 
VSAM for OS programs written in VS BASIC, OS/VS 
COBOL, or OS PL/I programming languages; or DOS 
programs written in DOS/VS COBOL or DOS PL/I 
programming languages. CMS does not support 
VSAM for OS or DOS assembler language programs. 

CMS also supports Access Method Services to 
manipulate OS and DOS VSAM and SAM data sets. 

Under CMS, VSAM data sets can span up to nine 
DASD volumes. CMS does not support VSAM data 
set sharing; however, CMS already supports the 
sharing of minidisks or full pack minidisks. 

VSAM data sets created in CMS are not in the 
CMS file format. Therefore, CMS commands 
currently used to manipulate CMS files cannot be 
used for VSAM data sets which are read or 
written in CMS. A VSAM data set created in CMS 
has a file format that is compatible with OS and 
DOS VSAM data sets. Thus a VSAM data set 
created in CMS can later be read or updated by 
OS or DOS. 



A brief description of the Remote Spooling 
Communications Subsystem (RSCS) external 
structure and the commands used to control 
the system . 

An overview of the RSCS control program, that 
is, of the RSCS supervisor and RSCS tasks. 

Descriptions of the nonprogrammable terminal 
(NPT) and spool MULTI-LEAVING* (SML) line 
drivers. 

Brief descriptions of major RSCS data areas 
and storage requirements. 

Detailed information about RSCS supervisor 
functions, such as synchronizing and 
dispatching tasks, task-to-task 
communications, I/O methods, and how RSCS 
network links are manipulated. 



REMOTE SPOOLING 
OVERVIEW 
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Because VSAM data sets in CM 
of the CMS file system, CMS fi 
length, and minidisk size rest 
apply. The VSAM data sets are 
Access Method Services programs 
CMS, instead of with the C 
commands. Also, all VSAM min 
packs used in CMS must be initi 
IBCDASDI program; the CMS FORM 
not be used. 
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le size, record 
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CMS supports VSAM control blocks with the 
GENCB, MODCB, TESTCB, and SHOWCB macros. 

In its support of VSAM data sets, CMS uses 
HPS (rotational position sensing) wherever 
possible. CMS does not use EPS for 2314/2319 
devices, or for 3340 devices that do not have 
the feature. 



S§E^SL§Ee l§Zices Su££orted 



The VM/370 Remote spooling Communications 
Subsystem (RSCS) is the Vfl/370 component that 
provides for the transmission of files across a 
teleprocessing network controlled by the VM/370 
computer. Using RSCS, virtual machine users can 
transmit files to remote stations. (Remote 
stations are I/O configurations attached to the 
VM/370 computer by communications lines.) Also, 
users at remote stations can transmit files to 
VM/370 virtual machines and to other remote 
stations using RSCS. 

RSCS resides in a virtual machine dedicated 
to remote spooling. Using the RSCS command 
language, the RSCS operator manages the 
telecommunications facilities for the 
installation. 

Operators at remote stations can manage their 
own configurations using a subset of the command 
language. Commands issued from remote stations 
can be entered either at a terminal or from a 
card reader. 



Because CMS support of VSAM data sets is based 
on DOS/VS VSAM and DOS/VS Access Method 
Services, only disks supported by DOS/VS can be 
used for VSAM data sets in CMS. These disks 
are: 



You can find detailed descriptions of RSCS 
functions in the publication VM/370: Remote 



^Trademark of IBM 



138 



IBM VM/370: System Logic and Problem Determination Guide 



S£oolina Communications Subsystem (HSCS) Oser2.s 
Guide. ~ 



LOCATIONS AND LINKS 



THE RSCS VIRTUAL MACHINE 
PROGRAM (CP) 



AND THE VM/370 CONTROL 



Like the other VM/370 virtual machines, the RSCS 
virtual machine runs under the control of CP. 
In extending the VM/370 spooling system 
capability to include spooling to remote 
stations, RSCS interacts with the CP spooling 
system. Therefore, some of the information in 
this publication requires a knowledge of that 
area of CP . 



At a local installation there are a number of 
transmission paths to remote stations. A unique 
location identifier (locid) is assigned to each 
of these remote stations. 

For each transmission path (nonswitched line) 
or potential transmission path (switched line) , 
a link must be defined at the local VM/370 
installation. Each such link is given a name 
(linkid) that defines the location identifier of 
the remote station to which the transmission 
path leads. This link can be defined either at 
system generation or by means of the DEFINE 
command . 



The RSCS virtual machine consists of the 
virtual machine operator console, an RSCS system 
disk, and virtual telecommunications lines. 
During system generation, a virtual card reader 
is defined for the RSCS virtual machine, but 
this reader does not exist in the CP directory 
entry for the RSCS virtual machine. 
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REMOTE STATIONS 



Remote stations are configurations of I/O 
devices attached to the VM/370 computer by 
binary synchronous (BSC) switched or nonswitched 
lines. Two types of remote stations are 
supported by RSCS: programmable remote stations 
and nonprogrammable remote stations. 



The minimum virtual storage required to run 
RSCS is 512K. 



OBI 



RSCS 
Virtual 
Machine 



Virtual 
Console 



Virtual 
TCU 



0B2 



Virtual 
TCU 



OB 3 



Virtual 
TCU 



RSCS 

System 

Disk 



Figure 28. RSCS Virtual Machine Configuration 



iX^cjrammable Remote Stations 



Programmable remote stations, such as the IBM 
System/3 and System/370, are IBM processing 
systems with attached binary synchronous 
communications adapters. These systems must be 
programmed to provide the MULTI-LEAVING line 
protocol necessary for their devices to function 
as remote stations. This programming support is 
provided by a remote terminal processor (RTP) 
program generated according to HASP workstation 
protocol and tailored to the system's hardware 
configuration. Certain programmable remote 
stations like the System/3 can only be 
programmed to function as remote terminals. 
Others, like the System/360 and System/370, can 
function either as remote terminals or as host 
batch systems using RSCS as a remote job entry 
workstation. Both of these types of remote 
stations are managed by the spool MULTI-LEAVING 
(SML) line driver of RSCS. 



^oil£Ioa£amble Remote Stations 



Nonprogrammable 
configurations 
are hard-wired 
necessary for 
stations. They 
and send files, 
remote station 
Terminal. Nonpro 
managed by the 
RSCS line driver. 



remote stations are I/O 
hat cannot be programmed, but 
to provide the line protocol 
them to function as remote 
an receive, read, print, punch. 
An example of a nonprogrammable 
is a 2780 Data Transmission 
grammable remote stations are 
NPT (Nonprogrammable Terminal) 



The types of devices supported for all types 
of remote stations, programmable and 
nonprogrammable, are listed in the VM^370: 
Jeiote S£Oolina Communications Subsystem (RSCS) 
User's Guide. 
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KETWOBK CONTROL: BSCS AND V(l/370 COMMANDS 



Both BSCS and VM/370 connands are used to 
control RSCS. The BSCS coniands are used to 
control the RSCS network; VM/370 CP and CMS 
commands are used by virtual machine users who 
use the BSCS network. 



BSCS COMMANDS 



To manipulate the file being transmitted across 
the network and to communicate with the various 
network users, the RSCS control program provides 
a command language. Figure 29 is a list of BSCS 
commands and the functions they perform. You 
can find detailed descriptions of these commands 
in the publication VM/370: Bemote Sfiooling 
Communications Subsystem (BSCS) Dser^s Guide. 

The operator may enter BSCS commands 
described in Figure 29 at the RSCS virtual 
machine console. A subset of the RSCS command 
language may be entered by operators of remote 
stations. 



VM/370 CP AND CMS COMMANDS FOR BSCs 



The VM/370 CP TAG and SPOOL commands specify a 
device to be spooled and to associate a 
destination location identifier (locid) with 
that device. SPOOL directs the file to the RSCS 
virtual machine. The CP CLOSE command or the 
CMS PBINT or PUNCH commands close the file and 
transfer it to the BSCS virtual machine. 

Data specified by the CP TAG command controls 
processing of files transmitted across the BSCS 
network. When a VM/370 user creates a file to 
be transmitted to a remote station via BSCS, the 
TAG command text operand takes the following 
format : 

linkid [userid] [priority] 

where : 

linkid is the location identifier of the 
link on which the file is to be 
transmitted. 

userid is the remote virtual machine 
that is to receive the file. 

priority is the requested transmission 
priority (a decimal number 0-99, 
default 99) . The lower numbers 
have higher priorities. 

Also, the CP SPOOL command directs files to the 
BSCS virtual machine. See the publication For 
details on how to use the CP TAG and SPOOL 
commands to control BSCS network functions, see 
the VM/370: Remote S£ooling Communications 
Subszstem (BSCsf User2.s Guide. 



Command 
Name 

BACKSPAC 



CHANGE 



CMD 



DEFINE 



DELETE 



DISCONH 



DRAIN 



FLUSH 



FREE 



FWDSPACE 



HOLD 



MSG 



ORDER 



PURGE 



QUERY 



START 



TRACE 



Function 

Restarts or repositions in a 
backward direction the file 
currently being transmitted. 

Alters one or more attributes of 
a file owned by RSCS. 

Controls certain functions per- 
formed by a remote system, or 
controls the logging of I/O acti- 
vity on a specified link. 

Temporarily adds a new link defi- 
nition to the BSCS link table or 
temporarily redefines an existing 
link. 

Temporarily deletes a link defi- 
nition from the BSCS link table. 

Places BSCS in disconnect mode 
and optionally directs output to 
another virtual machine. 

Deactivates an active communi- 
cation link. 

Discontinues processing the cur- 
rent file on the specified link. 

Besumes transmission on a commu- 
nication link previously in HOLD 
status. 

Repositions the file currently 
being transmitted in a forward 
direction. 

Suspends file transmission on an 
active link without deactivating 
the line. 

Sends a message to a local or 
remote station. 

Reorders files enqueued on a spe- 
cific link. 

Removes all or specified files 
from a link. 

Requests system information for a 
link, a file, or for the system 
in general. 

Activates a specified communica- 
tion link. 

Monitors line activity on a spe- 
cified link. 



Figure 29. RSCS Commands and Functions 
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CP Instructions Used bjr the RSCS Control P£05£aj 



When RSCS handles files being transmitted across 
the network, the BSCS control program (line 
driver tasks) issues CP DIAGNOSE instructions. 

The DIAGNOSE instruction is the method of 
communication between a virtual machine and CP. 
In VM/370, the machine-coded format for the 
DIAGNOSE instruction is: 



7 8 



11 12 



15 16 



83 



I ry 



Code 



31 
I 



Content ExElanation 
83 DIAGNOSE operation code 
rx User— specified register number 
ry User-specified register number 
Code Hexadecimal value that selects a 
particular CP function. 

Figure 30 lists the DIAGNOSE function codes 
used by RSCS, the functions of those codes, and 
the RSCS modules from which they are issued. 



DIAGNOSE 
Code 



0008 



OOOC 
0011 

0020 
0024 

005C 



Function 



Executes a CP command. 



Gets the current 
and date. 



time 



Manipulates input spool 
files. 



Performs general 
without interrupt. 



I/O 



Determines virtual de- 
vice type information. 



Edits error messages. 



Issued by 
Module (s) 



DMTAXS 
DHTREX 
DMTCMX 
DMTMGX 
DMTSML 
DMTNPT 

DMTSML 
DMTNPT 

DMTAXS 
DMTSML 
DMTNPT 

DMTINI 



DMTREX 
DMTLAX 
DMTSML 

DMTREX 



Figure 30. VM/370 DIAGNOSE Instructions 

Issued by the RSCS Program 



THE RSCS CONTROL PROGRAM 



RSCS is a control program composed of a 
multitasking supervisor and multiple tasks, 
which are controlled by the supervisor. 

The supervisor provides only those functions 
that cannot be consistently provided by the 
tasks themselves; that is, the supervisor 
provides only the support necessary to control 
and coordinate the execution of the tasks. 



In RSCS, a task is a single program or set of 
subprograms that can run concurrently and 
autonomously with other such programs and 
subprograms, and which uses control functions 
provided by the Supervisor. 

There are two types of tasks: system service 
tasks and line driver tasks. The system service 
tasks are those that provide the system support 
functions for the supervisor and for other 
tasks. The line driver tasks are those that 
manage the transmission paths to remote stations 
and that interact between the remote stations 
and the system service tasks and the 
Supervisor. Each line driver task manages the 
transmission of files to and from a single 
remote station. 

Figure 56 in section 2 shows the 
communications paths between the supervisor, 
system service tasks, line driver tasks, remote 
stations, and VM/370 virtual machines. 



THE RSCS SUPERVISOR 



The RSCS supervisor is composed of a set of 
service routines that provide functions for the 
tasks that run under them. These service 
routines may be called by any task. In general, 
they provide four kinds of services: 



• Task management 

• I/O management 

• Interrupt handling 

• Virtual storage management 



TASK MANAGEMENT 



The task management service routines provide 
three kinds of services: task execution control, 
task synchronization, and task-to-task 
communication. 

Task execution control includes initiating 
and terminating tasks. In general, the only task 
to reguest these services is the REX system 
control task, which is described below. Task 
execution control also includes the dispatcher, 
DMTDSP, which activates task execution as soon 
as that task is initiated and while the task is 
active. 

Task synchronization comprises a mechanism by 
which tasks are made ready or not ready for 
execution. When a task requests the services of 
another task, the requestor task may suspend its 
execution while the request is being processed. 
The synchronization mechanism that accomplishes 
this consists of two routines, DMTHAT and 
DMTPST. DMTMAT causes the requestor task to 
temporarily halt execution. DMTPST causes a 
temporarily-halted task to resume execution. 
For more information on task synchronization 
refer to the section "Task Synchronization". 

There are two types of task-to-task 

communications: (1) the DHTSIG routine (ALERT) 

and (2) the DMTGIV and DMTAKE routines 
(GIVE/TAKE) . 
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The DKTSIG routine allows a task to 
ionediately interrupt another task to pass it 
information. The interrupted task must have an 
asynchronous exit routine defined to handle the 
interruption. Functionally, DMTSIG performs a 
function analagous to an SVC instruction. 

The DMTGIV and DMTAKE routines allow tasks to 
exchange information buffers with other tasks- 
The GIVE/TAKE function provides the means for 
organized enqueuing and delivery of requests for 
services or information from one task to 
another. 

For more information on task-to-task 
communications, refer to the section 
"Task-to-Task Communications" in this section. 



I/O MANAGEMENT 



I/O management for tasks consists of the 
following functions: 

• Handling requests for I/O operations 

• Handling I/O interrupts 

• Starting an I/O operation 

• Completing an I/O request 

Whenever a task requests the services of the 
I/O manager, that task builds an I/O request 
table to be passed to the I/O manager. This 
table consists of the following information: 

• A synchronization lock for signalling I/O 
completion 

• The address of the device on which the I/C 
operation is to take place 

• The number of SENSE bytes to be returned, 
when applicable 

• The address of the channel program to be 
executed 



The following information is returned to the 
task by the I/O manager, in the I/O request 
table: 



INTERHUPTION HANDLING 



supervisor service routines handle three kinds 
of interruptions: external interruptions, SVc 
interruptions, and I/O interruptions. 

In RSCS, supervisor routines use the SVC 
(SUPERVISOR CALL) to suspend the execution or 
dispatching of a task when that supervisor 
routine received control. On an SVC 
interruption in RSCS, DMTSVC is entered. DMTSVC 
saves the status of the executing task and 
passes control to the calling supervisor routine 
in supervisor execution mode. 

RSCS handles external interruptions from 
tasks by searching for asynchronous exit 
requests supplied by tasks. When a request with 
a code matching the external interruption code 
is found, its asynchronous exit is taken; 
otherwise, the external interruption is 
ignored. 

I/O interruptions are handled by the RSCS I/O 
manager. When an active I/O request causes an 
I/O interruption, the status of the I/O request 
is updated to reflect the new information. 
Otherwise, a search is made for an asynchronous 
exit request for the interrupting device. When 
one is found, the asynchronous exit is taken. 
Otherwise, the interruption is ignored. 



VIRTDAL STORAGE MANAGEMENT 



The supervisor virtual storage service routine 
DMTSTO handles requests by tasks for main 
storage. When a task requests main storage, 
DMTSTO reserves page (s) of storage for it. Main 
storage is freed directly by task programs. 

DMTQRQ manages requests for free elements of 
the supervisor status queue. Supervisor 
routines call DMTQRQ to reserve and release 
supervisor status queue elements. 



RSCS TASK STRUCTURE 



• The condition code for the SIO issued for the 
I/O operation 

• The composite CSH 

• The SENSE bytes returned by the operation (if 
any) 

Using the information in this table, the I/O 
manager enqueues the request on the specified 
subchannel, starts the I/O operation, assembles 
the return information in the requestor's I/O 
request table, and posts the synchronization 
lock in the I/O request table signalling that 
the I/O operation is complete. 



As described in the previous section, the RSCS 
supervisor comprises a set of routines that 
function together to manage RSCS system 
processing. The supervisor provides a base for 
many system programs called tasks. (These tasks 
are not to be confused with user-application 
programs. ) 

The RSCS system service tasks perform less 
generalized functions for the system than those 
functions performed by the supervisor. For 
example, the AXS system service task is designed 
specifically to access the VM/370 spool file 
system. 

The supervisor identically manages all tasks 
in RSCS; the supervisor makes no distinction 
between system service tasks and line driver 
tasks. Figure 31 is a list of the RSCS tasks 
and a brief statement of the service each 
performs. 
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CREATE SYSTEM TASKS: DMTCRE 



i Task 1 Module | Function | 
1 Name | Name | | 

1 REX 1 DMTREX | Handles console I/O; ac- | 
1 1 1 cepts requests for ser- | 
1 1 1 vices passed by other | 
1 1 1 system service tasks or | 
1 1 1 line driver tasks; termi- | 
1 1 1 nates a task; handles | 
1 1 1 program check inter- | 
1 1 1 ruptions. | 

1 1 DMTCRE 1 Creates a system service | 
1 1 1 or line driver task. | 

1 1 DMTCMX 1 Monitors processing of | 
1 1 1 commands in RSCS; exe- | 
1 1 1 cutes the DEFINE, DELETE, | 
1 1 1 DISCONN, QUERY, and START | 
1 1 1 commands. | 

1 1 DMTMGX 1 Builds a message element | 
1 1 1 and passes the element to | 
1 1 1 to the appropriate tasks | 
1 1 1 for transmission or | 
1 1 1 printing. | 

1 1 DMTCOM 1 Performs common task | 
1 1 1 functions. j 

1 AXS 1 DMTAXS | Communicates with the | 
1 1 1 spool file system. | 

1 LAX 1 DHTLAX | Manages telecommunica- | 
1 1 1 tions line allocation. | 


1 Line 1 DHTSML | Manages a telecommunica- | 
1 Driver | | tions line for a program- | 
1 1 1 mable remote station | 
1 1 1 using RTAM. | 

1 1 DMTNPT 1 Manages a telecommunica- | 
1 1 1 tions line for a nonpro- | 
1 1 1 programmable remote sta- | 
1 1 1 tion terminal. | 



Figure 31. RSCS Tasks 



If the command is not one that DMTCMX 
executes within its own code, the command line 
is examined for syntax errors and then passed to 
the appropriate task for execution. To do this, 
DMTCMX generates a formatted table called a 
command element to be passed to another active 
task for execution via an ALERT asynchronous 
exit. 

The commands CHANGE, ORDER, and PORGE are 
executed by DMTAXS; the commands BACKSPAC, CMD, 
DRAIN, FLUSH, FREE, FWDSPACE, HOLD, MSG, TRACE 
and START (for active links) are executed by the 
line driver task for the specified link. 



PROCESS MESSAGES: DMTMGX 



DMTMGX manages distribution of all RSCS 
messages, which may be generated by REX or by 
any other RSCS task. Each message to be issued 
is presented to DMTMGX (via GIVE/TAKE for tasks 
other than REX) along with an internal routing 
code and an internal severity code. 

Messages may be addressed to the local RSCS 
operator console, to the local VM/370 operator, 
to a local VM/370 user console, to a remote 
station operator, or to any combination of these 
destinations, by means of the routing code. The 
severity code is defined for each message, and 
is an indication of the importance of the 
message. 

Messages for the RSCS local operator console 
are enqueued for output on the RSCS virtual 
machine console. Messages for the local VM/370 
system operator and for local virtual machine 
consoles are issued by means of execution of a 
VM/370 MESSAGE command (through the DIAGNOSE 
interface) . Messages for remote RSCS operators 
are presented to the line drivers for the 
associated links by means of the RSCS MSG 
command element interface. This method of 
message handling simplifies RSCS message 
routing, tracing, and recording. 



The main system service task, REX, is loaded 
with the supervisor during RSCS initialization. 
The REX jp task, in turn, creates other tasks 
required ' by the system. DMTCRE reads these 
other tasks from a CMS disk by means of a CMS 
read access method. The task is then started as 
a new active task under RSCS. 



PROCESS COMMANDS: DMTCMX 



EMTCMX receives commands by means of either GIVE 
request elements passed by line driver tasks or 
in the form of a console input line resulting 
from a console read by DMTREX. 

The commands DEFINE, DELETE, DISCONN, QUERY, 
and START (for inactive links) are executed by 
DMTCMX. Execution of these commands generally 
involves referencing and modification of system 
status tables (SVECTORS, TTAGQ, TLINKS, etc.). 



TERMINATE SYSTEM 
CHECKS: DMTREX 



TASKS AND 



HANDLE PROGRAM 



When a line driver task requests termination, a 
TAKE request is passed to DMTREX specifying that 
function. DMTREX marks the task as terminated, 
then searches for active I/O associated with the 
task. If active I/O is found, it is 
terminated. To ensure that system integrity is 
maintained during the termination of the I/O, a 
mechanism (at label QUIESE) is set up to handle 
situations in which an HIO (Halt I/O 
instruction) does not take effect immediately. 

All RSCS program checks are handled by a 
routine in DMTREX. Program check diagnostic 
information is dumped, a message to the operator 
is issued, and the RSCS system status is 
modified, depending on the nature of the program 
check. 
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COMMUNICATE WITH 
DMTaXS 



THE VM/370 SPOOL FILE SYSTEM; 



LINE DRIVER TASKS: DMTNPT AND DMTSML 



DMTAXS is responsible for the maintenance of the 
total RSCS interface to the VM/370 spool 
system. When a spool file arrives at the RSCS 
virtual machine, AXS receives the associated 
asynchronous interrupt, reads and interprets the 
file's VM/370 spool file block (SFBLOK) and TAG, 
enqueues the file for transmission as 
appropriate, and notifies the appropriate line 
driver of the new file's availability. AXS 
provides a GIVE/TAKE request interface to line 
driver tasks for spool file data input and 
output, and defines and detaches virtual spool 
I/O devices as necessary. Also, AXS provides an 
interface to DMTCMX for second-level command 
execution support. 

AXS maintains a queue of a fixed number of 
virtual storage elements (called tag slots) that 
describe files currently owned by the RSCS 
virtual machine. To maintain RSCS integrity in 
a simple way when a very large number of files 
is enqueued on the RSCS virtual machine, the 
virtual storage tag queue is not extended during 
execution. 

When a new file arrives at the RSCS virtual 
machine, its destination locid is examined, and 
it is accepted only if there is a matching 
linkid for which there is a free tag slot 
available. If the file's destination locid is 
not defined as a linkid, the file is purged and 
the originating user is notified of the action. 
If there is no free tag slot available for a 
defined linkid, the file is left "pending", and 
is accepted when a TAG slot becomes free. While 
a file is pending, it is not recognized by the 
RSCS command processors, and cannot be 
referenced through RSCS functions. 

To prevent links from being totally locked 
out by an exhausted (and stagnant) virtual 
storage tag queue, a minimum number of tag slots 
is reserved for each link. This guarantees that 
a minimum number of files is accepted for each 
associated link. The number of reserved slots 
is defined during system generation or in the 
DEFINE command for each link to be defined in 
RSCS. The appropriate number of slots to be 
reserved for each link may depend on the 
expected file traffic, the link's line speed, 
the expected tine the link is to be active, and 
the desired level of service to be provided to 
the link. This number for each link may be 
arrived at through actual operational experience 
in each location. 



MANAGE TELECOMMUNICATION LINE ALLOCATION: DMTLAX 



DMTLAX is responsible for line port resource 
allocation to line driver tasks. DMTLAX 
allocates available switched ports (when a link 
is activated without a specified line address) 
through an ALERT request interface. When a line 
port is specifically requested (by virtual 
address) , DMTLAX checks the device for validity 
as a line port. 



As part of the link activation process, REX 
(module DMTCRE) loads and starts a line driver 
task to service the remote location. 

The general functions of line driver tasks 
are: 

• Manage I/O on the BSC line 

• Manage transmission of spool file data via a 
GIVE/TAKE request to the AXS task 

• Provide GIVE/TAKE requests to the REX task 
command module (DMTCMX) 



The precise functional requirements vary from 
line driver to line driver, depending on the 
type of remote station the line driver 
supports. 

Each line driver is responsible for 
maintenance of its link status and line activity 
(TRACE) records in the RSCS system status 
tables. 

Two line drivers are provided, one to support 
remote 2770, 2780, 3770 (in 2770 mode), and 3780 
terminals, and another to interface to remote 
HASP- and ASP-type systems or work stations. 



THE SML LINE DRIVER PROGRAM 



The SML line driver program is composed of four 
general types of routines: 

• Processors, which are routines that execute 
the functions required by the HOST and RJE 
processing modes. 

• An input/output routine that accepts and 
transmits data on the BSC line. 

• A function selector routine that dispatches 
one of the processors when a request for 
services is received. 

• Buffer blocking and deblocking routines. 



The SML line driver supports programmable 
remote stations (in both HOST and RJE modes) for 
HASP- and ASP-type systems. HOST mode is that 
processing mode in which a remote station may 
submit jobs to VM/370 and receive print and 
punch output from VH/370. RJE mode is that 
processing mode in which VM/370 may send jobs to 
a remote batch system for processing and receive 
print and punch output from the remote batch 
system. 

Figure 32 shows the types of data flowing to 
and from RSCS via the SML line driver program. 
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Figure 32. Data Flow Between KSCS and Remote 
Stations via the SML Line Driver 



SML PROCESSORS 



To support the HOST and RJE processing modes, 
the SML program provides seven "processors," or 
routines, that handle the seven functions 
required to support the two processing modes. 
Figure 33 is a list of the SML processors, the 
processing modes they support, and a brief 
statement of their function. 



Command Processing 



THE SML FUNCTION SELECTOR ROUTINE: $START 



The $START routine is entered when SML is 
required (by either a remote station or a 
virtual machine) to perform a function. The 
purpose of this routine is to select a function 
to execute. The routine performs this function 
by using a commutator table, a list of synch 
locks, and task control tables. 

The SML commutator table is a branch table 
consisting of branch (B) and no-operation (NOP) 
instructions. The targets of the branch 
instructions are the seven processor routines, 
each of which performs a specific function. 
When the service of a processor is not required, 
the Commutator Table entry for that processor is 
a NOP instruction. When the function of the 
processor is required, the NOP instruction in 
the commutator table entry for that processor is 
replaced with a B instruction, thereby opening a 
gate in the commutator table. 

The $START routine cycles through the 
commutator table, falling through any NOP 
instructions and taking any branches. Control 
is passed in this way to any processor whose 
gate in the commutator table is open. 

When the processor completes the function 
requested, it closes its gate in the commutator 
table by replacing the B instructions with a NOP 
instruction. $START continues cycling through 
the commutator table taking any open branches. 

When the bottom of the commutator table is 
reached, $START tests a series of synch locks to 
see if any have been posted, signifying a 
request for an SML function. If any synch locks 
are posted, $START opens the commutator table 
gate for the requested processor and goes to the 
top of the commutator table to start cycling 
through it again. 



When a command is transmitted from a remote 
station to RSCS, SML receives the command and 
coordinates processing of the command with 
supervisor routines and the REX task command 
module DMTCMX. 



The SML processor, 
command request from a rem 
a command request eleme 
(module DMTCMX) via a GIVE 
determines whether the 
executed by DMTCMX, DMT 
driver. If the command is 
line driver, it is passe 
ALERT request. The SML 
executes the command. 



$HRTN1, processes a 
ote station by passing 
nt to the REX task 

request. DMTCMX then 

command should be 

AXS, or by the line 

to be executed by the 
d back to- SML via an 

routine CMDPROC then 



If the bottom of 
reached and there are 
discontinues process 
request via a call 
DMTWAT, waiting on a 
When any of the sync 
receives control , op 
and starts cycling 
table. 



the commutator table is 

no posted synch locks, SML 

ing by issuing a wait 

to the supervisor module 

list of the synch locks. 

h locks is posted, $START 

ens the appropriate gate, 

through the commutator 



The task control table (TCT) is a DSECT 
defining data required by each of . the 
processors. There is a TCT for each of the 
processors. Also, contained within the TCT is a 
branch instruction to the appropriate 
processor. 



THE SML LINE I/O HANDLER ROUTINE: COMSUP 



The SML line I/O handler routine, COMSUP, 
controls communications on the BSC line for 
SML. This routine receives data from the BSC 
line and passes the data to the deblocker 
routine ($TPGET) . COMSUP also sends data (which 
has been blocked by the blocker routine, $TPPUT) 
to a remote station. COMSUP is also responsible 
for acknowledging receipt of data over the line 
using the standard BSC line control characters. 



BLOCK AND DEBLOCK SML TELEPROCESSING BUFFERS 
$TPPUT AND $TPGET 



Data received over the BSC line is placed in a 
teleprocessing (TP) buffer. The size of TP 
buffers is specified by a START command 
parameter and can be up to 102U bytes. 

Data contained in TP buffers is deblocked 
into tanks, which are unit buffers of a specific 
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Processor | Mode 

1 

$CRTN1 1 HCST/RJE 

1 
1 
1 

$PRTK1 1 RJE 
1 
1 


SURTMI 1 RJE 
1 

$JRTN1 1 HOST 
$HRTN1 1 HOST/RJE 

$RRTN1 1 HOST/RJE 

CMDPBOC 1 

1 
1 
1 



Function 



Processes the follow- 
ing MULTI-LEAVING 
control records: 
permission to trans- 
lait, request to 
transmit, and SIGNON 
control records. 



Processes print file 
records received from 
remote stations and 
passes them to the 
VM/370 spool system. 



Processes punch file 
records received from 
remote stations and 
passes them to the 
VM/370 spool system. 



Processes job file 
records received from 
the remote station 
and passes them to 
the VH/370 spool sys- 
tem. 



In HOST mode, passes 
command request ele- 
ments, via DMTMGX, 
to DMTCMX for proces- 
sing. 

In RJE mode, passes 
message request ele- 
ments to the RSCS op- 
erator's console. 



Receives records from 
the VM/370 spool sys- 
tem for transmission 
to remote stations. 



Executes local com- 
mands passed by 
DMTCMX, and passes 
messages and commands 
to remote stations. 



STPGET receives data from a BSC line (via the 
COMSOP routine) and allocates tanks to output 
processors as they are needed. 

$TPPOT receives tanks from input processors, 
blocks the data in these tanks into TP buffers, 
and gives control to COMSUP to transmit the 
buffers over the line. 



THE NPT LINE DRIVER PROGRAM 



The NPT line driver program processes only one 
file at a time; it can either receive a file as 
input from the remote station or transmit an 
output file to a remote station. These two 
processes execute under control of a line 
monitor that reads and writes data over the BSC 
line and a function selector routine that 
determines whether an input or output function 
has been requested. 



THE HPT LINE MONITOR ROUTINE;: LINEIO 



The NPT line monitor routine, LINEIO, controls 
communications on the BSC line. This routine 
sends and receives data over the BSC line. 

When the data is received from remote 
stations, that data is received in the LINEINB 
buffer. When data is transmitted to a remote 
station, it is transitted using the LINEBUPF 
buffer. The NPT buffers are a fixed size, 
defined by terminal type and buffer size 
specified on the SIGNON card. 



THE NPT FUNCTION SELECTOR ROUTINE: NPTGET 



When the NPT line driver program has been loaded 
and initialized, the NPTGET program begins a 
cycle in which it checks every three seconds for 
one of three functions to perform: 

• Process a command 

• Read a file from a remote station 

• Write a file to a remote station 



When a function is requested, a branch is 
taken to the appropriate routine. 



Figure 33. 



SML Function Processors 



size used to deblock the larger TP buffers. 
There are 15 tanks; these are allocated as they 
are needed by processors. The size of tanks is 
determined by MULTI-LEAVING control bytes. 

When an SML function has been requested, the 
data must be either blocked for transmission (if 
it is data for a remote station) or deblocked 
for processing (if it has been received from a 
remote station) . 



HPT INPUT FILE PROCESSING 



For files being received from remote stations, 
two processing routines are executed: PUTVHFY 
and PUTBLOCK. PUTVRFY reads the data contained 
in the input buffer (LINEINB) and verifies the 
BSC control characters for that data. PUTBLOCK 
deblocks the data in LINEINB, formats it for use 
by VM/370, and then writes the data to the 
VM/370 spool system. 
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NPT OUTPUT PROCESSING ROUTINES 



For files being transmitted to a remote station, 
three processing routines are executed: 
HAKEBLOC, GETBIOCK, and GETVRFY. 

MAKEBLOC accepts a block of data from the 
VM/370 spool system and passes control to 
GETBLOCK. GETBLOCK then builds a buffer with 
which to transmit the data and transmits the 
data to the remote station. The response 
received from that transmission is analyzed by 
GETVRFY. 



MAJOR DATA AREAS 



The major data areas used by RSCS are: 

SVECTORS 

RSCS supervisor gueue elements 

HAINNAP 

TAREA 

LINKTABL 

TAG 

RSCS request elements 

VM/370 data areas referenced by RSCS 



through GIVEQ. The DSECTS defining the elements 
chained on these queues are: FREES, TASKS, lOE, 
ASYNE, and GIVEE. 



HAINMAP: STORAGE AVAILABLE TO 
TASKS 



RSCS PROGRAMS AND 



The HAINMAP DSECT is a grid of a fixed number of 
bytes, each of which represents a page of 
virtual storage. When a task (or the 
Supervisor) requests storage, the byte is filled 
with the TASKID (generated by the Supervisor) of 
the requestor, thus marking the storage page as 
taken by that task. When a page is free, its 
map entry is cleared to zero by the task owning 
the storage. 



TAREA: THE SAVE AREA FOR AM INTERRUPTED TASK 



The TAREA DSECT contains the PSM at which a task 
is to resume execution, the contents of the task 
general registers when it was interrupted, and 
the task's request synchronization lock. This 
area is used to maintain the status of a task 
when it is interrupted by another task. 



The data areas discussed below give a brief 
functional overview of each data area and its 
relationship to other data areas in the system. 
These are not meant to be a comprehensive 
description of the RSCS data areas. Rather, it 
is meant as an introduction to the types of data 
used by RSCS in performing its various 
functions. 



LINKTABL: LINK DESCRIPTION DATA 



SVECTORS: SUPERVISOR CONTROL 
SUPERVISOR ROUTINE ADDRESSES 



QUEUES AND 



The SVECTORS DSECT contains: 

• The PSW for the last task dispatched 

• The RSCS System Save area 

• The task ID and address of the task element 
for the last task dispatched 

• Pointers to the RSCS supervisor subqueues 

• Entry addresses for all supervisor service 
routines 

This data area is updated dynamically as tasks 
execute and is used by RSCS to monitor the 
execution status of the system. 



The LINKTABL DSECT 
associated with each 
control data includes 
linkid of the link, th 
line driver (that is, 
knows the task) , the 
is used by the link, a 
(a chain of LINKTABL 
system generation and 
DEFINE, DELETE, START, 



describes control data 
link in the system. The 

such information as the 
e task name for the link's 
the name by which RSCS 
address of the line which 
nd so on. The link table 

DSECTS) is built during 
may be updated by the 

and DRAIN commands. 



TAG: THE RSCS FILE DESCRIPTOR 



The TAG DSECT defines the attributes and status 
of a file being processed by RSCS. The TAG is 
built from information passed via the CP TAG 
command (or its counterpart for remote stations) 
and from the CP Spool File Block (SFBLOK) that 
describes the file. 



RSCS REQUEST ELEMENTS 



Request elements are data tables built by task 
programs when a service is to be requested by 
the task. 



RSCS SUPERVISOR QUEUE ELEMENTS 



All supervisor status information pertaining to 
tasks and task requests is maintained in 
Supervisor storage defined by the SVECTORS 
DSECT. There are various queues defined in this 
DSECT, each pertaining to a particular 
Supervisor function, and composed of elements of 
similar format. The heads of these queues are 
defined in a portion of SVECTORS from FREEQ 



For example, when a command is processed by 
DMTCMX, the command line may be formatted into a 
command element, which gives the following types 
of information: 

• Length of the command element 

• The unique code identifying the command 
element 
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• The linkid to which conuand response is to be 
returned 

• Modifiers that specify options for a given 
command 

• A variable length buffer field containing the 
comiBand line 



This command element is then passed (via DNTSIG) 
to another task for processing. 

Other types of request elements are built to 
process individual commands and messages, to 
create and terminate tasks, to process console 
I/O, and so on. 

In many cases, elements are contained in a 
generalized control area used when processing a 
system function, for example, monitoring 
requests for DMTAXS module to open or close a 
VM/370 spool file. 



VM/370 DATA ABEAS REFEREMCED BY RSCS 



There are two VM/370 CP data areas referenced by 
RSCS when VM/370 spool files are processed: 

• SFBLOK The VM/370 spool file block 
that contains control information and 
describes attributes of a VM/370 spool 
file. 

• SPLINK The data block that links pages of a 

VM/370 spool file buffer. 



RSCS STORAGE REQDIREMENTS 



Figure 3U shows the storage used by the RSCS 
control program and how the parts of the system 
(the Supervisor, the tasks, and the data areas) 
fit together in storage. 
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Figure 3U. RSCS Storage Allocation 
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iDMTINI begins at the first page boundary following DMTSYS. After initialization its storage 
becomes part of free storage. 
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SYNCHRONIZING AND DISPATCHING TASKS 



SYNCHRONIZATION LOCKS 



The means b; which RSCS synchronizes and 
dispatches tasks are the WAIT/POST routines 
(DMTWAT and DMTPST) , synchronization locks, 
asynchronous requests and exits, and the 
dispatcher routine (DMTDSP) . 



The HAIT/POST 
(Supervisor modu 
when an executin 
another task, 
requesting task 
it waits for 
performed. In c 
WAIT/POST allow 
execution until 
synch lock) that 



method of task synchronization 
les DHTHAT and DMTPST) is used 
g task requires the services of 
When this situation occurs, the 
must suspend its execution while 
the requested service to be 
onjunction with the dispatcher, 
s tasks to temporarily suspend 
they receive a signal (via the 
they can resume execution. 



THE WAIT/POST ROUTINES 



To suspend its execution, the requesting task 
calls DMTWAT, which inspects the synchronization 
locks RSCS uses to synchronize task execution. 
Completion of a service is signalled by means of 
a synch lock, which is set (or "posted") by 
DMTPST. 



Synchronization locks (or "synch locks") are 
fullwords contained in task save areas or 
control tables (such as TAREA or lOTABLE) . 
Synch locks are also found in control areas in 
function selector routines such as REXCYCLE in 
module DMTREX. 



The synch lock must be set to zero before the 
request for services is made. Setting the synch 
lock to zero prepares it for processing by the 
WAIT routine. 



The first byte of the fullword may contain 
either a zero or a "post code." If the first 
byte is zero, the task is nondispatchable, 
because the requested service has not yet been 
performed. A post code is a code which sets to 
one any bit in the first byte of the synch 
lock. DMTPST sets such a bit to specify that a 
requested service has been completed. 



The requesting task, that is, the caller of 
DMTWAT, may specify the address of a single 
synch lock (as in the case of a GIVE Table or an 
lOTABLE) or the address of a list of synch locks 
(as in the case of REXCYCLE) , one of which must 
be posted by DMTPST before dispatching of the 
requesting task can resume. Figure 35 shows the 
contents of Register 1 on a call to DMTWAT. 
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Figure 35. Input to the DMTWAT Routine 



ASYNCHRONOUS INTERRUPTIONS AND EXITS 



Asynchronous interruptions result from processes 
external to RSCS. For example, during REX task 
execution, the RSCS operator may press the ATTN 



key on the RSCS console, thereby asynchronously 
interrupting execution of the REX task. 

To handle asychronous interruptions, RSCS 
tasks contain asynchronous exit routines. These 
asychronous exit routines are set up during 
initialization without dispatching the task 
being requested to perform the requested 
service. Asynchronous exits are provided for 
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external interruptions, for certain I/O 
interruptions, and for ALEBT requests that occur 
during execution of another task. 

Asynchronous exits are taken after a task 

calls DKTASY specifying the requested exit 

conditions and the entry address of the 
asynchronous exit routine. 

DMTASY also handles external interruptions 
reqeusted for the clock coiparator. The request 
element is queued on the asynchronous exit queue 
and processed by DMTEXT. The DMTASY clock 
comparator provides a time delay mechanism by 
using the CPU hardware clock comparator. 

Asynchronous exit routines perform limited 
function, often enqueueing requests for further 
processing at a later time by dispatched tasks. 
When the asynchronous exit routine completes 
processing, it returns control to the 
supervisor, which then resumes dispatching tasks 
via a call to the dispatcher (DMTDSP) . 



USING ASYNCHRONOUSLY REQUESTED SERVICES: DMTHAT 



Before a task can use the results of an 
asynchronously requested service, it must ensure 
that the service has been performed. To ensure 
that the service has been performed, the calling 
task signals that it is waiting for completion 
of a service via a call to the supervisor 
routine DMTHAT, specifying the synch lock 
associated with the requested service. 

If the high-order byte of the task's synch 
lock is nonzero when DHTWAT inspects it, control 
is returned directly to the calling task. If 
the high-order byte of the synch lock is zero, 
CHTHAT marks the calling task nondispatchable 
(via the task's request element), stores the 
address of the task's request element in the 
low-order bytes of the synch lock, and resumes 
dispatching for other tasks. 



POSTING A SYNCH LOCK 



is marked "nondispatchable," a masked-on 
state PSH is loaded by the dispatcher. 



wait 



In addition to posting a synch lock, DMTPST 
inspects the synch lock to determine whether 
DMTHAT has stored the address of a task element 
in that synch lock, implying that the task is 
nondispatchable. If this is the case, DMTPST 
marks the task's task element dispatchable and 
clears the last three bytes of the synch lock to 
zero. 

Tasks may call DMTHAT specifying multiple 
synch locks. Hhen this is the case, each synch 
lock is inspected and, if any synch lock is 
posted, task execution resumes immediately. If 
no synch locks are posted, the task element for 
the calling task is marked nondispatchable, its 
address is stored in each of the synchronization 
locks, and dispatching is resumed for other 
tasks. 

Hhen any synch lock in the list is posted, 
the task element is marked dispatachable . The 
dispatcher clears the low-order three bytes of 
each of the task's synchronization locks 
(pointed to in the task element before task 
execution is resumed) . 

Refer to Diagrams 1-9 and 1-10 in the Method 
of Operation section for details on processing 
by DMTHAT and DMTPST. 



TASK-TO-TASK COMMUNICATIONS 



There are situations when a task requires the 
services of another task in order to complete a 
function. For example, SML may require that AXS 
open a file for input before processing of that 
file can continue. RSCS task communicate with 
each other to request these kinds of services 
using two methods: ALERT task-to-task 
communication and GIVE/TAKE communication. 

Both methods use an element, which is a table 
of information that describes the nature of the 
request. In general, these elements are 
referred to as request elements and ALERT 
elements. 



When the reguested service is complete the REX 
Task signals completion by calling the POST 
routine (DMTPST) , specifying the requesting 
task's associated synchronization lock. The 
POST routine sets the high-order byte of the 
synch lock to nonzero. This is referrred to as 
"posting" that synch lock, and indicates that 
the requested service is complete. 



DISPATCHING IN RSCS 



The supervisor functions return control to the 
tasks by means of the dispatcher (DMTDSP) . The 
dispatcher scans the queue of tasks to be 
executed (TASKE in SVECTORS) , selects the first 
dispatchable task element (that is, one that is 
not marked nondispatchable by DMTHAT) , moves 
this task element to the end of the task queue, 
and restarts its execution. If no task element 



ALERT TASK-TO-TASK COMMUNICATION 



The ALERT method of task-to-task communication 
allows a task to interrupt another task to 
request an immediate service. The type of 
request is described by an ALERT element, the 
address of which is specified by the requesting 
task in a call to DMTASY. 

The supervisor responds by giving control to 
the asynchronous exit routine defined by the 
request task and by passing to that task the 
address of the ALERT element that describes the 
requested service. 

The requested task's (i.e., the task 
receiving the request) asynchronous exit routine 
responds immediately and may copy the ALERT 
element into its own storage for further 
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processing. The receiving task's asynchronous 
exit routine then returns control to the 
supervisorr which allows the dispatched task to 
resume execution. 

The ALERT routine (DHTSIG) also notifies 
another task that an asynchronous event has 
taken place. In this case, DHTSIG is not used 
with an ALERT reguest eleoent. 



GIVE/TAKE TASK-TO-TASK COMBONICATION 



Nhile the ALEBT method of task-to-task 
connunication demands immediate response from 
the alerted task, the GIVE/TAKE method provides 
a means for ordered engueueing of reguests for 
services. These reguests are handled when the 
servicing task is free to handle it, rather than 
upon immediate demand. 



IliKiSfl 3 GIVE Reauest 



When the receiving task signals 
process a GIVE reguest, the r 
builds a TAKE table in its own 
TAKE table consists of a field t 
task name of the reguesting 
addresses and the lengths of a 
buffer and a TAKE respo 
Functionally, these buffers compl 
reguest and response buffers and, 
buffers, may be at the same 
storage. 



that it can 
eceiving task 
storage. The 
o receive the 
task and the 

TAKE reguest 
nse buffer, 
ement the GIVE 

like the GIVE 
location in 



Once the TAKE table is built, the receiving 
task specifies the address of the TAKE table in 
a call to DMTAKE. The supervisor then moves the 
GIVE reguest buffer (containing the GIVE reguest 
element) to the receiving task's TAKE reguest 
buffer. 



M^auest and Response Elements 



Generally, reguest and response elements are 
formatted tables of information that reside in 
the storage of both the reguesting task and the 
task providing the service. During task-to-task 
communication, these elements are passed from 
one task to another, containing either reguests 
for services or responses to reguests. 



GIVE Tables 



When a task reguests services of another task 
via GIVE/TAKE, it builds a GIVE table in its 
storage. The GIVE reguest buffer and a GIVE 
response buffer. (The reguest and response 
buffers may be at the same location in 
storage.) 

The GIVE reguest buffer contains a GIVE 
reguest element, which is a table of information 
describing the service being reguested. Once 
the GIVE reguest element is built, the 
reguesting task clears the synch lock in its 
address of the GIVE table to zero (in 
preparation for a call to DMTWAT) and specifies 
the address of the GIVE table in a call to 
DMTGIV. 



Ies£ondina to a GIVE Reguest: DMTAKE Processing 



The receiving task performs the reguested 
service and updates the GIVE reguest element and 
places it in its TAKE response buffer. This 
modified GIVE reguest element contains 
information on results of reguest processing to 
be returned to the reguesting task- 
When all reguest processing is complete, the 
receiving task again calls DMTAKE, specifying 
the address of the TAKE table. The supervisor 
responds by immediately moving the contents of 
the receiving task's TAKE reponse buffer to the 
reguesting task's GIVE response buffer, and 
posting the synch lock in the reguesting task's 
GIVE table. 



l!]il^iEi§ GIVE Reguests for the Same Task 



If another GIVE reguest addressed to the 
receiving task has been engueued, it is given to 
the receiving task as described above, and 
dispatched task execution is resumed. On each 
call to it, DMTAKE first responds to a 
previously accepted GIVE reguest (if one exists) 
and then gives another modified GIVE reguest 
element back to the calling task (if one 
exists) . 



Supervisor Handlina of GIVE Reauests 



The supervisor then engueues a supervisor GIVE 
element containing a pointer to the GIVE table, 
so that the reguest can be forwarded to the 
receiving task when that task is ready to accept 
the reguest. 



*liilsa Jo£ l^auest completion 



The reguesting task waits for reguest completion 
by specifying the address of the synch lock in 
its GIVE table in a call to the WAIT routine 
(DMTWAT) . 

The receiving task waits for reguest 
availability by calling DMTWAT and specifying 
the address of its "task reguest synch lock," 
which is located in its Task Save Area. The 
task reguest synch lock is cleared to zero by 
DMTAKE when no GIVE reguest address to the 
calling task remains engueued. It is posted by 
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DMTGIV when such a request is enqueued as a 
result of DMTGIV processing for another task. 

Figure 36 shows the movement of data during a 
GIVE/T&KE transaction. 



data area. Figure 37 shows the relationships 
between these various data areas. 
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Figure 36. Movement of Data During a Typical 
GIVE/TAKE Transaction 



The supervisor I/O queues (MPXIOQ and SELIOQ) 
include an active queue and a number of inactive 
or "pending" subgueues. Each element in the 
active I/O queue represents an I/O operation 
which is active on a particular nonshared I/O 
subchannel. The active I/O queue is ordered 
according to ascending numerical I/O subchannel 
address. 

When an I/O operation is requested on an idle 
I/O subchannel, an I/O element representing the 
request is built and enqueued on the active I/O 
queue in its I/O subchannel's numerical address 
position. The I/O operation is then started. 

Uhen an I/O operation is requested on an I/O 
subchannel for which an I/O element is enqueued 
on the active I/O queue, the nonshared 
subchannel is busy and, therefore cannot be 
started immediately. In this case, an I/O 
element representing the request is built and 
enqueued on the subchannel's inactive I/O 
subqueue. The head of this subqueue is 



contained in the active 
the active I/O queue. 



I/O element enqueued on 



When the nonshared subchannel's active I/O 
completes and the subchannel becomes available, 
the first element on the inactive I/O subqueue 
is enqueued on the active I/O queue and its I/O 
operation is started. 



HANDLING LINK ACTIVITY: LINKTABLS AND TAGS 



INPOT/OUTPOT METHODS AND TECHNIQUES 



Two data structures are created when RSCS 
performs an I/O operation: an I/O element and an 
I/O table. 

The I/O table (defined by DSECT lOTABLE) is 
built by the requesting task and describes 
specific information required to perform the 
requested I/O operation. 

The I/O element (defined by DSECT lOE) is 
built by the I/O request manager (DMTIOM) and 
consists of items of system information 
describing a request for an I/O operation. 

I/O elements are placed on queues pointed to 
in SVECTOBS: MPXIOQ (for multiplexer I/O 
requests) and SELIOQ (for Selector I/O 
requests) . The elements in these two queues are 
in ascending subchannel order. Queue elements 
may also contain pointers to subgueues, which 
represent requests for use of the same nonshared 
subchannel. Each I/O element points to an I/O 
table. 

Also, there is a queue of I/O asynchronous 
exit request elements pointed to in the SVECTOBS 



When the RSCS system is generated, a number of 
TAG slots are generated and enqueued on the free 
TAG queue. TAG slots are storage areas defined 
by the TAG DSECT; TAG slots describe the files 
being transmitted via BSCS; the free TAG queue 
comprises those TAG slots available for a given 
BSCS system. 



The Free TAG Queue is defined in the DSECT 
TAGABEA, which also defines the status of TAG 
slots in the BSCS system. TAGABEA is pointed to 
by TTAGQ in SVECTOBS. 



HOH LINKS HANDLE FILES 



Each link in BSCS is defined by a LINKTABL 
DSECT. The LPOINTEB field of the LINKTABL DSECT 
points to the link's inactive TAG queue. This 
queue comprises those TAGs describing files that 
BSCS has not yet transmitted. Only one TAG per 
link can be active at a time. 

The queue of LINKTABLs (called the link 
table) is pointed to by the TLINKS field in 
SVECTOBS. 
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SVECTORS 



ACTIVE 
lOE 



ACTIVE 
lOE 




Figure 37. I/O Queues and Subgueues 



TRAHSHITTIHG VM/370 FILES TO AH BSCS LIHK 



ihen a VH/370 file is spooled to RSCS for a 
specific link, RSCS accepts the file and: 

• Obtains a free TAG slot for the file. 

• Builds a description of the file in the TAG 
slot. 

• Engueues the new TAG on the link's inactive 
TAG gueue. 



When transaission to the reaote station begins, 
the file's TAG is degueued from the inactive TAG 
gueue and engueued on the active input file 
gueue (TAGACIM in TAGAREA) . When transoission 
of the file is complete, the TAG is degueued 



from the active input gueue and 
returned to the Free TAG Queue. 



its slot is 



PROCESSING FILES FROM REMOTE STATIONS 



As in the case of VM/370 spool files, when files 
are received from remote stations, RSCS obtains 
a TAG slot and builds a description of the file 
in that slot. However, files from remote 
stations are engueued on the active output gueue 
(TAGACOUT in TAGAREA) . 

Uhen the file is completely transmitted, its 
TAG is degueued from the active output gueue, 
closed to the VM/370 spool system, and its freed 
slot returned to the free TAG gueue. 

Figure 38 shows the relationships between the 
DSECTs described above. 
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LINKTABL 



TAG 



TAG 



TAG 



Link's Inactive TAG Queue 

These are TAG's representing 
files waiting for transmission; 
that is,waitlng to be enqueued 
on the Active Input TAG Queue 
described below. 




Free TAG Queue 
All TAG "slots" which are 
not in use to describe a file 
are enqueued on the free 
TAG queue. 

Active In put TAG Queue 
There may be only one active 
input file for any given link on 
this queue. Each file which is 
being read from the VM/370 spool 
system and transmitted to a 
remote station is represented by 
a TAG on this queue. 



Active Output TAG Queue 
Each file which is being written 
to the VIVl/370 spool system is 
represented by a TAG on this 
queue. 



Figure 38. Chaining of Data Areas Begaired for File TAG Manipulation 
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^ECTIfiN 2' METHOD OP OPERiTIOH AND PBOGS^M ORGINIZITIOH 



Section 2 describes the prograa organization for 
CHS, CF, and BSCS. 



of CHS. Each block is naabered and corresponds 
to a lore detailed outline of the function found 
in Figure 40. 



CHS PBOGBAH OBGiNIZATIOM 



The CHS description is in two parts. The first 
part contains figures showing the functional 
organization of CHS. The second part contains 
general infornation about internal structure of 
CHS prograns and their interaction with one 
another. 

CHS progran organization is in two figures. 
Figure 39 is an overview of the functional areas 



Figure UO shows how CHS routines relate to 
these functional areas. The numbers on top of 
each detailed figure correspond to the numbers 
on Figure 39. 



In most cases, the detailed figures contain 
three levels of information: the functional 
topic, a breakdown of logical areas within that 
topic, and the CHS routines that perform those 
logical functions. 
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Figure 39. An Overview of the Functional Areas of CHS 
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Figure 40. Details of CMS System Functions and the Routines That Perform Them (Part 4 of 4) 
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INTRODUCTION TO CMS 



This introduction contains brief descriptions of 
the concepts on which CMS operates, for example, 
how the CMS file system is organized. This 
introduction also contains descriptions of logic 
flow for significant routines, for example, the 
logic executed when the CMS command handler, 
DMSITS, is invoked. 

The following CHS information is organized 
into topics that correspond to the functional 
areas described in the previous charts. 



INITIALIZE THE CMS VIRTUAL MACHINE ENVIRONMENT 



There are four steps involved in initializing a 
CHS virtual machine: 



Once written on the DASD, a copy of the 
nucleus is read into virtual machine storage. 
One track at a time is read from the 
disk-resident nucleus into virtual storage. 
DMSINS is then invoked to initialize storage 
constants and to set up the disks and storage 
space reguired by this virtual machine. 

DMSINS performs three general functions; 

• Initializes storage constants and system 
tables. 

• Processes IPL command line parameters (SEG= 
and BATCH) . 

• Initializes for OS SVC processing, in the 
case where a saved segment is not available 
for use in processing OS simulation 
requests. 



processing the IPL command for a virtual card 
reader. 

Processing the IPL command for a disk device 
or a named or saved system. 

Processing the first command line entered at 
the CMS virtual console. 



I°iiisii25s Storage Contents and System Tables 



DMSINS 

Saves the address of this virtual machine in 
HUCON. 



Setting up the options for the 
machine operating environment. 



virtual 



DMSINI and DHSINS are the two routines that 
are mainly responsible for the one-time 
initialization process in which the virtual card 
reader is initial program loaded. DHSINI also 
handles the IPL process when a named or saved 
system is loaded. The CHS command interpreter, 
EMSINT, processes the first line entered from 
the console as a special case; the processing 
performed by this code is a part of the 
initialization process. DMSSET sets up the 
user-specified virtual machine environment 
features; DHSQRY allows the user to query the 
status of these settings. 



DHSLAD 

Locates and returns the address of the ADT 
for this virtual machine., 

DMSFRE 

Allocates free storage to be used during 
initialization. 

DMSFHJ 

Allocates all low free storage so that the 
system status table (SSTAT) will be built in 
high free storage. 

DMSACM 

Reads the S-disk ADT entry and builds the 
SSTAT. 



INITIALIZATION: LOADING A 
FROM CARD READER 



CHS VIRTUAL MACHINE 



DMSFRE 

Releases the low free storage allocated above 
(to force SSTAT into high storage) so that it 
can be used again. 



Hhen a virtual card reader is specified by the 
IPL command, for example OOC, initialization 
processing begins. Initialization refers to the 
process of loading from a card reader as opposed 
to reading a nucleus from a cylinder of a CMS 
minidisk or reading a named or shared system 
(description follows) . 

IPL OOC invokes the CMS module DMSINI, which 
requests that the operator enter information 
such as the address of the DASD where the 
nucleus is to be written, the cylinder address 
where the write operation is to begin, and which 
version of CHS is to be written (if there is 
more than one to choose from) . 

When all questions are answered, the 
requested nucleus is written to the DASD. 
Figure H^ shows the structure of the CHS 
nucleus. 



DHSINS 

Stores the address of SSTAT into ASSTAT and 
ADTFDA in NOCON. 

DHSALU 

Sorts the entries in the SSTAT. 



Processes IPL Command Line Parameters 



DHSINS 

Checks for parameters BATCH and SEG=. If 
BATCH is specified, DMSINS sets the flag 
BATFLAGS. If SEG= is specified, DMSINS loops 
through again to read the segment name. At 
this point, all the parameters on the command 
line have been scanned. 
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END OF STORAGE 



VIRTUAL 
STORAGE 



FREEUPPR 



FREELOWE- 



System Loader Table (Size determined 
by SET LDRTBLS command) storage Key = X'F' 



DMSFREE requests when 
no more low storage available 



X 



|__K( 



Storage 
Key = X'F' 



MAINHIGH 



MAINSTRT- 



X '20000' 



Unused portion of User 
Program Area 



*^ 



Storage Key = X'E' 



GETMAIN requests 




The User's Program 

(program is loaded via the 

LOAD command) 



Storage Key = X'E' 



X'10000- 



X'EOOO' - 



X'3000' 



X'O' 



CMS Nucleus 

In "saved systems" this area 
is a protected segment 
(that is, all code must be 
reentrant and cannot be 
modified) 

Storage Key = X'F' 



Transient Program Area 

Storage Key = X'E' 



Low Storage DMSFREE Free Storage Area 
DMSFREE requests are filled from 
this area. The upper part of this 
area contains the System Disk MFD 
followed by the FREETAB, if there is 
enough room. 

Storage Key = X'E' or X'F' 



DMSNUC 

System Control Blocks, flags, constants, 
and pointers. 

Storage Key = X'F' 



"The half-page containing OPSECT and TSOBLOKS 
has a storage key = X'E' 




CONTROL BLOCKS 
■IN FREE STORAGE- 



DECB 



LDRST 



CMSSAVE 



User 
V Program 
Area 




DMSNUC 
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SUBSECT 
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OPSECT 
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CVTSECT 
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SVCSECT 



PGMSECT 



lOSECT 
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AFTSECT 



ADTSECT 



DEVTAB 



Terminal Buffer and Saveareas 



SYSREF 



MACDIRCandTXTDIRC 



NUCON 



X'3000' 

X'2AD8' 

X'2A40' 

X'29B0' 

X'2800' 

X'aSBC 

X'2300' 
X'2190' 
X'TDDC 

X'ICCB' 

X'lADS' 
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Figure 41. CMS Storage Map 
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If SEG= is specified, the DIAGNOSE 6U 
FINDSTS function is issued to determine 
whether the segment specified on the command 
line exists. If it does, the DCSSAVAL flag 
is temporarily set. 



DMSINS 

Issues DIAGNCSE 24 to 
of the console. 



obtain the device type 



DMSCWH 

Writes the system id message to the console. 

DHSCRD 

Beads the IPL command line from the console. 

DHSSCN 

Puts 3 the IPL command line in PLIST format. 

DMSINS 

If the FISDSYS DIAGNOSE validated the segment 
name specified on the IPL command line, 
DMSINS issues a DIAGNOSE 64 SAVESYS function 
for that segment. 

DMSINS 

Clears DCSSAVAL and ensures that all the 
parameters on the command line are valid; 
branches back to label INITLOOP to reprocess 
for the segment just saved. 

DMSINS 

If BATCH is specified, sets BATFLAGS and 
BATILAG2 in NUCON. Saves the name of the 
BATCH saved system in SYSNAME in NUCON. 



DMSACC 

Issues ACCESS 195 A to 
virtual machine A-disk. 



access the batch 



DMSINS 

Issues DIAGNCSE 60 to get the size of the 

virtual machine; sets up enough storage. for 
this virtual machine. 



DMSSTT 

Finds and returns the 
CMS OS SVC-handler. 



address of DMSSVT, the 



DHSFRE 

Acquires 
DMSSVT. 



enough free storage to contain 



DMSLOA 

"Loads DMSSVT. 

DMSINS 

Sets the flag DCSSVTLD. 

DMSINS 

If the BATCH virtual machine is not being 
IPLed, determines whether there is a PROFILE 
EXEC or a first command line to be handled. 
If so, issues SVC 202' s to process these 
commands and passes control to DMSINT, the 
CMS console manager. 

DMSACC 

If the BATCH virtual machine is being initial 
program loaded, accesses the D-disk and 
passes control to DMSINT, the console 
manager. 



INITIALIZING A NAMED OR SAVED SYSTEM 



A named system is a copy of the nucleus that has 
been saved and named with the CP SAVESYS 
command. It is faster to IPL a named system 
than to IPL by disk address because CP maintains 
the named system in page format instead of CMS 
disk format. That is, the saved system is on 
disk in a096-byte blocks instead of 800-byte 
blocks. The initialization of a saved system is 
also faster because the SSTAT is already built. 



DMSINS 

If the DCSSAVAL flag is set, sees if the size 
of the CMSSEG segment overlaps the size of 
the virtual machine. If this is the case, 
DMSINS sets the flag DCSSOVLP and continues 
the initialization procedure for a CMS 
virtual machine running without the use of 
the CMSSEG segment, that is, performs 
time-of-day processing and OS 
initialization. 



The shared system is a variant of the saved 
system. In the shared system, reentrant 
portions of the nucleus are placed in storage 
pages that are available to all users of the 
shared system. Each user has his own copy of 
nonreentrant portions of the nucleus. The 
shared pages are protected by CP, and may not be 
altered by any virtual machine. 



If the CMSSEG segment can be used, DMSINS 
issues the DIAGNOSE 64 LOADSYS function as 
the final check to see if the segment is 
usable. If the segment is loaded 
successfully, it can be used whenever one of 
the functions contained in it is requested. 
Because it is not required immediately, 
DMSINS issues the DIAGNOSE 64 PURGESYS 
function to purge the segment. 

If the segment cannot be successfully 
loaded, DMSINS turns off the DCSSAVAL flag. 



ISi£i§iize OS SVC- Handling Without tjie Use of 
the CMSSEG Segment ~ 



DMSINS 

Checks for the availability of CMSSEG. 



During DMSINI processing,, the virtual machine 
operator is asked if the nucleus must be written 
(via message DMSINI607H) . If the operator 
answers no, control passes directly to DMSINS to 
initialize the named or saved system specified 
by the operator in his answer to message 
DMSIHI606R. 



HANDLE THE FIRST COMMAND LINE PASSED TO CHS 



DMSINT, the CMS console manager, contains the 
code to handle commands stacked by module DMSINS 
during initialization processing. DMSINT checks 
for the presence of a stacked command line, and 
if there is one to process, processes it just as 
it would a command entered during a terminal 
session. That is, DMSINT calls the WAITREAD 
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subroutine and issues an SVC 202 to execute the 
command. When first command processing 
completes, DMSINT receives control to handle 
commands entered at the console for the duration 
of the session. 



SETTING AND QUEEYISG VIRTUAL MACHINE ENVIRONMENT 
OPTIONS 



whether the segment overlays virtual machine 
storage. 

DMSSET 

If the segment can be used (i.e. does not 
overlay the virtual machine storage) the 
DIAGNOSE 6H LOADSYS function is performed. 
If the LOADSYS executes successfully, control 
passes to DMSINT, where the segment is purged 
(because it is only needed on demand) . 



DMSSET sets up the virtual machine environment 
options, as outlined in the publication VM^SJO: 
CMS Command and Macro Reference. DMSQRY 
displays these settings at the user console. 
Both of these modules are structured and 
relatively easy to follow, except for some 
sections of DMSSET. 



DMSSET: SET DOS ON (VSAM) Processing 



PROCESS AND EXECUTE CMS FILES 



As shown in Part 1 of Figure 40, the five 
general topics form the category "Process and 
Execute CMS Files." Two of these topics are 
discussed in this section: "Maintaining an 
Interactive Console Environment" and "Loading 
and Executing TEXT files." 



MAINTAINING AN INTERACTIVE CONSOLE ENVIRONMENT 



DMSSET 

(label DOS) If a disk mode is specified on 
the command line, ensure that it is valid. 

DMSLAD 

If the disk mode specified is valid, locates 
and returns the address of the disk. 

DMSSET 

Issues DIAGNOSE 64 FINDSYS to locate the 
CMSDOS segment. If the segment is not 
already loaded, issues DIAGNOSE 64 LOADSYS to 
load it. 

DMSSET 

Sets up the $$B-transient area for use by DOS 
routines. 

DMSSET 

If SET DOS OFF has been specified, issues the 
DIAGNOSE 6a PURGESYS function for the CMSDOS 
segment and, if VSAM has been loaded, for the 
CMSVSAH segment. 



Two levels of information are discussed in the 
following section. The first level is a general 
discussion of how CMS maintains an interactive 
console environment. The second level is a more 
detailed discussion of the methods of operation 
mainly responsible for this function. 



CONSOLE MANAGEMENT AND COMMAND HANDLING IN CMS 



There are two major functions concerned with 
maintaining an interactive terminal environment 
for CMS: console management and command 
processing. The CHS module that manages the 
virtual machine console is DMSINT. The module 
responsible for command processing is DMSITS. 
Many CMS modules are called in support of these 
two functions but the modules in the following 
list are primarily responsible for supporting 
the functions: 



DMSCRD 

Reads a line from the console. 



DMSSET: SET SYS NAME Processina 



DMSCHR 

Writes a line to the console. 



DMSSET 

Determines whether the name 
segment is being changed. 



of the CMSSEG 



DMSSET 

Determines whether NONSHARE is specified. If 
so, the segment may be loaded and kept. If 
NONSHARE is not specified, the segment is 
purged, because it is needed only on demand. 

DMSSET 

Once a new name is placed in the SYSNAHES 
table replacing CMSSEG, the DIAGNOSE 64 
FINDSYS function is issued to determine 
whether the new name has been entered 
correctly. If the FINDSYS is successful, the 
size of the virtual machine is com]^ared to 
beginning address of the segment to determine 



DMSSCN 

Converts a command line to PLIST format. 

DMSINA 

Converts abbreviated commands to their full 
names. 

JDMSCPF 

Passes a command line to CP for execution. 



MAINTAINING 
SESSION 



AN INTERACTIVE COMMAND/RESPONSE 



Three main lines of control maintain the 
continuity for an interactive CMS session: (1) 
handling of commands passed to DMSINT by the 
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initialization Module, DHSINS (2) handling of 
commands entered at the console during a 
session, and (3) handling of commands entered as 
subset commands. The following lists show the 
main logic paths for first two functions. 



DMSSCM 

Converts the command 
(subroutine waitread) . 



line to PLIST format 



DHSINT 

Determines whether the command line is a null 
line or a comment. 



Execute Commands Passed via DHSIMS 



EBSINT 

On entry from DMSINA, processes any commands 
passed via the console read put on the user's 
console by that routine; that is processes 
any commands the user stacks on the line as 
the first read that DHSINT processes. In 
handling the first read, if that read is 
null, control passes to the main loop of the 
program, which is described in the following 
section. 

EMSINM 

Get the current time. 



DMSCRD 

Branch to the waitread subroutine to 
command line at the console. 



read a 



DMSSCH 

Waitread then calls DBSSCN to convert the 
line just read into plist format. Once 
converted to plist format, an SVC 202 is 
issued (at label INIT1A) to execute the 
function. This cycle is repeated until all 
stacked commands are executed. 



DMSLFS 

If the command line is neither a command line 
nor a comment, determines whether the command 
is an EXEC file. 

fiMSINA (ABBREV) 

Determines whether the command is an 
abbreviation and, if it is, returns its full 
name. 

DMSITS 

Passes the command line to DMSITS via an SVC 
202. DMSITS is the CMS SVC handler. For a 
detailed description of the SVC handler, see 
"Method of Operation for DMSITS." 

DMSCPF 

If the command could not be executed by the 
SVC handler, passes the command to CP to see 
if CP can execute it. 

DMSFNS 

On return from processing the command line 
(label UPDAT) , closes any files that may have 
been opened during processing. 

DMSSMN 

Resets any flags or fields that may have been 
set during OS processing. 



DMSFHS 

When command execution completes, calls 
DMSFUS (at label UPDAT) to close any files 
that may have remained open during the 
command processing. 

DHSVSR 

Ensures that any fields set by VSAM 
processing are reset for CMS. Also ensures 
that the VSAM discontiguous shared segment is 
purged. 



DMSINT 

Sets up an appropriate status 
CMS SUBSET, CMS/DOS, etc.) . 



message (CMS, 



EMSCWR 

Writes the status message to the console. 



DMSVSR 

Ensures that any fields set for VSAM 
processing are reset for CMS. Also ensures 
that the VSAM discontiguous shared segment is 
purged. 

DMSINT 

When the command line has been successfully 
executed, builds a CHS ready message for the 
user (label PRNREADY) . 

DMSCWR 

Writes the ready message to the console. 

DMSINT 

Returns control to DMSINT at label INL00P2 to 
continue monitoring the CMS terminal 
session. 



Handle Commands Entered During a CMS Terminal 
Session 



DMSINT 

Branches (from label INL0CP2) to the waitread 
subroutine to read a line entered at the 
console. 



DMSCRD 

Reads a line entered 
(subroutine waitread) . 



at the 



console 



METHOD OF OPERATION FOR DMSINT 



DMSINT, the console manager, m 
continuity of operation of the 
environment. The main control loop 
initiated by a call to DMSCRD to 
command. When the command is ent 
calls DMSINM to initialize the CPU 
new command and then puts it 
parameter list form by calling the 
program DMSSCN. After calling DM 
checks to see if an EXEC filetype 
filename of the typed-in command, 
if ABC was typed in, it checks t 
EXEC exists.) If the EXEC file 
DMSINT adjusts register 1 to point 



aintains the 

CMS command 

of DHSINT is 

get the next 

ered, DHSINT 

time for the 

in standard 

scan function 

SSCN, DHSINT 

exists with a 

(For example, 

o see if ABC 

does exist, 

to the same 
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command as set up by DMSSCN, but preceded by 
CLS'EXEC, and then issues an SVC 202 to call 
the corresponding EXEC procedure ("ABC EXEC in 
the example) . 



If no such EXEC f 
word typed in, DMSIN 
using the CMS abb 
DMSINA. If, for exam 
in had been • E' , DMS 
EMSINA routine. If a 
•E», DMSINT looks for 
of the equivalent word 
if such a file is foun 
1 as described ab 
substitutes the equiv 
first word typed in. 
abbreviation for 'EDIT 
file called EDIT EXEC 
merely types in 'E' fr 



ile exists for the first 
T makes a further check 
reviation-check routine, 
pie, the first word typed 
INT looks up 'E' via the 
n equivalent is found for 
an EXEC file with the name 

(for example, EDIT EXEC) ; 
d, DMSINT adjusts register 
ove to call EXEC and 
alent word, EDIT, for the 

Thus, if 'E' is a valid 
• and the user has an EXEC 
, he invokes this when he 
om the terminal. 



If no EXEC file is found either for the 
entered command name or for any equivalent found 
by DMSINA, DMSINT leaves the terminal command as 
processed by DMSSCN and then issues an SVC 202 
to pass control to DMSITS which, in turn, passes 
control to the appropriate command program, 
when the command terminates execution, or if 
DMSITS cannot execute it, the return code is 
passed in register 15. 



A return code indicates 
completion of the command. 



successful 



A positive return code indicates that the 
command was completed, but with an apparent 
error; and a negative code returned by DMSITS 
indicates that the typed in command could not be 
found or executed at all. 

In the last case, DMSINT assumes that the 
command is a CP command and Issues a DIAGNOSE 
instruction to pass the command line to the CP 
environment. If the command is not a CP 
command, DMSINT calls DMSCWR to type a message 
indicating that the command is unknown and the 
main control loop of DMSINT is entered at the 
beginning. 

If the return code from DMSITS is positive or 
zero, DMSINT saves the return code briefly and 
calls module DHSAUD to update the Master File 
Directory (MFD) on the user's appropriate user's 
disk. DMSINT also frees the TXTLIB chain and 
releases pages of storage if required. 

After updating the master file directory, 
DMSINT checks the return code that was passed 
hack. If the code is zero, DMSINT types a ready 
message and the CPU time used by the given 
command. Control is passed to the beginning of 
the main control loop of DMSINT. If the return 
code is positive, an error message is typed, 
along with the CPU tine used. The command 
caused the typing of an error message of the 
format: DMSxxxnnnt 'text' where DMSxxx is the 
module name, nnn is the message identification 
number, t is the message type, and 'text' is the 
message explaining the error. Control is then 
passed to the beginning of the main control 
loop. 



METHOD OF OPERATION FOR DMSITS 



DMSITS (INTSVC) is the CMS system SVC handling 
routine. Since CMS is SVC driven, the SVC 
interruption processor is more complex than the 
other interruption processors. 



The general operation of DMSITS is as follows: 

1 . The SVC new PSH (low-storage location 
X'60') contains, in the address field, the 
address of DMSITS 1. Thus, the DMSITS 
routine is entered whenever a supervisor 
call is executed. 

2. DMSITS allocates a system and user save 
area, as described below. The user save 
area is a register save area used by the 
routine, which is invoked later as a result 
of the SVC call. 

3. The called routine is invoked. 

H, Upon return from the called routine, the 
save areas are deallocated. 

5. Control is returned to the caller (the 
routine which originally made the SVC 
call) . 



The following expands upon various features 
of the general operation that has just been 
described. 



IIE^s of SVCs and linkaae Conventions 



The types of SVC calls recognized by DMSITS, and 
the linkage conventions for each are as follows: 



SVC 20J: When a called routine returns control 
to DMSITS, the user storage key may be in the 
PSH. Because the called routine may also have 
turned on the problem bit in the PSH, the most 
convenient way for DMSITS to restore the system 
PSW is to cause another interruption, rather 
than to attempt the privileged Load PSW 
instruction. DMSITS does this by issuing SVC 
201, which causes a recursive entry into DMSITS. 
DMSITS determines if the interruption was caused 
by SVC 201, and if so, determines if the SVC 201 
was from within DMSITS. If both conditions are 
met, control returns to the instruction 
following the SVC 201 with a PSH that has the 
problem bit off and the system key restored. 



SVC 202: SVC 202 is the most commonly used SVC 
in the CMS system. It is used for calling 
nucleus resident routines and for calling 
routines written as commands. 

A typical coding sequence for an SVC 202 call 
is the following: 

LA R1,PLIST 

SVC 202 

DC AL4 (ERRADD) 
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Whenever SVC 202 is called, register 1 must 
point to a parameter list (PLIST) . The format 
of this parameter list depends upon the actual 
routine or command being called, but the SVC 
handler examines the first 8 bytes of the list 
to find the name of the routine or command being 
called. It searches for the routine or module 
as described for SVC 201. 

The DC AL4 (address) following the SVC 202 is 
optional, and may be omitted if the programmer 
does not expect any errors to occur in the 
routine or command being called. DHSITS can 
determine whether this DC was inserted by 
examining the byte following the SVC call. If 
it is nonzero, then it is an instruction; if it 
is zero, then it is a "DC am (address) ". 

SVC 203: SVC 203 is used by CHS macros to 
perform various internal system functions. SVC 
203 is an SVC call for which no parameter list 
is provided. An example is DHSFREE, for which 
the parameters are passed in registers and 1. 

A typical seguence for an SVC 203 call 
follows: 



SVC 
DC 



203 
H'code" 



The halfword decimal code following the SVC 
203 indicates the specific routine being 
called. DMSITS examines this halfword code as 
follows: (1) the absolute value of the code is 
taken, using an LPB instruction, (2) the first 
byte of the result is ignored, and the second 
byte of the resulting halfword is an index into 
a branch table, (3) the address of the correct 
routine is loaded, and control is transferred 
there, as the called routine. 

It is possible for the address in the SVC 203 
index table to be zero. In this case, the index 
entry contains an 8-byte routine or command 
name, which is processed in the same way as the 
8-byte name passed in the parameter list passed 
to SVC 202. 



DSER-HAHDLED SVCs: The programmer may use the 
HNDSVC~iacro to~specify the address of a routine 
that processes any SVC call for SVC numbers 
through 200 and 206 through 255. 

If the HNDSVC macro is used, the linkage 
conventions are as reguired by the user 
specified SVC-handling routine. 

There is no way to specify a normal or error 
return from a user-handled SVC routine. 

OS MACRO SIMOLATION SVC CALLS: CMS supports 
certain of the SVC calls generated by OS macros, 
by simulating the effect of these macro calls. 

The proper linkages are set up by the OS 
macro generations. DMSITS does not recognize 
any way to specify a normal or error return from 
an OS macro simulation SVC call. 

DOS SVC CALLS: All SVC functions supported for 
CMS/DOS are" handled by the CMS module DMSDOS. 
DMSDOS receives control from DMSITS (the CMS SVC 
handler) when that routine intercepts a DOS SVC 
code and finds that the DOSSVC flag in DOSFLAGS 
is set in NDCON. 

DMSDOS acguires the specified SVC code from 
the OLDPSW field of the current SVC save area. 
Dsing this code, DMSDOS computes the address of 
the routine where the SVC is to be handled. 

Many CMS/DOS routines (including DMSDOS) are 
contained in a discontiguous shared segment 
(DCSS) . Most SVC codes are executed within 
DMSDOS, but some are in separate modules 
external to DMSDOS. If the SVC code reguested 
is external to DMSDOS, its address is computed 
using a table called DCSSTAB; if the code 
reguested is executed within DMSDOS, the table 
SVCTAB is used to compute the address of the 
code to handle the SVC. 

DOS SVC calls are discussed in more detail in 
"Simulating a DOS Environment Under CMS" in this 
section. 



The sign of the halfword code indicates 
whether the programmer expects an error return; 
if so, the code is negative: if not, the code is 
positive. Note that the sign of the halfword 
code has no effect on determining the routine 
which is to be called, because DMSITS takes the 
absolute value of the code to determine the 
called routine. 

Because only the second byte of the absolute 
value of the code is examined by DMSITS, seven 
bits (bits 1-7) are available as flags or for 
other uses. For example, DHSFREE uses these 
seven bits to indicate such things as 
conditional requests and variable requests. 
Therefore, DHSITS considers the codes H'3' and 
B*259* to be identical, and handles them the 
same as H»-3« and B'-259', except for error 
returns. 

When an SVC 203 is invoked, DMSITS stores the 
halfword code into the MUCOH location CODE203, 
so that the called routine can interrogate the 
seven bits made available to it. 



IM VALID SVC CALLS: There are several types of 
invalid SVC calls recognized by DMSITS. These 
are: 

• Invalid SVC number. If the SVC number does 
not fit into any of the classes described 
above, it is not handled by DMSITS. An error 
message is displayed at the terminal, and 
control is returned directly to the caller. 

• Invalid routine name in SVC 202 parameter 
list. If the routine named in the SVC 202 
parameter list is invalid or cannot be found, 
then DHSITS handles the situation in the same 
way it handles an error return from a 
legitimate SVC routine. The error code is 
-3. 

• Invalid SVC 203 code. If an illegal code 
follows SVC 2 03, an error message is 
displayed, and the ABEND routine is called to 
terminate execution. 

Search Hierarchy for SVC 202 

When a program issues SVC 202, and passes a 
routine or command name in the parameter list. 
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DMSITS must search for the specified routine or 
comniand. (In the case of SVC 203 with a zero in 
the table entry for the specified index, the 
same logic must be applied.) 

The search order is as follows: 

1. A check is made to see if there is a 
routine with the specified name currently 
in the system transient area. If so, then 
control is transferred there. 

2. The system function name table is searched 
to see if a command by this name is nucleus 
resident. If successful, control goes to 
the specified nucleus routine. 

3. A search is made for a disk file with the 
specified name as the filename, and module 
as the filetype. The search is made in the 
standard disk search order. If this search 
is successful, then the specified module is 
loaded by LOADMOD and control passes to the 
storage location now occupied by the 
command. 

4. If all searches so far have failed, then 
DMSINA (ABBREV) is called to see if the 
specified routine name is a valid system 
abbreviation for a system command or 
function. User-defined abbreviations and 
synonyms are checked at the same time. If 
this search is successful, then steps 2 
through H are repeated with the full 
nonabbreviated name. 

5. If all searches fail, then an error code of 
-3 is forced. 



jy§§I §U^ Transient Program Areas 



There are two areas which can hold program 
modules which are loaded by LOADMOD from the 
disk. These are called the user program area 
and the transient program area. 



The user program area 
X»20000« and extends up 
tables. However, the hig 
area can be allocated 
EMSFREE. Generally, all 
certain system commands, 
COPYFILE, execute in the 
Because only one program c 
user program area at one 
overlay structure, it is 
program in the user progr 
means of SVC 202, a m 
intended to execute the us 



starts at location 

ward to the loader 

h-address end of that 

as free storage by 

user programs and 

such as EDIT and 

user program area, 
an be executing in the 
time, unless it is an 

impossible for one 
am area to invoke, by 
odule which is also 
er program area. 



macro simulation SVC handling routine, it calls 
LOADMOD to load the file DMSSVT module into the 
transient area, and lets that routine handle the 
SVC. 



A program in the transie 
not invoke another program 
in the transient program 
macro simulation SVC calls 
DMSSVT. Thus, for example, 
transient program area may n 
command. In addition, it ma 
macro HTO, which generates 
handled by DMSSVT. 



nt program area may 
intended to execute 
area, including OS 
that are handled by 
a program in the 
ot invoke the REHAME 
y not invoke the OS 
an SVC 35, which is 



There is one further functional difference 
between the use of the two program areas. 
DMSITS starts a program in the user program 
area so that it is enabled for all 
interruptions. It starts a program in the 
transient program area so that it is disabled 
for all interruptions. Thus, the individual 
program may have to use the SSM (Set System 
Mask) instruction to change the current status 
of its system mask. 



Called Routine Start-U£ Table 



Figures U2 and 43 show how the PSW and registers 
are set up when the called routine is entered. 



I Called Type 



I SVC 202 or 203 
I — Nuc resident 

I SVC 202 or 203 
I — Transient 
I area MODULE 

I SVC 202 or 203 

I - User Area 

I 



I User— handled 



|0S - Nuc res 

I 

|0S - in DMSSVT 



System 
Mask 



Disabled 
Disabled 

Enabled 



Enabled 



Disabled 
Disabled 



Storage 
Key 



System 
User 

User 




Problem 
Bit 



Off 
Off 

Off 



Figure 42. 



PSW Fields when Called Routine is 
Started 



Retuilina to The Caller 



The transient program area is two pages, 
running from location X'EOOO' to location 
X' 10000". It provides an area for system 
commands that may also be invoked from the user 
program area by means of an SVC 202 call. For 
example, a program in the user program area may 
invoke the RENAME command, because this command 
is loaded into the transient program area. 

The transient program area also handles 
certain OS macro simulation SVC calls. If 
EHSITS cannot find the address of a supported OS 



When the called routine is finished processing 
it returns control to DMSITS, which then must 
return control to the caller. 

RETURN LOCATION: The return is effected by 
loading the original SVC old PSW (which was 
saved at the time DMSITS was first entered) , 
after possibly modifying the address field. How 
the address field is modified depends upon the 
type of SVC call, and on whether the called 
routine indicated an error return address. 
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Type 

SVC 202 
or 203 



Other 



- 1 

Saae 

as 

caller 



Same 

as 

caller 



2-11 

Unpredict- 
able 
able 



Same 

as 

caller 



12 

Address 
of 
called 
routine 

Address 
of 
called 
routine 



13 

User 
save 
area 



User 
save 
area 



14 

Return 
address 

to 
DMSITS 

Return 
address 

to 
DMSITS 



15 

Address 
of 
called 
routine 

Sane 

as 
caller 



Figure 43. Register Contents when Called Routine is Started 



For SVC 202 and 203, 
indicates a normal return 
returned in register 15, a 
means of a nonzero in 
called routine indicates 
DMSITS makes a normal retu 
the called routine indica 
then DMSITS returns to the 
address, if one was spec 
terminates if none was spe 



the called routine 
by means of a zero 
nd an error return by 
register 15. If the 
a normal return, then 
rn to the caller. If 
tes an error return, 
caller's error return 
ified, and abnormally 
cified. 



For SVC 202 not followed by "DC 
AL4 (address) ", a normal return is made to the 
instruction following the SVC instruction, and 
an error return causes an abnormal termination. 
For SVC 202 followed by "DC ALU (address) " , a 
normal return is made to the instruction 
following the DC, and an error return is made to 
the address specified in the DC. In either 
case, register 15 contains the return code 
passed by the called routine. 

For SVC 203 with a positive halfword code, a 
normal return is made to the instruction 
following the halfword code, and an error return 
causes an abnormally terminates. For SVC 203 
with a negative halfword code, both normal and 
error returns are made to the instruction 
following the halfword code. In any case, 
register 15 contains the return code passed back 
by the called routine. 

For OS macro simulation SVC calls, and for 
user-handled sVC calls, no error return is 
recognized by DMSITS. As a result, DMSITS 
always returns to the caller by loading the SVC 
old PSH that was saved when DMSITS was first 
entered. 

IIGISTER RESTORATION: Upon entry to DMSITS, all 
registers are saved as they were when the SVC 
instruction was first executed. Upon exiting 
from DMSITS, all registers are restored to the 
values that were saved at entry. 

The exception to this is register 15 for SVC 
202 and 203. Upon return to the caller, 
register 15 contains the value that was in 
register 15 when the called routine returned to 
DMSITS after it had completed processing. 



System and User Save Area Formats 



Whenever an SVC call is made, DMSITS allocates 
two save areas for that particular SVC call. 



DMSITS uses the system save area (DSECT 
SSAVE) to save the value of the SVC old PSW at 
the time of the SVC call, the caller's registers 
at the time of the call, and any other necessary 
control information. since sVC calls can be 
nested, there can be several of these save areas 
at one time. The system save area is allocated 
in protected free storage. 

The user save area contains (DSECT EXTUAREA) 
12 doublewords (24 fullwords) , allocated in 
unprotected free storage. DMSITS does not use 
this area at all, but simply passes 
called routine a pointer to this 
register 13. Thus, the called routine 
this area as a temporary work area, 
register save area. There is one user save area 
for each system save area, and the latter 
contains a pointer to the former in the USAVEPTR 
field. 



LOAD AND EXECUTE TEXT FILES 



to 


the 


area 


in 


can 


use 


or as a 



The CMS leader con 
loader (DMSLDR) , 
program (DmslIO) , 
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starts loading at 
(AUSHAREA) specifi 
specified location, 
function, loading r 
location after the 
LOADMOD. 



sists of a nucleus resident 

a file and message handler 

a library search program 

subroutine programs. DMSLDR 

the user first location 

ed in MUCON or at a user 

ihen performing an INCLUDE 

esumes at the next available 

previous LOAD, INCLUDE, or 



The loader reads in the entire user's 
program, which consists of one or more control 
sections, each defined by a type BSD record 
("card"). Each control section contains a type 
1 BSD card for each entry point and may contain 
other control cards. 

Once the user's program is in storage, the 
loader begins to search his files for library 
subprograms called by the program. The loader 
reads the library subprograms into storage, 
relocating and linking them as required. To 
relocate programs, the loader analyzes 
information on the SLC, ICS, ESD, TXT, and REP 
cards. To establish linkages, it operates on 
ESD, and RLD cards. Information for end-of-load 
transfer of control is provided by the END and 
LDT cards, the ENTRY control card, START 
command, or RESET option. 

The leader also analyzes the options 
specified on the LOAD and INCLUDE commands. In 
response to specified options, the loader can: 
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Set the load area to zeros before loading 
(CLEAR option) . 

Load the program at a specified location 
(ORIGIN option). 

Suppress creation of the load-map file on 
disk (NOMAP option) . 

Suppress the printing of invalid card images 
in the load map (NOINV option) . 

Suppress the printing of REP card images in 
the load map (UOREP option). 

Load program into "transient area" (ORIGIH 
TRANS option) . 

Suppress TXTLIB search (NOLIBE option) . 

Suppress text file search (NOAUTO option) . 

Execute the loaded program (START option) . 

Type the load map, if the TYPE option was 
specified. 

Set the program entry point (RESET option) . 



During its operation, the loader uses a 
loader table (REFTBL) , and external symbol 
identification table (ESIDTB) , and a location 
counter (LOCCNT) . The loader table contains the 
names of control sections and entry points, 
their current location, and the relocation 
factor. (The relocation factor is the 
difference between the compiler— assigned address 
of a control section and the address of the 
storage location where it is actually loaded.) 
The ESIDTB contains pointers to the entries in 
REFTBL for the control section currently being 
processed by the loader. The loader uses the 
location counter to determine where the control 
section is to be loaded. Initially, the loader 
obtains from the nucleus constant area the 
address (LOCCNT) of the next location at which 
to start loading. This value is subsequently 
incremented by the length indicated on an BSD 
(typeO) , END, or ICS card, or it may be reset by 
an SLC card. 

The loader contains a distinct routine for 
each type of input card. These routines perform 
calculations using information contained in the 
nucleus constant area, the location counter, the 
ESIDTB, the loader table, and the input cards. 
Other loader routines perform initialization, 
read cards into storage, handle error 
conditions, provide disk and typewritten output, 
search libraries, convert hexadecimal characters 
to binary, process end-of— file conditions, and 
begin execution of programs in core. 

Following are descriptions of the individual 
subprocessors with LDR. 



SLC Card Routine 



Function 

This routine sets the location counter 
(LOCCT) to the address specified on an SLC 



card, or to the address assigned (in the 
REFTBL) to a specified symbolic name. 

Entry 

The routine is entered at the first 
instruction when it receives control from the 
initial and resume loading routine. It is 
entered at 0RG2 whenever a loader routine 
requires the current address of a symbolic 
location specified on an SLC card. 

O£eration 

This routine determines which of the 
following situations exists, and takes the 
indicated action: 

1. The SLC card does not contain an address 
or a symbolic name. The SLC card 
routine branches, via BADCRD in the 
reference table search routine, to the 
disk and type output routine (DMSLIO) , 
which generates an error message. 

2. The SLC card contains an address only. 
The SLC card routine sets the location 
counter (LOCCT) to that address and 
returns to HD, in the initial and resume 
loading routine, to read another card. 

3. The SLC card contains a name only, and 
there is a reference table entry for 
that name. The SLC card routine sets 
LOCCT to the current address of that 
name (at 0RG2) and returns to the 
initial and resume loading routine to 
get another card. 

4. The SLC card contains a name only, and 
there is no reference table entry for 
that name. The SLC card routine 
branches via ERRSLC to the Disk and Type 
Output routine (DMSLIO) , which generates 
an error message for that name. 

5. The SLC card contains both an address 
and a name. If there is a REFTBL entry 
for the name, the sum of the current 
address of the name and the address 
specified on the SLC card is placed in 
LOCCT; control returns to the initial 
and resume loading routine to get 
another card. If there is no REFTBL 
entry for the name, the SLC card routine 
branches via ERRSLC to the Disk and Type 
Output routine, which generates an error 
message for the name. 



ICS Card Routine - C2AE1 



Function 

This routine establishes a reference table 
entry for the control-segment name on the 
ICS card if no entry for that name exists, 
adjusts the location counter to a fullword 
boundary, if necessary, and adds the 
card-specified control-segment length to 
the location counter if necessary. 

Entry; 

This routine has one entry point, named 
C2AE1. The routine is entered from the 
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initial and resuoe loading routine when it 
finds an ICS card. 

O£eration 

1. The routine begins its operation with a 
test of card type. If the card being 
processed is not an ICS card, the 
routine branches to the ESD card 
analysis routine; otherwise, processing 
continues in this routine. 

2. The routine tests for a hexadecimal 
address on the ICS card. If an address 
is present, the routine links to the 
DMSLSBA subroutine to convert the 
address to binary, otherwise the routine 
branches via BADCRD to the disk and type 
output routine (DMSLIO) . 

3. The routine next links to the REFTBL 
search routine, which determines whether 
there is a reference table entry for the 
card-specified control-segment name. If 
such an entry is found, the REFTBL 
search routine branches to the initial 
and resume loading routine; otherwise, 
the REFTBL search routine places the 
control-segment name in the reference 
table, and processing continues. 

4. The routine determines whether the 
card-specified control-segment length is 
zero or greater than zero. If the 
length is zero, the routine places the 
current location counter value in the 
reference table entry as the control 
segment's starting address (0RG2) , and 

initial and resume 

If the length is 

routine sets the 

value at a 

The routine 

then places this adjusted current 

location counter value in the reference 

table entry, adjusts the location 

counter by adding the specified 

control-segment length to it, and 

branches to RD in the initial and resume 

loading routine to get another card. 



JSD Tjfjge Card Routine - C3AA3 



branches to the 
loading routine, 
greater than zero, the 
current location counter 
fullword boundary address. 



control section. To do this, the 
routine links to the REFTBL search 
routine. The ESD type card routine's 
subsequent operation depends on whether 
there already is a REFTBL entry for this 
control section. If there is such an 
entry, processing continues with 
operation 5, below; if there is not, the 
REFTBL search routine places the name of 
this control section in REFTBL, and 
processing continues with operation 3. 

3. The routine obtains the card— specif ied 
control section length and performs 
operation U. 

4. The routine links to location C2AJ1 in 
the ICS card routine and returns to 
C3AD4 to obtain the current storage 
address of the control section from the 
REFTBL entry, inserts the REFTBL entry 
position (N - where this is the Nth 
REFTBL entry) in the card-specified ESID 
table location, and calculates the 
difference between the current 
(relocated) address of the control 

section and its card-specified 
(assembled) address. This difference is 
the relocation factor; it is placed in 
the REFTBL entry for this control 
section. If previous ESD's have been 
waiting for this CSECT, a branch is 
taken to SDDEF, where the waiting 
elements are processed. A flag is set 
in the REFTBL entry to indicate a 
section definition. 



5. 



6. 



7. 



The entry found in the REFTBL is 
examined to determine whether it had 
been defined by a COMMON. If so, it is 
converted from a COMMON to a CSECT and 
performs operation 3. 



If the entry had 
previously by an ESD 
continues at 3 . 



not been defined 
type 0, processing 



If the entry had been defined previously 
as other than COMMON, DMSLIO is called 
via EBRORH to print a warning message, 
"DUPLICATE IDENTIFIER". The entry in 
the ESID table is set negative so that 
the CSECT will be skipped (that is, not 
loaded) by the TXT and RLD processing 
routines. 



Function 

This routine creates loader table and ESID 
table entries for the card— specif ied control 
section. 

Entrjf 

This routine has one entry point, location 
C3AA3. The routine is entered from the ESD 
card analysis routine. 

Operation 

1. If this is the first section definition, 
its ESDID is proved. 

2. This routine first determines whether a 
loader table (REFTBL) entry has already 
been established for the card-specified 



ESD Ty£e J Card Routine - ENIJSD 



Function 

This routine establishes a loader table entry 
for the entry point specified on the ESD 
card, unless such an entry already exists. 



Entry 

This routine is entered from 
analysis routine. 



the ESD card 



Ojgeration 

1. Branches and links to REPADR to find 
loader table entry for first section 
definition of the text deck saved by the 
ESD routine. 
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2. The routine then adds the relocation 
factor and the address of the BSD found 
in operation 1 or the address in LOCCNT 
if an BSD has not yet been encountered. 
The sum is the current storage address 
of the entry point. 

3. The routine links to the REFTBL search 
routine to find whether there is already 
a RBFTBL entry for the card-specified 
entry point name. If such an entry 
exists, the routine performs operation 
4. If there is no entry, the routine 
performs operation 5. 

4. Upon finding a REFTBL entry that has 
been previously defined for the 
card-specified name, the routine then 
compares the REFTBL-specified current 
storage address with the address 
computed in operation 2. If the 
addresses are different, the routine 
branches and links to the EMSLIO routine 
(duplicate symbol warning) ; if the 
addresses are the same, the routine 
branches to location RD in the initial 
and resume loading routine to read 
another card. Otherwise, it is assumed 
that the REFTBL entry was created as a 
result of previously encountered 
external references to the entry. The 
DMSLSBC routine is called to resolve the 
previous external references and adjust 
the REFTBL entry. The entry point name 
and address are printed by calling 
DMSLIO. 



card— specif ied external name. If none 
is found, the RBFTBL search routine sets 
the undefined flag for the new loader 
table entry. 

2. The routine resets a possible WEAK EXTRN 
flag. The routine next places the 
REFTBL entry's position-key in the BSID 
table. If the entry has already been 
defined by means of an BSD type 0, 1, 5, 
or 6, processing continues at operation 
4. Otherwise, it continues at operation 
3. 

3. The relocated address is placed in the 
RELFAC entry in the external name's 
REFTBL entry. 

1. The BSD type 2 card routine then 
determines (at location ESDOO) whether 
there is another entry on the BSD card. 
If there is another entry, the routine 
branches to location CA3A1 in the BSD 
card analysis routine for further 
processing of this card; otherwise, the 
routine branches to location RD in the 
initial and resume loading routine. 

Sxits 

This routine exits to location CA3A1 in the 
BSD card analysis routine if there is another 
entry on the BSD card being processed, and 
exits to location RD in the initial and 
resume loading routine if the BSD card 
requires no further processing. 



5. If there is no REFTBL entry for the 
card-specified entry point name, the 
routine makes such an entry and branches 
to the DMSLIO routine. 



ESp T^£e 2 Card Routine - C3AH_1 



Function 

This routine creates the proper ESID table 
entry for the card-specified external name 
and places the name's assigned address (0RG2) 
in the reference table relocation factor for 
that name. 

Entrj 

This routine has two entry points: location 
C3AH1 and location ESDOO. Location C3AH1 is 
entered from the BSD card analysis routine; 
this occurs when an BSD type 2 card is being 
processed. Location ESDOO is entered from: 

• The BSD card analysis routine, when the 
card being processed is an ESD type 2, and 
an absolute loading process is indicated. 

• The ESD type card routine and BSD type 1 
card routine, as the last operation in 
each of these routines. 



O£eration 

1. When this routine is entered at location 
C3AH1, it first links to the REFTBL 
search routine to determine whether 
there is a REFTBL entry for the 



ESD Ty£e 4 Routine - PC 



Function 

This routine makes loader table and ESIDTAB 
entries for private code CSECT. 

Operation 

The ESD Type 4 Card Routine: 

1. The routine LDRSYM is called to generate 
a unique character string number of the 
form 00000001, which is left in the 
external data area NXTSYM ; it is greater 
in value than previously generated 
symbol. 

2. The CSECT is then processed as a normal 
type ESD with the above assigned 
name. 



ESD TjESS 5 and 6 Card Routine 
COMESD 



PRVESD and 



Function 

This routine creates reference table and 
ESIDTAB entries for common and 
pseudo— register ESDs. 

Operation 

The ESD type 5 and 6 card routine: 

1. Links to ESIDIMC in the ESD type card 
routine, to update the number of ESIDTB 
entries. 
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2. Links to the REFTBL search routine to 
determine whether a reference table 
(REFTBL) entry has already been created. 
If there is no entry, the REFTBL search 
routine places the naae of the iten in the 
HEFTBL. 



3. 



3, If the REFTBL search routine 
an entry for the item, the 
6 card routine indexes it i 
enters the length and ali 
entry, indicates whether i 
coBBon, and branches to ESD 
type 2 card routine to det 
the card contains additiona 



processed. If the entry is 
type 5 and 6 card routin 
displacement and length i 
before branching to ESDOO. 



had to create 
ESD type 5 and 
n the ESIDTB, 
gnfflent in the 
t is a PR or 

00 in the ESD 
ersine whether 

1 ESD's to be 
a PR, the ESD 

e enters its 
n the REFTBL 



4. If the REFTBL already contained an entry, 
the ESD type 5 and 6 card routine indexes 
it in the ESIDTB, checks alignsent and 
branches to ESDOO. 

Mote; The PR alignment is coded and placed into 
the REFTBL. It is an error to encounter more 
restrictive alignment PR than previously 
defined. A blank alignBent factor is translated 
to fullword alignment. 



JSD Tl£e 10 Routine - WEAK EXTRN 



The WEAK EXTRN routine calls the search routine 
to find the EXTRN name in the loader table. If 
not found, set the WEAK EXTRN flag in the new 
loader table entry. Exit to ESDOO. 



TXT Card Routine - CUAA1 



Function 

This routine has two functions: address 
inspection and placing text in storage. 

Entr£ 

This routine has three entry points: 
location C4AA1, which is entered froa the ESD 
card analysis routine, and locations REPENT 
and APRI, which are entered from the REP card 
routine for address inspection. 

Operation 

1 . This routine begins its operation with a 
test of card type. If the card being 
processed is not a TXT card, the routine 
branches to the REP card routine; 
otherwise, processing continues in this 
routine. 

2. The routine then determines how many 
bytes of text are to be placed in 
storage, and finds whether the loading 
process is absolute or relocating. If 
the loading process is absolute, the 
routine performs operation 4, below; if 
relocating, the routine performs 
operation 3. 



4. 



If the ESIDTB entry was negative, this 
is a duplicate to CSECT and processing 
branches to RD. Otherwise, the routine 
links to the REFADR routine to obtain 
the relocation factor of the current 
control segment. 

The routine then adds the relocation 
factor (0, if the loading process is 
absolute) and the card-specified storage 
address. The result is the address at 
which the text must be stored. This 
routine also determines whether the 
address is such that the text, when 
loaded starting at that address, 
overlays the loader or 
table. If a loader 
reference table overlay 



routine branches to the 
If neither condition 
routine proceeds 
inspection. 



the reference 

overlay or a 

is found, the 

LDRIO routine. 

is detected, the 

with address 



5. 



6. 



The routine then determines whether an 
address has already been saved for 
possible use as the end— of-load branch 
address. If an address has been saved, 
the routine performs operation 7; if 
not, the routine performs operation 6. 

The routine determines whether the text 
address is below location 128. If the 
address is below location 128, it should 
not be saved for use as a possible 
end-of— load branch address, and the 
routine performs operation 7; otherwise 
the routine saves the address and then 
performs operation 7. 

The routine then stores the text at the 
address specified (absolute or 
relocated) and branches to location RD 
in the initial and resume loading 
routine to read another card. 



Exits 

The routine 
follows: 



exits to two locations, as 



1. The routine exits to location RD in the 
initial and resume loading routine if it 
is being used to process a TXT card. 

2. The routine exits to location APRIL in 
the REP card routine if it is being used 
for REP card address inspection. 



HEP Card Routine 



C4AA3 



Function 

This routine places 
storage. 



text corrections in 



Entrjr 

This routine has one entry point, location 
C4AA3. The routine is entered from the TXT 
card routine. 

Operation 

1. This routine begins its operation with a 
test of card type. If the card being 
processed is not a HEP card, the routine 
branches to the RLD card routine; 
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otherwise, processing continues in this 
routine. 

2. The routine then links to the HEXB 
conversion routine to convert the REP 
card-specified correction address from 
hexadecimal to binary. 

3. The routine then links to the HEXB 
conversion routine again to convert the 
REP card-specified ESID from hexadecimal 
to binary. 

4. The routine then determines whether the 
2-byte correction being processed is the 
first such correction on the REP card. 
If it is the first correction, the 
routine performs operation 5; otherwise, 
the routine performs operation 6. 

5. When the routine is processing the first 
correction, it links to location REPENT 
in the TXT card routine, where the REP 
card-specified correction address is 
inspected for loader overlay and for 
end-of-load branch address saving; in 
addition, if the loading process is 
relocating, the relocated address is 
calculated and checked for reference 
table overlay. The routine then 
performs operation 7. 

6. Hhen the correction being processed is 
not the first such correction on the REP 
card, the routine branches to location 
APR1 in the TXT card routine for address 
inspection. 

7. The routine then links to the HEXB 
conversion routine to convert the 
correction from hexadecimal to binary, 
places the correction in storage at the 
absolute (card-specified) or relocated 
address, and determines whether there is 
another correction entry on the REP 
card. If there is another entry, the 
routine repeats its processing from 
operation 4, above; otherwise, the 
routine branches to location RD in the 
initial and resume loading routine. 



Exits 

When all the REP— card corrections have been 
processed, this routine exits to location RD 
in the initial and resume loading routine. 



HLD Card Routine - C5AA1 



Function 

This routine processes RLD cards, which are 
produced by the assembler when it encounters 
address constants within the program being 
assembled. This routine places the current 
storage address (absolute or relocated) of a 
given defined symbol or expression into the 
storage location indicated by the assembler. 
The routine must calculate the proper value 
of the defined symbol or expression and the 
proper address at which to store that value. 



Entrj[ 

This routine has two entry points, locations 
C5AA1 and PASSTWO. 



OBeration 

1. Location C5AA1 writes each RLD card into 
a work file (DMSLDR CMS0T1) . Exit to RD 
to process the next card. 

Location PASSTNO reads an RLD card from 
the work file. At EOF got to C6AB6 to 
finish this file. 



2. The routine uses the re 
(RH ESID) on the card 
current address (absolute 
of the symbol referred 
card. This address is 
relocation factor section 
reference table entry, 
is 0, the routine branch 
routine (invalid BSD) . 



location header 

to obtain the 

or relocated) 

to by the RLD 

found in the 

of the proper 

If the BH ESID 

es to the LDRIO 



3. The routine uses the position header (PH 
ESID) on the card to obtain the 
relocation factor of the control segment 
in which the DEFINE CONSTANT assembler 
instruction occurred. If the PH ESID is 
0, the routine branches to BADCRD in the 
REFTBL search routine (invalid ESID) . 
If the ESIDTAB entry is negative 
(duplicate CSECT) , the RLD entry is 
skipped. 

U. The routine next decrements the 
card-specified byte count by 4 and tests 
it for 0. If the count is now 0, the 
routine branches to location RD in the 
initial and resume loading routine; 
otherwise, processing continues in this 
routine. 

5. The routine determines the length, in 
bytes, of the address constant referred 
to in the RLD card. This length is 
specified on the RLD card. 

6. The routine then adds the relocation 
factor obtained in operation 3 
(relocation factor of the control 
segment in which the current address of 
the symbol must be stored) , and the 
card— specif ied address. The sum is the 
current address of the location at which 
the symbol address must be stored. 

7. The routine then computes the arithmetic 
value (symbol address or expression 
value) that must be placed in storage at 
the address calculated in operation 6, 
above, and places that value at the 
indicated address. If the value is 
undefined, the routine branches to 
location DHSLSBB, where the constant is 
added to a string of constants that are 
to be defined later. 

8. The routine again decrements the byte 
count of information on the RLD card and 
tests the result for zero. If the 
result is zero, go to operation 2; 
otherwise, processing continues in this 
routine. 
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The routine next checks the continuation 
flag, a part of the data placed on the 
BLD card by the assembler. If the flag 
is on, the routine repeats its 
processing for a new address only; the 
processing is repeated from operation ^. 
If the flag is off, the routine repeats 
its processing for a new symbol; the 
processing is repeated from operation 
2. 



Exits 

This routine exits to location RD in 
initial and resume loading routine. 



END Card Routine - C6AA1 



the 



Exits 

This routine exits to the location specified 
in a general register. This may be either of 
two locations: 

1. Location RD in the initial and resume 
loading routine. This exit occurs when 
the END card routine is processing an 
END card. 

2. The location in the LDT card routine 
that is specified by that routine's 
linkage to the END card routine. This 
exit occurs when the LDT card routine 
entered this routine to clear the ESID 
table and set the absolute load flag 
on. 



Function 

This~routine saves the END card address under 
certain circumstances, and initializes the 
loader to load another control segment. 

Entr^ 

This routine has one entry point, location 
C6AA1. The routine is entered from the RLD 
card routine. 

Operation 

1. This routine begins its operation with a 
test of card type. If the card being 
processed is not an END card, the 
routine branches to the LDT card 
routine; otherwise, processing continues 
in this routine. 

2. The routine then determines whether the 
END card contains an address. If the 
card contains no address, the routine 
performs operation 7, below; otherwise, 
the routine performs operation 3. 

3. The routine next checks the 
end-address-saved switch. If this 
switch is on, an address has already 
been saved, and the routine performs 
operation 7. If the switch is off, the 
routine performs operation U. 

4. The routine determines whether loading 
is absolute or relocated. If the 
loading process is absolute, the routine 
performs operation 6; otherwise, the 
routine performs operation 5. 

5. The routine links to the REPADR routine 
to obtain the current relocation factor, 
and adds this factor to the 
card-specified address. 

6. The routine stores the address (absolute 
or relocated) in area BRAD, for possible 
use at the end-of-load transfer of 
control to the problem program. 



Control Card Routine 



CTLCRD1 



7. Goes to location PASSTHO (in 
routine) to process RLD cards. 



RLD 



8. The routine then clears the ESID table, 
sets the absolute load flag on, and 
branches to the location specified in a 
general register (see "Exits") . 



Function 

This routine handles the 
control cards. 



ENTRY and LIBRARY 



Entrj 

This routine has one entry point, location 
CTLCRD1. The routine is entered from the LDT 
card routine. 



1." The CMS function SCAl 
the card. 



is called to parse 



2. If the card is not an ENTRY or LIBRARY 
card, the routine determines whether the 
NOINV option (no printing of invalid 
card images) was specified. If printing 
is suppressed, control passes to RD in 
the initial and resume loading routine, 
where another card is read. If printing 
is not suppressed, control passes to the 
disk and type output routine (DMSLIO) , 
where the invalid card image is printed 
in the load map. If the card is a valid 
control card, processing continues. 



ENTRY Card 

~ 3. If the ENTRY name is already defined in 
REFTBL, its REFTBL address is placed in 
ENTADR. Otherwise, a new entry is made 
in REFTBL, indicating an undefined 
external reference (to be resolved by 
later input or library search) , and this 
REFTBL entry's address is placed in 
ENTADR. 



U. 



The control card is printed by calling 
DMSLIO via CTLCRD; it then exits to RD. 



LIBBiBY Card 

5. Only nonobligatory 
cards are handled 
considered invalid. 



reference LIBRARY 
any others are 



6. Each entry— point name is individually 
isolated and is searched for in the 
BfEFTBL. If it has already been loaded 
and defined, nothing is done and the 
next entry-point name is processed. 
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otherwise, the nonobligatory bit is set 
in the flag byte of the REFTBL entry. 

7. Processing continues at operation 1. 



REFADR Routine (DMSLDRB) 



Function 

This routine coaputes the storage address of 
a given entry in the reference table. 

Entrj 

This routine has one entry point, location 
REFADR. The routine is entered for several 
of the routines within the loader. 

O£eration 

1. Checks to see if requested ESDID is 
zero. If so, uses LOCCMT as requested 
location; branches to the return 
location + 44; otherwise continues this 
routine. 

2. The routine first obtains, from the 
indicated ESID table entry, the position 
(n) of the given entry within the 

reference table (where the given entry 
is the nth REFTBL entry) . 

3. The routine then multiplies n by 16 (the 
number of bytes in each REFTBL entry) 
and subtracts this result from the 
starting address of the reference table. 
The starting address of the reference 
table is held in area TBLREF; this 
address is the highest address in 
storage, and the reference table is 
always built downward from that 
address. 

4. The result of the subtraction in 
operation 2, above, is the storage 
address of the given reference table 
entry. If there is n.o ESD for the 
entry, goes to operation 5; otherwise, 
this routine returns to the location 
specified by the calling routine. 

5. Adds an element to the chain of waiting 
elements. The element contains the ESD 
data item information to be resolved 
when the requested ESDID is 
encountered. 



Ogeration 

1. This routine begins its operation by 
obtaining the number of entries 
currently in the reference table (this 
number is contained in area TBLCT) , the 
size of a reference table entry (16 
bytes), and the starting address of the 
reference table (always the highest 
address in storage, contained in area 
TBLREF) . 

2. The routine then checks the number of 
entries in the reference table. If the 
number is 0, the routine performs 
operation 5; otherwise, the routine 
performs operation 3. 

3. The routine next determines the address 
of the first (or next) reference table 
entry to have its name checked, 
increments by one the count it is 
keeping of name comparisons, and 
compares the given name with the name 
contained in that entry. If the names 
are identical, PRSERCH branches to the 
location specified in the routine that 
linked to it. PRSERCH then returns the 
address of the REFTBL entry; else 
PRSERCH performs operation 4. 

4. The routine then determines whether 
there is another reference table entry 
to be checked. If there is none, the 
routine performs operation 5; if there 
is another, the routine decrements by 
one the number of entries remaining and 
repeats its operation starting with 
operation 3. 

5. If all the entries have been checked, 
and none contains the given name for 
which this routine is searching, the 
routine increments by one the count it 
is keeping of name comparisons, places 
that new value in area TBLCT, moves the 
given name to form a new reference table 
entry, and returns to the calling 
program. 

Exits 

This routine exits to either of two 
locations, both of which are specified by the 
routine that linked to this routine. The 
first location is that specified in the event 
that an entry for the given name is found; 
the second location is that specified in the 
event that such as entry is not found. 



PRSERCH Routine (DMSLDBD) 



Loader Data Bases 



Function 

This routine compares each reference table 
entry name with the given name determining 
(1) whether there is an entry for that name 
and (2) what the storage address of that 
entry is. 

Entry 

This routine is initially entered at PRSERCH, 
and subsequently at location SERCH. The 
routine is entered from several routines 
within the loader. 



ESD Card Codes (col. 25...) 



Code 
~00 

01 

02 

04 

05 

06 

OA 



Meaning 

SD~CSECT or START) 

LD (ENTRY) 

ER (EXTRM) 

PC (Private code) 

CM (COMMON) 

XD (Pseudo-register) 

HX (WEAK EXTERN) 
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ESIDTB Entr^ 



7F 



07 



XDBL 



The ESD ID t 
separately for 
loader. The ES 
between ESD ID 
entries in the 
as specified by 
is constructed 
It is then used 
in the text deck 



able (ESIETB) is constructed 
each text deck processed by the 
IDTB produces a correspondence 
numbers (used on BLD cards) and 
loader reference table (REFTBL) 
the ESD cards. Thus, the ESIDTB 
while processing the ESD cards, 
to process the TXT and RLD cards 



The ESIDTB is treated as an array and is 
accessed by using the ID nuDber as an index. 
Each ESIDTB entry is 16 bits long. 

liis Weaning 

If 1 , this entry corresponds to a CSECT 
that has been previously defined. All 
TXT cards and RLD cards referring to 
this CSECT in this text deck should be 
ignored. 

1 If 1, this entry corresponds to a CSECT 
definition (SD) . 

2 Halting ESD items exist for this ESDID. 

3 Unused. 

1-15 REFTBL entry number (e.g. 1, 2, 3, 
etc. ) 



Bit 1 is very crucial because it is necessary 
to use the VALUE field of the REFTBL if the ID 
corresponds to an ER, CM, or PR; but, the INFO 
field of the REFTBL entry must be used in the ID 
corresponds to an SD . 



REFTBL Entry 
""0(0) 



NAME 



8(8) 

FLAG1 

12(C) 

N0TE1 



16(10) 

FLAG2 




INFO 



VALUE 



ADDRESS 



PR - doubleword 

alignment 
Undefined symbol 
Resolve CXD 
Define common area 
Heak external reference 
TXTLIBs not to be used 

to resolve names 



IIIQ Held: depends upon the type of the ESD 
item. 



80 


05 


XUNDEF 


81 


OU 


XCXD 


82 


02 


XCOMSET 


83 


05 


NEAKEXT 


90 


06 


CTLLIB 



ESD Item 

lZ£e 

SD (CSECT or START) 

LD (ENTRY) 

CM (COMMON) 

PR (Psuedo Register) 



INFO Field 

Meaning 

Relocation factor 

zero 

maximum length 



I*1;IIJ lisi^i depends upon the type of the ESD 
item, as does the INFO field. 



ESD Item 

Il£e 

SD (CSECT or START) 

LD (ENTRY) 

CM (COMMON) 

PR (Psuedo register) 



VALUE Field 
Meaning 

Absolue address 
Absolue address 
Absolue address 
Assigned value 
(starting from 0) 



FLAG2 Byte 

Jii IJeaSiSSl 

Unused 

1 Unused 



Unused 
Unused 



Sit Meaning 
U Unused 

5 Name was located in a 
TXTLIB 

6 Section definition entry 

7 Name specifically loaded 
from command line. 



ADDRESS Field: Unused 

Entries may be created in the loader reference 
table prior to the actual defining of the 
symbol. For example, an entry is created for a 
symbol if it is referenced by means of an EXTRN 
(ER) even if the symbol has not yet been defined 
or its type known. Furthermore, common (CM) is 
not assigned absolute addresses until prior to 
the start of execution by the START command. 

These circumstances are determined by the 
setting of the flag byte; if the symbol's value 
has not yet been defined^ the value field 
specifies the address of a patch control block 
(PCB) . 






A REFTBL entry is 20 bytes. The fields have the 
following uses: 



NAME Field: contains the symbolic name from the 
isD data item. 



FLAG1 BYTE 



Loader ESD 

Code Code 

7C 00 

7D 01 

7E 03 



Routine 

Label 

XBYTE 

XHALF 

XFULL 



Meaning 

PR - byte alignment 

PR - halfword alignment 

PR - fullword alignment 



Patch Control Block (PCB) 

These are allocated from free storage and 
pointed at from REFTBL entries or other PCBs. 

Slie Meanincf 

0-3 Address of next PCB 

5-7 Location of ADCON in storage 

4 Flag byte 

All address constant locations in loaded program 
for undefined symbols are placed on PCB chains. 
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IjO§^§I ISE^t Restrictions 



All restrictions which apply to object files for 
the OS linkage editor apply to CHS loader input 
files. 



(FST) , chain links, and file records. Figure 44 
shows how these types of data blocks relate to 
each other; the following text and figures 
describe these relationships and the individual 
data blocks in more detail. 



PBOCESS COMMANDS THAT MANIPULATE THE FILE SYSTEM 



FILE STATUS TABLES 



Figure 40 lists the CMS modules that perform 
either general file system support functions or 
that perform data manipulation. 



MANAGE THE CMS FILE SYSTEM 



A description of the structure of the CMS file 
system and the flow of routines that access and 
update the file system follows. 



HOH CMS FILES ARE ORGANIZED IN STORAGE 



CMS files are organized in storage by three 
types of data blocks: the file status table 



CHS files consist of 800-byte records whose 
attributes are described in the file status 
table (FST) . The file status table is defined 
by DSECT FSTSECT. The FST consists of such 
information as the filename, filetype, and 
filemode of the file, the date on which the file 
was last written, and whether the file is in 
fixed-length or variable format. Also, the FST 
contains a pointer to the first chain link. The 
first chain link is a block that contains 
addresses of the data blocks that contain the 
actual data for the file. 

The FSTs are grouped into 800-byte blocks 
called FST Blocks (these are sometimes referred 
to in listings as hyperblocks) . Each FST block 
contains 20 FST entries, each describing the 
attributes of a separate file. Figure 45 shows 
the structure of an FST block and the fields 
defined in the FST. 




File Status 
Table Block (FSTB) 



File Status 
Table Entry 





/ 


FCL 


^ 







Record 1 



Record 2 



-r i- 



-i i- 




Record n 



Nth Chain 
Link (NCL) 



-800-byte CMS Record Containing File Data Items- 



Figure 44. How CMS File Records are Chained Together 
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File Status 
Table Block 



FST 1 



FST2 



FST 4 



FST 6 



Fields in a File 
Status Table Entry 








FILE 






NAME 


















8 


FILE 
TYPE 














16 


DATE LAST WRITTEN 




imam 


■■:::::::::x:::::::::::::::::::x::::¥: 








20 


Write Pointer 
(Number of Item) 


22 Read Pointer 

(Number of Item) 














24 


Filemode 


26 Number of 
Items in File 














28 


Disk Address 


30 Fixed 


31 Flag 
Byte 






32 


Item Lengt 
Max. Item 


h(F) 
Length (V) 






36 


Number of 
800-Byte Data Blocks 


Ye 


yr 



Figure 45. Format of a File Status Block; Format of a File Status Table 



CHAIN LINKS 



Chain links are 200- or 800-byte blocks of 
storage that chain the records of a file in 
storage. There are two types of chain links: 
first chain links and Nth chain links. 

The first chain link points to two kinds of 
data. The first 80 bytes of the first chain 
link contain the halfword addresses of the 
remaining 40 chain links used to chain the 
records of the file. The next 120 bytes of the 
file are the halfword addresses of the first 60 
records of the file. 



Regardless of their format, the items of a 
file are stored by CMS in sequential order in as 
many 800-byte records as are required to 
accommodate them. Each record (except the last) 
is completely filled and items that begin in one 
record can end on the next record. Figure U7 
shows the arrangement of records in files for 
files containing fixed-length records and files 
containing variable-length records. 

The location of any item in a file containing 
fixed-length records is determined by the 
formula: 



The Nth chain links contain only halfword 
addresses of the records that contained in the 
file. 



locations = 



(Item Number - 1) x Record Length 



800 



Because there are 41 chain links (of which 
the first contains addresses for only 60 
records) , the maximum size for any CMS file is 
16,060 800-byte records. 



where the quotient is the number of the item and 
the remainder is the displacement of the item 
into the file. 



CMS RECORD FORMATS 



CMS records are 800-byte blocks containing the 
data that comprises the file. For example, the 
CMS record may contain several card images or 
print images, each of which is referred to a 
record item. Figure 46 shows how chain links are 
chained together. 

CMS records can be stored on disk in either 
fixed-length or variable-length format. However, 
the two formats may not be mixed in a single 
file. 



For variable-length records, each record is 
preceded by a 2-byte field specifying the length 
of the record. 



DISK ORGANIZATION IN CMS 



CMS virtual disks (also referred to as 
minidisks) are blocks of data designed to 
externally parallel the function of real disks. 
Several virtual disks may reside on one real 
disk. 
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Disk Address of 
2rid Cham Link 



Disk Address ot 
3rd Cham Link 



Disk Address of 
40th Chain Link 

Disk Address of 
41sfCham Link 

Disk Address of 
1st Data Block 

Disk Address ot 
2nd Data Block 



Disk Address of 
59th Data Block 



Disk Address of 
60th Data Block 



Linkage 
Directory 



Disk Address of 
/^ t 0th Data Block 



Disk Address of 
/^t 1st Data Block 



Disk Address of 

A 4 398 th Data Block 



Disk Address of 

A+ 399th Data Block 



Figure 46. Foraat of the First Chain Link and Nth Chain Links 



Data block structure for file consisting of fixed-length records 



Data bfock structure for file consisting of variable-length records 



800 
800 



1st record 



5th record 



800 



800 



800 



800 



M" 



2nd record 
I '-3 I 3rd record | ^^ | 




800 



800 



Figure 47. Arrangement of Fixed-Length or Variable- Length Records in Files 



A CMS virtual aachine aay have up to 10 CMS initialization; however, most are accessed 

virtual disks accessed during a terminal dynamically as they are needed during a terminal 

session, depending on user specifications. Some session, 
disks, such as the S-disk, are accessed during 
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PHYSICAL ORGANIZATION OF VIRTDAL DISKS 



Virtual disks are physically organized in 
800- byte records. Records 1 and 2 of each user 
disk are reserved for IPL. Record 3 contains the 
disk label. Record 4 contains the aaster file 
directory. The renaining records on the disk 
contain user file-related information such as 
the FSTs, chain links, and the individual file 
records discussed above. 



THE MASTER FILE DIRECTORY 



The master file directory (MFD) is the major 
file management table for a virtual disk. As 
mentioned earlier, it resides on cylinder 0, 
track 0, record 4 of each virtual disk. Six 
types of information contained in the master 
file directory: 

• The disk addresses of the FST entries 
describing user files on that disk. 

• A 4-byte "sentinel," which can be either FFFD 
or FPFF . FFFD specifies that extensions of 
the QMSK (described below) follow. FFFF 
specifies that no QMSK extensions follow. 

• Extensions to the QMSK, if any. 

• General information describing the status of 
the disk: 

- ADTNDM - The total number of 800-byte 
blocks on the user's disk. 

ADTDSED - The number of blocks currently 
in use on the disk. 

ADTLEFT - Number of blocks remaining for 
use (ADTNDM - ADTUSED) . 

ADTLAST - Relative byte address of the 
last record in use on the disk. 

ADTCYL - Number of cylinders on the 
user's disk. 

Onit Type - A 1-byte field describing the 
type of the disk: 08 for a 2314, 09 for a 
3330. 

A bit mask called the QMSK, which keeps 
track of the status of the records on 
disk. The QMSK is described in more 
detail below. 

Another bit map, called the QQMSK, which 
is used only for 2314 disks and performs a 
function similar to that of QMSK. 

Figure 48 shows the structure of the master 
file directory. Figure 44 shows the 
relationship of the Master File Directory, which 
resides on disk, to data blocks brought into 
storage for file management purposes, for 
example, FSTs and chain links. 



KEEPING TRACK OF R/H DISK STORAGE: QMSK AND 
QQMSK 



Because large areas of disk space need not be 
contiguous in CMS, but are composed of 800-byte 
blocks chain-linked together, disk space 
management needs to determine only the 
availability of blocks, not extents. The status 
of the blocks on any read/write disk (which 
blocks are available and which are currently in 
use) is stored in a table called QMSK. The term 
QMSK is derived from the fact that a 2311 disk 
drive has four 800-byte blocks per track. One 
block is a "quarter-track", or QTRK, and a 
200-byte area is a "quarter-quarter-track", or 
QQTRK. The bit mask for 2314, 2319, 3340, or 
3330 records is called the QMSK, although each 
800-byte block represents less than a quarter of 
a track on these devices. 

On a 2314 or 2319 disk, the blocks are 
actually grouped fifteen 800-byte blocks per 
even/odd pair of tracks. An even/odd pair of 
tracks is called a track group. On a 3330 disk, 
the blocks are grouped fourteen 800-byte blocks 
per track. On a 3340 disk, the blocks are 
grouped into eight 800-byte blocks per track. 

When the system is not in use, a user's QMSK 
resides on the Master File Directory; during a 
session it is maintained on disk, but also 
resides in main storage. QMSK is of variable 
length, depending on how many cylinders exist on 
the disk. 

Each bit is associated with a particular 
block on the disk. The first bit in QMSK 
corresponds to the first block, the second bit 
to the second block, and so forth, as shown in 
Figure 49. 

When a bit in QMSK is set to 1, it indicates 
that the corresponding block is in use and not 
available for allocation. A 0-bit indicates 
that the corresponding block is available. The 
data blocks are referred to by relative block 
numbers throughout disk space management, and 
the disk I/O routine, DMSDIO, finally converts 
this number to a CCHHR disk address. 



A table called QQMSK indicates 
segments (QQTRK) are availcible f 
and which are currently in use. 
100 entries, which are used to 
status of up to 100 QQTBK records 
QQMSK contains either a disk add 
to a QQTRK record that is 
allocation, or zero. QQMSK is 
2314 files; for 3330, 3340, and 3 
chain link occupies the first 200 
an 800-byte block. 



which 200 byte 
or allocation 
QQMSK contains 
indicate the 
An entry in 
ress, pointing 
available for 
used only for 
350, the first 
-byte area of 



The QMSK and QQMSK tables for read-only disks 
are not brought into storage, since no space 
allocation is done for a disk while it is 
read-only. They remain, as is, on the disk 
until the disk is accessed as a read/write 
disk. 
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2 Bytes 



ByteO 



Byte 364 



Disk Address of 1st FST Block 



Disk Address of 2nd FST Block (if any> 



Disk Address of Nth FST Block (if any) 



Sentinel (Note 1) 



Disk Address of 1st QMSK extension (if any) 



Disk Address of Nth QMSK extension (if any) 



Not used — Zero filled 



ADTUSED, ADTLEFT, ADTLAST 



Not used (zero) 




UNIT-TYPE (Note 4) 



Entire 200-Byte QQMSK Table 
(for 2314 only) 



Figure a8. Structure of the Master File Directory 
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Figure 49. Disk Storage Allocation Using the QMSK Data Block 



Section 2. Method of Operation and Program Organization 181 



DYNAMIC STORAGE HANAGEHENT: ACTIVE DISKS 
FILES 



AND 



CMS disks and files contained on disk are 
physically mapped using the data blocks 
described above: for disks, the QMSK, QQMSK, and 
the MFD; for files, the FST, chain links, and 
800-byte file records. In storage, all of this 
data is accessed by neans of two DSECTs whose 
addresses are defined in the DSECT NUCON, 
ADTSECT and AFTSECT. 



DHSLAD: In the case where an extension has been 
specified, calls DMSLAD to ensure that the 
extension disk exists. 

U&§JihU' Ensures that the specified disk is not 
already accessed as a R/H disk. 

DMSFHS: In the case where the specified disk is 
replacing a currently accessed disk, closes any 
open files belonging to the duplicate disk. 

DMSACC: Verifies the parameters remaining on the 
command line. 



I^M3iB3 Active Disks: The Active Disk Table 



The ADTSECT DSECT maps information in the active 
disk table (ADT) . This information includes 
data contained in the MFD, FST blocks, the QMSK, 
and QQMSK. The DSECT comprises of ten "slots," 
each representing one CMS virtual disk. A slot 
contains significant information about the disk 
such as a pointer to the MFD for the disk, a 
pointer to the first FST block and pointers to 
the QMSK and QQMSK, if the disk is a R/H disk. 
Also contained in ADTSECT is information such as 
the number of cylinders on the disk, the number 
of records on the disk. 



DMSALD: Releases any free storage belonging to 
the duplicate disk via a call to DHSFRE. Also, 
clears appropriate entries in the ADT for use by 
the new disk. 

DMSACM: (Called as the first instruction by 
DMSACF) Reads, from the Master File Directory, 
QMSK, and the QQMSK for the specified disk; 
also, DMSACM updates the ADT for the specified 
disk using information from the MFD. 

DMSACF: Reads into storage all the FST blocks 
associated with the specified disk. 

DMSACC: Handles error processing or processing 
required to return control to DMSINT. 



Managing Active Files: The Active File Table 



INPDT/OUTPOT OPERATIONS 



Each open file is represented in storage by an 
active file table (AFT) . The AFT (defined by 
the AFTSECT DSECT) contains data found on disk 
in FSTs, chain links, and data records. Also 
contained in the AFT is such information as the 
address of the first chain link for the file, 
the current chain link for the file, the address 
of the current data block, the fileid 
information for the file. Figure 39 shows the 
relationship between the AFT and other CMS data 
blocks. 



CMS ROUTINES USED TO ACCESS THE FILE SYSTEM 



DMSACC is the control routine used to access a 
virtual disk. In conjunction with DMSACM and 
DMSACF, DMSACC builds, in virtual Storage, the 
tables CMS requires for processing files 
contained on the disk. The list below shows the 
logical flow of the main function of DMSACC. 



Access a Virtual Disk: DMSACC 



DMSACC: Scans the command line to determine 
which disk is specified. 

DMSLAD: Looks up the address of the ADT for the 
disk specified on the command line. 

DMSACC; Determines whether an extension to a 
disk has been specified on the command line and 
ensures that it is correctly specified. 



CMS input/output operations for disk, tape, and 
unit record devices are always synchronous. 
Disk and tape I/O is initiated via a privileged 
instruction, DIAGNOSE, whose function code 
requests CP to perform necessary error recovery. 
Control is not returned to CHS until the 
operation is complete, except for tape rewind or 
rewind and unload operations, which return 
control immediately after the operation is 
started. No interruption is ever received as 
the result of DIAGNOSE I/O. The CSW is stored 
only in the event of an error. 

Input/output operations to a card reader, 
card punch, or printer are initiated via a 
normal START I/O instruction. After starting 
the operation, CMS enters the wait state until a 
device end interruption is received from the 
started device. Because the I/O is spooled by 
CP, CMS does not handle any exceptional 
conditions other than not ready, end-of-file, or 
forms overflow. 

CMS input/output operations to the terminal 
may be either synchronous or asynchronous. 
Output to the terminal is always asynchronous, 
but a program may wait for all terminal 
input/output operations to complete by calling 
the console wait routine. Input from the 
terminal is usually synchronous but a user may 
cause CMS to issue a read by pressing the 
attention key. A program may also 
asynchronously stack data to be read by calling 
the console attention routine. 
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UHIT BECORD I/O PROCESSING 



Seven routines handle I/O processing for CMS: 
DNSBDC, DHSPUN, and DNSPRT handle the READCARD, 
PUNCH, and PRINT coamands and pass control to te 
actual I/O processors, DMSCIO (for READCARD and 
PUNCH) or DMSPIO (for PRINT) . DMSCIO and DMSPIO 
issue the SIO instructions that cause I/O to 
take place. Two other routines, DMSIOW and 
DMSITI, handle synchronization processing for 
I/O operations. Figure 50 shows the overall 
flow of control for I/O operations. 



DM Slow : Places the symbolic naae of the 
interrupting device in the PLIST and passes 
control to the calling routine. 

DMSCIO: Checks for SENSE inforaation and handle 
I/O~errors, if necessary. 

DMSCMH: Displays a control record at the 
console. 

DMSSCN: If another control record is 
encountered, formats it via DMSSCN. 

DMSCHR: Displays the new control record at the 
console. 



DMSFMS: Closes the file when end-of-file 
occurs. 

DMSRDR: Issues a CP CLOSE command to close the 
card reader. 



DMSRDC 
DMSPUN 
DMSPRT 




Figure 50. Flow of control For Unit Record I/O 
Processing 



The following are more detailed descriptions of 
the flow of control for the read, punch, and 
print unit record control functions. 



Bead A Card 



DMSBDC: Initializes block length and unit record 
size. 

DMSCIO: Initializes areas to read records. 

EMSCIO: Issues an SIO command to read a record. 



Punch a Card 



DMSPUN: Ensures that a virtual punch is 
available; processes PUNCH command options. 

DMSSTT: Verifies the existence of the file and 
returns its starting address. 

DMSPUN: If requested, sets up a header record 
and calls DMSCHR to write it to the console. 

DMSBRD: Reads a block of data into the read 
buffer; continues reading until the buffer is 
filled. 

DMSCIO: Initializes areas to punch records. 

DMSCIO: Issues the SIO instruction to punch the 
contents of the buffer. 

DMSCIO: Issues a call to DMSIOH to wait for 
completion of the punch I/O operation. 

DMSIOJ: Sets the wait bit on for the virtual 
punch device and loads the I/O old PSH from 
NUCON. This causes CMS to enter a wait state 
until the punch operation completes. 

DMSITI: Ensures that this interrupt is for the 
punch. If not, the I/O old PSH is loaded 
returning CMS to a wait state. If the interrupt 
is for the punch, DMSITI resets the wait bit in 
the I/O old PSH and then loads the PSl, 
returning control to DMSIOH. 

DMSIOH: Places the symbolic name of the 
interrupting device in the PLIST and passes 
control to DMSCIO. 



DMSIOH: Sets the wait bit for the virtual card 
reader and load the I/O old PSH from NUCON. 
This causes CMS to enter a wait state until the 
read I/O is complete. 

DMSITI: Ensures that this interrupt is for the 

virtual reader. If not, the I/O old PSH is 

loaded, returning CMS to a wait state. If the 

interrupt is for the reader, DMSITI resets the 

wait bit in the I/O old PSH and loads it, 
causing control to return to DMSIOH. 



DMSCIO: Checks for SENSE information and handles 
I/O errors, if any. 

DMSPUN: Handles error returns and resets 
constants for the next punch operation. 

DHSFNS: Closes the file and returns control to 
the command handler, DMSINT. 
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Print a File 



BMSPRT: Oeteraines the device type of the 
printer. Checks out the specified fileid. 
Checks out the options specified on the PRIMT 
comaand line. 



DM SSCN : Verifies the existence of the 
returns its starting address. 



file and 



DMSPRT: Determines the record size to be printed 
and sets up an appropriate buffer area via a 
call to DMSFRE. 

DKSFRE: Obtains storage space to be used as a 
buffer. 

2MSPRT: Determines whether the file to be 
printed is a library member or an input file. 

DMSBRD: Reads a record; continues reading until 
the buffer is filled. When the buffer is 
filled, calls DMSPIO to issue the SIO 
instruction to begin the print operation. 

DMSPIO: Issues the print SIO instruction and 
then calls DMSIOW to wait until the the I/O 
operation completes. 

^M§1Q*5 Sets the wait bit for the virtual 
printer device and load the I/O old PSH from 
NUCON. This causes CMS to enter a wait state 
until the print operation completes. 

DMSITI: Ensures that the interrupt is for the 
printer. If not, the I/O old PSH is reloaded, 
returning CMS to a wait state. If the interrupt 
is for the printer, DMSITI resets the WAIT bit 
in the I/O old PSH and loads that PSH, returning 
control to DMSICH. 

DMSIOH; Places the symbolic name of the device 
in the last word of the PLIST and passes control 
to DMSPIO. 

DMSPIO: Performs channel testing and handles 
errors. TIO instructions and sense SIO 
instructions are issued during the test 
processing. These operations are synchronized 
using DMSIOH and DMSITI in the manner described 
above. Hhen the I/O completes successfully, 
control returns to DMSPRT. 

DMSPRT: Determines whether all file records have 
been printed. If so, control returns to the 
caller. Otherwise, the address of the buffer is 
updated and more print operations are 
performed. 



EliSisi ^arria^e Control Characters Used bj 
DMSPIO 



interpreted as ASCII control characters, have 
the following meanings: 

CI = Skip to channel 10 before print. 

C3 = Skip to channel 12 before print. 

The same characters, when interpreted as 
machine control characters, have the following 
meanings: 

CI = Hrite, then skip to channel 8 after 
print. 



C3 = Do not write, 
immediately. 



but skip to channel 8 



In printing lines containing carriage control 
characters, CMS has the capability of operating 
in two modes. In the first mode, which may be 
called ASCII control characters or machine 
control characters of either type are recognized 
and properly interpreted, except that the two 
conflicting characters are always interpreted as 
ASCII control characters. In the second mode, 
which may be called machine-only, only machine 
control characters are recognized, and the two 
conflicting characters are treated as machine. 

The DMSPIO function uses a bit in the plist 
to indicate which of the two nodes is in effect 
for printing. 

The PRINTL macro always uses ASA control 
character or machine control character mode. 

The PRINT command with the CC option always 
runs in ASCII control character or machine 
control character mode. 

OS simulation output, which is used, for 
example, by the MOVEFILE command, uses the RECFM 
field in the DCB or in the FILEDEF command to 
determine which mode is to be used. If FA, VA , 
or UA is specified, then ASCII control character 
or machine control character mode is used. If 
FM, VM, or OM is specified, then machine-only 
mode is used. If no control character 
specification is included with the RECFM, then 
it is assumed that the output line begins with a 
valid data character, rather than with a control 
character, and single spacing is always used. 



HANDLE INTERRUPTIONS 



Figure 40 lists the CMS modules that process 
interruptions for CMS. CMS modules are 
described briefly in "CMS Module Description." 
SVC 9 interruption processing is described in 
"Maintaining an Interactive Console 
Environment." 



CMS supports the use of ASCII control characters 
and machine carriage control characters for the 
printed output. Part of the CMS implementation 
depends upon the fact that the set of ASCII 
control characters has almost nothing in common 
with the set of machine control characters. 
There are two exceptions to this, the characters 
X'CI' and X'C3'. These two characters, when 



DISK I/O IN CMS 



Files residing on disk are read and written 
using DMSDIO. DMSDIO has two entry points: 
DMSDIOR, which is entered for a read I/O 
operation, and DMSDIOH, which is entered for a 
write operation. 
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The actual disk I/O operation is performed 
using the DIAGNOSE code 18 instruction. A 
return code of from CP indicates a successful 
completion of the I/O operation. If the I/O is 
not successful, CP performs error recording, 
retry, recovery, or ABEND procedures for the 
virtual machine. 



l£§^ 21 ESiite Disk 1^0 



DMSDIO: Initializes the CCH to perform read 
operations. 

DHSLAD: Obtains the address of the disk from 
which to read or write. 

DMSDIO: Determines the size of the record to be 
read or written. 

DMSFRE: Gets enough storage to contain the 
record if the reguest is for a record longer 
than 800 bytes. 

DMSDIO: Reads records continually until all 
records for the file have been read. 

DMSFRE: Returns the buffer to free storage if 
the record was longer than 800 bytes. 

DMSDIO: Returns to the caller. 



is, this segment must consist only of 
reentrant code, and may not be modified under 
any circumstances. This fact implies certain 
system restrictions for functions which 
reguire that storage be modified, such as the 
fact that DEBUG breakpoints or CP ADSTOP 
commands cannot be placed in this segment, in 
a saved system. 

User program area (X'20000' to loader tables) 
- User programs are loaded into this area by 
the LOAD command. Storage allocated by means 
of the GEIMAIN macro instruction is taken 
from this area, starting from the high 
address of the user program. In addition, 
this storage area can be allocated from the 
top down by DMSFREE, if not enough storage is 
available in the low-core DMSFREE storage 
area. Thus, the effective size of the user 
program area is reduced by the amount of free 
storage which has been allocated from it by 
DMSFREE. 

Loader tables (top pages of storage) - The 
top of storage is occupied by the loader 
tables, which are reguired by the CMS 
loader. These tables indicate which modules 
are currently loaded in the user program area 
(and the transient program area after a LOAD 
command) . The size of the loader tables can 
be varied by the SET LDRTBLS command. 



Tjfies of Allocated Free Storage 



MANAGE CMS FREE STORAGE 



DMSFRE handles requests for CMS free storage. 
The sections of CMS storage have the following 
uses: 

• DMSMUC (X« 00000* to approximately X«03000») - 
This is the nucleus constant area. It 
contains pointers, flags, and other data 
maintained by the various system routines. 

• Low-core DMSFREE free storage area 

(approximately X«03000« to X'OEOOO') - This 
area is a free storage area, from which 
reguests from DMSFREE are allocated. The top 
part of this area contains the file directory 
for the system disk (SSTAT) . If there is 
enough room (as there will be in most cases) , 
the FREETAB table also occupies this area, 
just below the SSTAT. 

• Transient program area (X'OEOOO* to x« 10000') 
- Because it is not essential to keep all 
nucleus functions resident in storage all the 
time, some of them are made "transient." 
This means that when they are needed, they 
are loaded from the disk into the transient 
program area. Such programs may not be 
longer than two pages, because that is the 
size of the transient area. (A page is 4096 
bytes of virtual storage.) 

• CMS nucleus (X* 10000' to X'20000') - Segment 
1 of storage contains the reentrant code for 
the CMS nucleus routines. In shared CMS 
systems, this is the protected segment. That 



Free storage can be allocated by means of the 
GETMAIN or DMSFREE macros. 

Storage allocated by means of the GETMAIN 
macro is taken from the user program area, 
beginning with the high address of the user 
program. 

Storage allocated by means of the DMSFREE 
macro can be taken from several areas: 

First, DMSFREE reguests are allocated from 
the low-address free storage area. If reguests 
cannot be satisfied from there, they will be 
satisfied from the user program area. 

In addition, requests are further broken down 
between reguests for user storage and nucleus 
storage, as specified in the TYPE parameter of 
the DMSFREE macro. These two types of storage 
are kept in separate 4K pages. It is possible, 
if there are no 4K pages completely free in low 
storage, for no storage of one type to be 
available in low storage, while there is storage 
of the other type available there. 



GETMAIN Free S^ora^e Management Pointers 



All GETMAIN storage is allocated in the user 
program area, starting from the end of the 
user's actual program. Allocation begins at the 
location pointed to by NOCON pointer MAINSTRT. 
The location MAINHI6H in NUCON is the pointer to 
the highest address of GETMAIN storage. 
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when the STfilHIT macro is executed, both 
BAINSTET and HAINHIGH are initialized to the end 
of the user's program, in the user program area. 
As storage is allocated from the user program 
area to satisfy GETMAIN requests, the HAINHIGH 
pointer is adjusted upward. Such adjustments 
are always in multiples of doublewords, so that 
this pointer is always on a doubleword 
boundary. As the allocated storage is released, 
this pointer is adjusted downward. 

The pointer HAINHIGH can never be higher than 
FHEELOHE, the pointer to the lowest address of 
EMSFREE storage allocated in the user program 
area. If a GETHAIN request cannot be satisfied 
without extending HAINHIGH above PREELOHE, 
GETMAIN takes an error exit, indicating that 
insufficient storage is available to satisfy the 
request. 

The area between HAINSTRT and HAINHIGH may 
contain blocks of storage that are not 
allocated, and that are therefore available for 
allocation by a GETMAIN instruction. These 
blocks are chained together, with the first one 
pointed to by the NUCON location HAIHLIST. 

The format of an element on the GETHAIN free 
element chain is as follows: 



The FHEETAB free storage table is kept in 
free storage, usually just below the master 
file directory for the system disk. If there 
was no space available there, then FREETAB was 
allocated from the top of the user program area. 
This table contains one byte for each page of 
virtual storage. Each such byte contains a code 
indicating the use of that page of virtual 
storage. The codes in this table are as 
follows: 



SSEJiCODE (J) : If the page is assigned to user 
storage. 

NUCCODE (2) : If the page is assigned to nucleus 
storage. 

IIJCODE (3) : If the page is part of the 
transient program area. 

OSAHCODE (4) : If the page is part of the user 
program area. 

SYSCODE (5) : If the page is none of the above. 

In these cases, the page is assigned to 
system storage, system code, or the loader 
tables. 



— 4 bytes 



> 



0(0) 



4(4) 



FREPTR — pointer to next free | 

element in the chain, or | 

if there is no next element | 

FRELEN — length, in bytes, of | 

this element | 

I 

Remainder of this free element 



SISFREE Free Storage Pointers 



The pointers FREEDPPR and FREELOWE in NUCON 
indicate the amount of storage which DHSFREE has 
allocated from the high portion of the user 
program area. These pointers are initialized to 
the beginning of the system loader tables. 

The pointer FREELOWE is the pointer to the 
lowest address of DHSFREE storage in the user 
program area. As storage is allocated from the 
user program area to satisfy DHSFREE requests, 
this pointer is adjusted downward. Such 
adjustments are always in multiples of 4K, so 
that this pointer is always on a 4K boundary. 
As the allocated storage is released, this 
pointer is adjusted upward when whole 4K pages 
are completely free. 

The pointer FREELOWE can never be lower than 
HAINHIGH, the pointer to the highest address of 
GETMAIN storage. If a DHSFREE request cannot be 
satisfied without extending FREELOWE below 
HAINHIGH, then DHSFREE takes an error exit, 
indicating that insufficient storage is 
available to satisfy the request. 



Other DHSFREE storage pointers are maintained 
in the DHSFRT control section, in NUCON. The 
most important fields there are the four chain 
header blocks. 

Four chains of elements are not allocated to 
be associated with DHSFREE storage: The 
low-storage nucleus chain, the low-storage user 
chain, the high-storage nucleus chain, and the 
high-storage user chain. For each of these 
chains, exists a control block consisting of 
four words, with the following format: 



0(0) 



4(4) 



8(8) 



12(C) 



— 4 bytes 

POINTER — pointer to the first 
free element on the chain, or 
zero, if the chain is empty. 



NUH 



the number of elements on 
the chain. 



HAX — the value in this word is 
the size of the largest free 
element on the chain. 

FLAGS- I SKEY - | TCODE -| Unused 
Flag (Storage | FHEETAB | 
byte I key | code | 



These fields have the following meanings and 
uses: 

POINTER This field points to the first element 
on this chain of free elements. If 
there are no elements on this free 
chain, then the POINTER field contains 
a zero. 
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MUM This field contains the number of 
elements on this chain of free 
elements. If there are no elements on 
this free chain, then this field 
contains a zero. 

MAX This field is used for the purpose of 
avoiding searches which will fail. It 
contains the size, in bytes, of the 
largest element on the free chain. 
Thus, a search for an element of a 
given size will not be made if that 
size exceeds the MAX field. 






— 4 bytes 



I 
0(0) I 



I 
4(4) I 

I 



POINTER — pointer to the next 
element in the free chain 



SIZE — size of this free 
element, in bytes 



-> 

I 
I 
I 

-f 



I Remainder of this free element j 



FLAGS The following flags are used: 

FLCLN (X«80') 

Clean-up flag - This flag is set if the 
chain must be cleaned up. This is 
necessary in the following circumstances: 

- If one of the two high-core chains 
contains a 4K page that is pointed to by 
FBEELOWE, then that page can be removed 
from the chain, and FREELOWE can be 
increased. 

- All completely non— allocated 4K pages 
are kept on the user chain, by convention. 
Thus, if one of the nucleus chains 
(low-core or high-core) contains a full 
page, then this page must be transferred 
to the corresponding user chain. 

FLCLB(X«40') 

Clobbered flag - Set if the chain has been 
destroyed. 

FLHC (X«20«) 

High-core chain - Set for both the nucleus 
and user high-core chains. 

FLHU (X'10«) 

Nucleus chain - Set for both the low-core 
and high-core nucleus chains. 

FLPA (X»08») 

Page available - This flag is set if there 
is a full 4K page available on the chain. 
Note that this flag may be set even if 
there is no such page available. 

SKEY This one-byte field contains the storage 
key assigned to storage on this chain. 

TCODE This one-byte field contains the FREETAB 
table code for storage on this chain. 



Each element on 
following format: 



the free chain has the 



When the user issues a variable length 
GETHAIN, the control program reserves 6 1/2 
pages for CMS usage; this is a designed and set 
value. If the user wants more space, for 
example, for more directories, he should free up 
from the high end of storage some of the 
variable GETMAIN area. 

As indicated in the illustration above, the 
POINTER field points to the next element in the 
chain, or contains the value zero if there is no 
next element. The SIZE field contains the size 
of this element, in bytes. 

All elements within a given chain are chained 
together in order of descending storage address. 
This is done for two reasons: 

1. Because the allocation search is satisfied 
by the first free element that is large 
enough, the allocated elements are grouped 
together at the top of the storage area, 
and prevent storage fragmentation. This is 
particularly important for high-storage 
free storage allocations, because it is 
desirable to keep FREELCHE as high as 
possible. 

2. If free storage does become somewhat 
fragmented, the search causes as few page 
faults as possible. 

As a matter of convention, completely 
nonallocated 4K pages are kept on the user chain 
rather than the nucleus chain. This is because 
reguests for large blocks of storage are made, 
most of the time, from user storage rather than 
from nucleus storage. Nucleus reguests need to 
break up a full page less freguently than user 
reguests. 



DMSFRE Method of Operation 



A description of the algorithms which allocate 
and release blocks follows. The descriptions 
are based on the assumption that neither 
AREA=LOW nor AREA=HIGH was specified in the 
DMSFREE macro call. If either was specified, 
then the algorithm must be appropriately 
modified. 

ALLOCATING USER FREE STORAGE: When DMSFREE with 
TYPE=USER~(the default) is called, the following 
steps are taken to satisfy the reguest. As soon 
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as one of the steps succeeds, then processing 
can terminate. DMSFRE: 

1. Searches low-storage user chain for a block 
of the required size. 

2. Searches the high-storage user chain for a 
block of the required size. 

3. Extends high-storage user storage downHard 
into the user program area, modifying 
FREELOWE in the process. 

4. For fixed requests, there is nothing more 
to try. For variable requests, DMSFRE puts 
all available storage in the user program 
area onto the high-storage user chain, and 
then allocates the largest block available 
on either the high-storage user chain or 
the low-storage user chain. The allocated 
block is not satisfactory, if it is not 
larger then the minimum requested size. 



ALLOCATING NUCLEUS FREE STORAGE: Hhen DMSFREE 
with TYPE=NUCLEUS is called, the following steps 
are taken in an attempt to satisfy the request, 
until one succeeds. DMSFREE: 



1. 



Searches the low-storage nucleus chain for 
a block of the required size. 



2. Gets free pages from low-storage user 
chain, if any are available, and removes 
them to the low-storage nucleus chain. 

3. Searches the highstorage nucleus chain for 
a block of the required size. 

4. Gets free pages from the high-storage user 
chain, if they are available, and removes 
them to the highstorage nucleus chain. 

5. Extends high-storage nucleus storage 
downward into the user program area, 
modifying FREELOWE in the process. 

6. For fixed requests, there is nothing more 
to try. For variable requests, DMSFRE puts 
all available pages from the user chains 
and the user program area onto the nucleus 
chains, and allocates the largest block 
available on either the low-storage nucleus 
chains or the high-storage nucleus chains. 

RELEASING STORAGE: When DMSFRET is called, the 
block being released is placed on the 
appropriate chain. At that point, the cleanup 
operation is performed, if necessary, to advance 
FREELOWE, or to move pages from the nucleus 
chain to the corresponding user chain. 

Similar cleanup operations are performed, 
when necessary, after calls to DMSFREE, as 
well. 



1. User fixed storage requests, any size. 

2. Nucleus fixed storage requests, for small 
blocks (less than one page in size) . 

3. Nucleus fixed storage request, for large 
blocks. 

4. User variable storage requests. (Variable 
requests are no less efficient than fixed 
requests, if the maximum block size 
requested can be allocated.) 

5. Fixed variable storage requests, if the 
maximum block size requested cannot be 
allocated. 



Releasing Allocated Storaae 



STORAGE ALLOCATED BY GETMMJ: Storage allocated 
by the GETMAIN macro instruction may be released 
in any of the following ways: 

• A specific block of such storage may be 
released by means of the FREEHAIN macro 
instruction. 

• The STRINIT macro instruction releases all 
storage allocated by any previous GETMAIN 
requests. 

• Almost all CMS commands call the STRINIT 
routine. Thus, executing almost any CMS 
coBmand causes all GETMAIN storage to be 
released . 



STORAGE ALLOCATED BY DMSFREE: Storage allocated 
by the DMSFREE macro instruction may be released 
in either of the following ways: 

• A specific block of such storage may be 
released by means of the DMSFRET macro 
instruction. 

• Whenever any user routine or CMS command 
abends (so that the routine DMSABN is 
entered) , and the ABEND recovery facility of 
the system is invoked, all DMSFREE storage 
with TYPE=USER is released automatically. 

Except in the case of ABEND recovery, storage 
allocated by the DMSFREE macro is never released 
automatically by the system. Thus, storage 
allocated by means of this macro instruction 
should always be released explicitly by means of 
the DMSFRET macro instruction. 



DMSFRE Service Routines 



J§i§iil§ IJliciency of DMSFREE Requests 



The system uses the DMSFRES macro instruction to 
request certain free storage management 
services. The options and their meanings are as 
follows: 



The types of DMSFREE request in decreasing order • INIT1 — DMSINS calls this option to invoke the 
of efficiency, are as follows: first free storage initialization routine, to 
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allow free storage requests to access the 
system disk. Before this routine is invoked, 
no free storage requests nay be made. After 
this routine has been invoked, free storage 
requests may be made, but these are subject 
to the following restraints until the second 
free storage management initialization 
routine has been invoked: 



All requests for user storage are changed 
to requests for nucleus storage. 

Only partial error checking is performed 
by the DMSFRET routine. In particular, it 
is possible to release a block that was 
never allocated. 

All requests that are satisfied in high 
storage must be temporary, because all 
high storage allocated is released when 
the second free storage initialization 
routine is invoked. 



When CP's saved system facility is used, 
the CMS system is saved at the point just 
after the system disk has been accessed. 
This means that it is necessary for DMSFRE to 
be used before the size of virtual storage is 
known, because the saved system can be used 
on any size virtual machine. Thus, the first 
initialization routine initializes DMSFRE so 
that limited functions can be requested, 
while the second initialization routine 
performs the initialization necessary to 
allow the full functions of DMSFRE to be 
requested. 



CHECK — This option can be called at any time 
for system debugging purposes. It invokes a 
routine that performs a thorough check of all 
free storage chains for consistency and 
correctness. Thus, it checks to see whether 
any free storage pointers have been 
destroyed. 

CKON — This option turns on a flag which 
causes the CHECK routine described in the 
preceding paragraph to be invoked each time 
any call is made to DMSFREE or DMSFRET. This 
can be useful to pinpoint a problem that is, 
for example, destroying free storage 
management pointers. Care should be taken 
when using this option, because the CHECK 
routine is coded to be thorough rather than 
efficient. Thus, after the CKON option has 
been invoked, each call to DMSFREE or DMSFRET 
takes many times as long to be completed as 
before. This can impact the efficiency of 
system functions. 

CKOFF — Dse of this option turns off the flag 
that was turned by the CKON option, described 
in the preceding paragraph. 

DREC — This option is called by DMSABN during 
the ABEND recovery process to release all 
DSER storage. 

CALOC — This option is called by DMSABN after 
the ABEND recovery process has been 
completed. It invokes a routine that 
returns, in register 0, the number of 
doublewords of free storage that have been 
allocated. This figure is used by DMSABN to 
determine whether ABEND recovery has been 
successful. 



INIT2 — This option is called by DMSINS to 
invoke the second initialization routine. 
This routine is invoked after the size of 
virtual storage is known, and it performs the 
initialization necessary to allow all the 
functions of DMSFRE to be used. The second 
initialization routine performs the following 
steps: 



Releases all storage that has 
allocated in the highstorage area. 



been 



Allocates the FREETAB free storage table. 
This table contains one byte for each 
U096-byte page of virtual storage, and so 
cannot be allocated until the size .of 
virtual storage is known. It is allocated 
in the low— address free storage area, if 
there is enough room available. If not, 
then it is allocated in the higher free 
storage area. For a 256K virtual machine, 
FREETAB contains 61 bytes; for a 16 
million byte machine, it contains U096 
bytes. 

The FREETAB table is initialized, and all 
storage protection keys are initialized. 

All completely non-allocated UK pages on 
the nucleus free storage chain are removed 
to the user chain. Any other necessary 
cleaning up operations are performed. 



Storage Protection Keys 



In general, the following rule applies: system 
storage is assigned the storage key of X'F', 
while user storage is assigned the key of X'E*. 
This is the storage key associated with the 
protected areas of storage, not to be confused 
with the PSM or CAW key used to access that 
storage. 

The specific key assignments are as follows: 

• The NOCON area is assigned the key of X'F', 
with the exception of a half-page containing 
the OPSECT and TSCBLOKS areas, which has a 
key of X'E'. 

• Free storage allocated by DMSFREE is broken 
up into user storage and nucleus storage. 
The user storage has a protection key of 
X'E', while the nucleus storage has a key of 
X'F'. 



The transient 
X'E' . 



program area has a key of 



The CMS nucleus code has a storage key of 
X'F'. In saved systems, this entire segment 
is protected by CP from modification even by 
the CMS system, and so must be entirely 
reentrant. 
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The user progran area is assigned the storage 
key of X'E', except for those pages which 
contain Nucleus DMSFREE storage. These 
latter pages are assigned the key of X'F'. 



of 



The loader tables are assigned the key 
X'F". 



CMS System Handling of PSW Keys 



The CMS nucleus protection scheme protects the 
CMS nucleus fron inadvertent destruction by a 
user program. This mechanism, however, does not 
prevent a user from writing in system storage 
intentionally. Because a CMS user can execute 
privileged instructions, he can issue a LOAD PSH 
(LPSW) instruction and load any PSU key he 
wishes. If a user defeats nucleus protection in 
this way there is nothing to prevent his program 
from: 

• Modifying nucleus code 

• Modifying a table or constant area 



Losing files 
directory 



by modifying 



CMS 



file 



In general, user programs and disk-resident 
CMS commands run with a PSW key of X'E', while 
nucleus code runs with PSW key of X'0«. 

There are, however, some exceptions to this 
rule. Certain disk-resident CMS commands run 
with a PSW key of X«0', because they need to 
modify nucleus pointers and storage. On the 
other hand, the nucleus routines called by the 
GET, PUT, READ and WRITE macros run with a user 
PSW key of X'E', to increase efficiency. 



TWO macros, DMSKEY and DMSEXS, 
for changing the PSH key. The 
changes the PSW key to the user 
nucleus value. DMSKEY HUCLEDS 
current PSW key to be placed in a 
value of to be placed in the PS 
USER causes the current PSW key t 
a stack, and a value of X'E' to be 
PSW key. DMSKEY RESET causes the 
the DMSKEY stack to be removed a 
into the PSW. 



are available 

DMSKEY macro 

value or the 

causes the 

stack, and a 

W key. DMSKEY 

o be placed in 

placed in the 

top value in 

nd re-inserted 



It is a CHS requirement when a routine 
terminates, that the DMSKEY stack must be empty. 
This means that a routine should execute a 
EMSKEY RESET macro instruction for each DMSKEY 
NUCLEUS macro instruction and each DMSKEY USER 
macro instruction executed by the routine. 

The DMSKEY key stack has a maximum depth of 
seven for each routine. In this context, a 
"routine" is anything invoked by an SVC call. 
The DMSEXS ("execute in system mode") macro 
instruction is useful in situations where a 
routine is running with a user PSW key, but 
wishes to execute a single instruction with the 
nucleus PSW key. The single instruction may be 
specified as the argument to the DMSEXS macro, 
and that instruction is executed with a system 
PSW key. 



CP Handling For Saved Systems 



The explanation of saved system nucleus 
protection depends on the VSK, RSK, VPK and RPK: 

1. Virtual Storage Key (VSK) - This is the 
storage key assigned by the virtual machine 
using the virtual SSK instruction. 

2. Real Storage Key (RSK) - This is the actual 
storage key assigned by CP to the 2K 
page. 

3. Virtual PSW Key (VPK) - This is the PSW 
storage key assigned by the virtual 
machine, by means of an instruction such as 
LPSW (Load PSW). 

H. Real PSW Key (RPK) - This is the PSW 

storage key assigned by CP, which is in the 

real hardware PSW when the virtual machine 
is running. 



When there are no shared 
virtual machine, then storage 
as it does on a real machine, 
pages, and RPK=VPK for the PSW. 



segments in the 

protection works 

RSK=VSK for all 



However, when 
in the case of 
system) , it is n 
shared segment, 
does this by, es 
of the VSKs and 
values as follows 
shared segment, 
RPK=F, always, 
instruction is i 
value in a table 
later does an ISK 



there is a shared segment (as 
segment 1 of CMS in the saved 
ecessary for CP to protect the 
For non-CMS shared systems, it 
sentially, ignoring the values 

VPK, and assigning the real 

RSK=0 for each page of the 

RSK=F for all other pages, and 

for the real PSW. The SSK 

gnored, except to save the key 

in case the virtual machine 

to get it back. 



For the CMS saved system, the RSKs and RPK 
are initialized as before, but resetting the 
virtual keys has the following effects: 

• If the virtual machine uses an SSK 
instruction to reset a VSK, CP does the 
following: If the new VSK is nonzero, CP 
resets the RSK to the value of the VSK; if 
the new VSK is zero, CP resets RSK to F. 

• If the virtual machine uses a LP;s^ (or other) 
instruction to reset the VPK-/ CP does the 
following: If the new VPK is 4ero, CP resets 
the RPK to the value of the VPK; if the new 
VPK is zero, CP resets RPK to F. 

• If the VPK=0 and the RPK=F, storage 
protection may be handled differently. In a 
real machine, a PSW key of would allow the 
program to store into any storage location, 
no matter what the storage key. But under 
CP, the program gets a protection violation, 
unless the RPK of the page happens to be F. 

Because of this, there' is extra code in the 
CP program check handling routine. Whenever 
a protection violation occurs, CP checks to 
see if the following conditions hold: 



The virtual machine running is the saved 
CMS system, running with a shared 
segment. 
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The VPK = 0. The virtual machine is 
operating as though its PSW key is 0. 

The HSK of the page into which the store 
was attempted is nonzero, and different 
from the BPK. 

If any one of these three conditions fails to 
hold, then the protection violation is reflected 
back to the virtual machine. 

If all three of these conditions hold, then 
the RPK (the real protection key in the real 
PSH) is reset to the RSK of the page into which 
the store was attempted. 



EFFECT OM CMS: In CMS, this works as follows: 
CMS keeps its system storage in protect key F 
(RSK = VSK = F) , and user storage in protect key 
E (RSK = VSK = E) . 



When the CMS supervisor is run 
in PSH key (VPK = 0, RPK = F) 
gets a protection violation the 
tries to store into user storage 
E) . At that point, CP changes the 
lets the virtual machine re 
instruction which caused th 
violation. There is not anoth 
violation until the supervisor 
storing into system-protected stor 



ning, it runs 
, so that CMS 
first time it 
(VSK = RSK = 
RPK to E, and 
-execute the 
e protection 
er protection 
goes back to 
age. 



RESTRICTIONS CH CMS: There are several coding 
restrictions which must be imposed on CMS if it 
is to run as a saved system. 

The first and most obvious one is that CMS 
may never modify segment 1, the shared segment, 
which runs with a RSK of 0, although the VSK = 
F. 

A less obvious, but just as important, 
restriction, is that CMS may never modify with a 
single machine instruction (except MVCL) a 
section of storage which crosses the boundary 
between two pages with different storage keys. 
This restriction applies not only to SS 
instructions, such as MVC and ZAP, but also to 
RS instructions, such as STM, and to RX 
instructions, such as ST and STD, which may have 
nonaligned addresses on the System/370. An 
exception is the MVCL instruction which can be 
restarted after crossing a page boundary because 
the registers are updated when the paging 
exception occurs. 

This restriction also applies to I/O 
instructions. If the key specified in the CCH 
is zero, then the data area for input may not 
cross the boundary between two pages with 
different storage keys. 

CVERHEAD: It can be seen that this system is 
most inefficient when "storage-key thrashing" 
occurs — when the virtual machine with a VPK of 
jumps around, storing into pages with 
different VSK's. 



MLE9E Codes from DMSFREE, DMSFRES, and DMSFRET 

A nonzero return code, upon return from DMSFRES, 
DMSFREE or DMSFRET, indicates that the request 



could not be satisfied. Register 15 contains 
this return code, indicating which error has 
occurred. The codes below apply to the DMSFRES, 
DMSFREE and DMSFRET macros. 



Code 
1 



Error 
DMSFREE — Insufficient storage space is 
available to satisfy the request for free 
storage . In the case of a variable 
request, even the minimum request could 
not be satisfied. 



DMSFREE or DMSFRET 
pointers destroyed. 

DMSFREE or DMSFRET - 
pointers destroyed. 



User storage 
Nucleus storage 



DMSFREE — An invalid size was requested. 
This error exit is taken if the requested 
size is not greater than zero. In the 
case of variable requests, this error 
exit is taken if the minimum request is 
greater than the maximum request. 
However, the error is not detected if 
DMSFREE is able to satisfy the maximum 
request. 

DMSFRET — An invalid size was passed to 
the DMSFRET macro. This error exit is 
taken if the specified length is not 
positive. 

DMSFRET — The block of storage which is 
being released was never allocated by 
DMSFREE. Such an error is detected if 
one of the following errors is found: 

a. The block is not entirely inside 
either the free storage area in low 
storage or the user program area 
between FREELOHE and FREEOPPR. 

b. The block crosses a page- boundary 
which separates a page allocated for 
user storage from a page allocated for 
nucleus type storage. 

c. The block overlaps another block 
already on the free storage chain. 

DMSFRET — The address given for the 
block being released is not a doubleword 
boundary. 

DMSFRES — An illegal request code was 
passed to the DMSFRES routine. Because 
all request codes are generated by the 
DMSFRES macro, this error code should 
never appear. 



DMSFRE, DMSFRET, or DMSFRES — 
unexpected internal error occurred. 



An 



The DMSFRES Macro 



CMS uses the DMSFRES macro to request special 
internal free storage management services. Ose 
of this macro by non-system routines causes 
unpredictable results. The format is: 
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option 

where 'option* is one of the following: 

INIT1 Perforos the CMS system 
initialization routine. 

INIT2 Performs the CMS system 
initialization routine. 



first 



second 



CHECK Invokes a routine that checks the 
validity of all current free storage 
management pointers. 

CKON Sets a flag that causes the CHECK to be 
invoked for each call to DMSFBEE or 
DHSFRET. 

CKOFF Turns off the above flag. 

UREC Assists ABEND recovery, by releasing all 
USER-type DMSFREE storage allocations. 

CALOC Assist ABEND recovery, by computing the 
total amount of allocated storage, 
excluding the system disk MFD and the 
FREETAB table. 

For a full discussion of the meanings of 
these options, refer to "DMSFRE Service 
Routines. " 



The DMSKEY Macro 



option should be used only by system 
routines that should enter a user exit 
routine. 

NOSTACK This option may be used with any of 
the above options to prevent the 
system from saving the second byte of 
the current PSW in a stack. If this 
is done, then no DMSKEY RESET need be 
issued later. 

RESET The second byte of the PSW is changed 
to the value at the top of the PSH key 
stack, and removed from the stack. 
Thus, the effect of the last DMSKEY 
NUCLEUS or USER or LASTUSER reguest is 
reversed. This option should may not 
be used to reverse the effect of a 
DMSKEY macro for which the NOSTACK 
option was specified. A DMSKEY RESET 
macro must be executed for each DMSKEY 
NUCLEUS, USER or LASTUSER macro that 
was executed and that did not specify 
the NOSTACK option. Failure to 
observe this rule results in program 
abnormal termination. 



The DMSEXS Macro 



system commands running in user protect status 
use the DMSEXS macro to execute a single 
instruction with a system protect key in the 
PSW. This macro instruction can be used in lieu 
of two DMSKEY macros. The format is: 



CMS uses the DMSKEY macro to modify the PSH 

storage protection key so that the nucleus code 

can store data into protected storage. The 
format is: 



I [label] I DMSEXS | op-code , operands 



I DMSKEY I {NUCLEUS[ , NOSTACK]! 

I I USER[, NOSTACK] I 

I I LASTDSER[ , NOSTACK]! 

! I RESET} 






I [label] 
I 



where: 

NUCLEUS The nucleus storage protection key is 
placed in the PSW, and the old 
contents of the second byte of the PSW 
is saved in a stack. Use of this 
option allows the program to store 
into system storage, which is 
ordinarily protected. 

USER The user storage protection key is 
placed in the PSW, and the old 
contents of the second byte of the PSW 
is saved in a stack. Use of this 
option prevents the program from 
inadvertently modifying nucleus 
storage, which is protected. 

LASTUSER The SVC handler traces back through 
its system save areas for the active 
user routine closest to the top of the 
stack, and the storage key in effect 
for that routine is placed in the PSW. 
The old contents of the second byte of 
the PSW is saved in a stack. This 



The op— code and the operands of the 
instruction to be executed must be given as 
arguments to the DMSEXS macro. 

For example, execution of the seguence, 

USING NUCON,0 

DMSEXS OI,OSSFLAGS,COHPSWT 

would cause the 01 instruction to be executed 
with a zero protect key in the PSW. This 
seguence would turn on the COMPSWT flag in the 
nucleus. It would be reset with 

DMSEXS NI,0SSFLAGS,255-C0MPSWT 

The instruction to be executed may be an EX 
instruction. 

Register 1 cannot be used in any way in the 
instruction being executed. 



SIMULATE NON-CMS OPERATING ENVIRONMENTS 



The following contains descriptions for: access 
method support for non-CMS operating systems, 
CMS simulation of OS functions, and CMS 
implementation of DOS/VS functions. 
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ACCESS METHOD SUPPORT FOR NON-CMS OPERATING 
ENVIRONMENTS 

OS Access Method Su££ort 



An access method governs the manipulation of 
data. To make the execution of OS generated 
code easier under CMS, the processing program 
must see data as OS would present it. For 
instance, when the processors expect an access 
method to acguire input source records 
sequentially, CBS invokes its sequential access 
method and passes data to the processors in the 
format that the OS access methods would have 
produced. Therefore, data appears in storage as 
if it had been manipulated using an OS access 
method. For example, block descriptor words 
(BDW) , buffer pool management, and variable 
records are maintained in storage as if an OS 
access method had processed the data. The 
actual writing to and reading from the I/O 
device is handled by CMS file management. 

The work of the volume table of contents 
(VTOC) and the data set control block (DSCB) is 
done by a master file directory (MFD) to 
maintain disk contents and a file status table 
(FST) for each data file. All disks are 
formatted in physical blocks of 800 bytes. 



CMS continues to maintain the OS format, 
within its own format, on the auxiliary device, 
for files whose filemode number is 4. That is, 
the block and record descriptor words (BDH and 
RDW) are written along with the data. If a data 
set consists of blocked records, the data is 
written to and read from the I/O device in 
physical blocks, rather than logical records. 
CMS also simulates the specific methods of 
manipulating data sets. 

TO accomplish this simulation, CMS supports 
certain essential macros for the following 
access methods: 

• EDAM (direct) — identifying a record by a key 

or by its relative position within the 
data set. 

• BPAH (partitioned) --seeking a named member 

within an entire data set. 

• BDAM/QSAM (sequential) — accessing a record in 

a sequence relative to 

• VSAM (direct or sequential) — accessing a 

record sequentially or directly by key 
or address. CMS support of OS VSAM 
files is based on DOS/VS access method 
services and the virtual storage access 
method (VSAM). Therefore, the OS user 
is restricted to those services 
available under DOS/VS AMS and VSAM. 



CMS SDPPORT FOR THE VIRTUAL STORAGE ACCESS 
iilHOD 



CMS simulation of OS and DOS includes support 
for the virtual storage access method (VSAM) . 



The description of this support is in three 
parts: 



A description of the access method services 
program (AMSERV) , which allows you to create 
and update VSAM files. 

A description of support for VSAM functions 
under CMS/DOS. 

A description of support for VSAM functions 
for the CMS OS simulation routines. 



The routines that support VSAM reside in 
three discontiguous shared segments (DCSSs) . 

- The CMSAMS DCSS, which contains the DOS/VS 
AMS code to support AMSERV processing. 

The CMSVSAM DCSS, which contains actual 
DOS/VS VSAM code, and the CMS/VSAM OS 
interface program for processing OS VSAM 
requests . 

- The CMSDOS DCSS, which contains the code 
that supports DOS requests under CMS. 



Note: DMSVSR, which performs completion 
processing for CMS/VSAM support, resides in the 
CMS nucleus. 



CREATING THE DOSCB CHAIN 



The DLBL command creates a control block called 

a DOSCB in CHS free storage. The ddnane 

specified in this DLBL command is associated 

with the ddname parameter in the program's ACB. 



The DOSCB contains information defining the 
file for the system. The information in the 
DOSCB parallels the information written on the 
label information cylinder of a real DOS SYSRES 
unit, e.g. the name, and mode (volume serial 
number) of the data set, its logical unit 
specification, and its data set type (SAM or 
VSAM) . The anchor for this chain is at location 
DOSFIRST in NUCON. 



EXECUTING AN AMSERV FUNCTION 



The CMS AMSERV command invokes the module 
DMSAMS, which is the CMS interface to the DOS/VS 
access method services (AMS) program. Module 
DMSAMS loads DOS/VS AMS code contained in the 
CMSAMS DCSS by means of the LOADSTS DIAGNOSE 
64. The AMS code requires the services of 
DOS/VS code that resides in the CMSVSAM DCSS so 
that DCSS is also loaded via LOADSYS DIAGNOSE 64 
when the VSAM master catalog is opened. Figure 
51 shows the relationship in storage between the 
interface module DMSAMS and the CMSAMS and 
CMSVSAM DCSSs. 
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Figure 51. Relationship in Storage Between the CMS Interface Module 
CMSVSAM DCSSS 



DMSAMS and the CMSAMS and 



The following is a general description of the 
CMSAMS nethod of operation. 

DMSAMS first determines whether the user is 
in the CMS/DOS environment. If not, a SET DOS 
ON (VSAM) command is issued to load the CMSDOS 
segment and initialize the CMS/DOS environment. 
In this case, DMSAMS must also issue ASSGN 
commands for the disk modes in the DOSCB chain 
created by the OS user's ELBL commands. An 
ASSGN is also issued for SYSCAT, the VSAM master 
catalog. 

DMSAMS then issues the ASSGN command for the 
SYSIPT and SYSLST files, assigning them to the 
user's A-disk. DLBL commands are then issued 
associating these units with files on the user's 
A-disk. Input to the AMSEBV processor is the 
SYSIPT file, which has the filetype AMSERV. 
Output from AMSEBV processing is placed in the 
SYSLST file, which has a filetype of LISTING. 

DIAGNOSE 6a (LOADSYS) is then issued to load 
the CMSAMS DCSS, which contains the DOS/VS AMS 
code. A DOS/VS SVC 65 is issued to find the 
address of the DOS/VS AMS root phase, IDCAMS. 
Hhen the SVC returns with the address of IDCAMS, 
a branch is made to IDCAMS, giving control to 
"live" DOS/VS routines. 

IDCAMS expects parameters to be passed to it 
when it receives control. DMSAMS passes dummy 
parameters in the list labeled AMSPARMS. 

After the root phase IDCAMS receives control, 
the functions in the file specified by the 
filename on the AMSERV command are executed. 



In performing the functions requested in this 
file, AMS may require execution of DOS/VS VSAM 
phases located in the CMSVSAM DCSS. The CMSVSAM 
DCSS is loaded when AMS opens the VSAM catalog 
for processing. 



On return from DOS/VS code, DMSAMS purges the 
CMSAMS DCSS, and issues DLBL commands for the 
SYSIPT and SYSLST files to clear the DOSCB's for 
these ddnames. 



Control is then passed to DMSVSR, which 
purges the CMSVSAM DCSS. If the user program 
was not in the CHS/DOS environment when DMSAMS 
was entered, the SET DOS OFF command is issued 
by DMSVSR. Opon return from DMSVSR, DMSAMS 
performs minor housekeeping tasks and returns 
control to CMS. 



EXECUTING A VSAM FUNCTION FOR A DOS USER 



Nhen a VSAM function, such as an OPEN or CLOSE 
macro, is requested from a DOS program, CMS 
routes control through the CMSDOS DCSS to the 
CMSVSAM DCSS, thus giving control to DOS/VS VSAM 
phases. Figure 52 shows the relationships in 
storage between the user program, the CMSDOS 
DCSS, and the CMSVSAM DCSS. The description 
below illustrates the overall logic of that 
control flow. 
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Figure 52. The Relationships in Storage Between the User Program and the CMSDOS DCSS and the CMSVSAM 
DCSSs 



CHS/DOS SVC HANDLING 



DMSBOP VSAM Processing 



Modale DMSDOS handles all CMS/DOS SVCs. There 
are four CMS/DOS routines that handle VSAM 
requests: DMSDOS, DHSBOP, DMSCLS, and DMSXCP. 
Within DMSDOS, several SVC functions support 
VSAM requests. These are described in 
"Siaulating a DOS Environment Dnder CMS." 



ihen DMSBOP is entered to process ACBs, it 
checks to see if CMSVSAM is loaded. If VSAM has 
not been leaded, DIAGNOSE 64 is issued to load 
the CMSVSAM DCSS. DMSBOP then initializes the 
transient work area and issues a DOS OPEN via 
SVC 2 to bring the VSAM OPEN $$BOVSAM transient 
into the DOS transient area. 



DMSDOS VSAM Processina 



When VSAM processing completes, control 
returns to the user program directly. 



DMSDOS VSAM processing involves handling of SVC 
65 (CDLOAD) , which returns the address of a 
specified phase to the caller. DMSDOS searches 
both the shared segment table and the nonshared 
segment table for the CMSDOS and CMSVSAM 
segments, because both could be in use. Both of 
these segment tables contain the name of each 
phase comprising that segment followed by the 
fullword address of that phase within the 
segment. 



During SVC 65 processing, DMSDOS checks to 
see if the address of IKQLAB is being requested. 
IKQLAB is the VSAM routine that returns the 
label information generated by DLBLs and EXTENT 
cards in DOS/VS systems. If this is the case, 
DMSDOS saves the address of IKQLAB in NUCON for 
later use by DMSXCP. 



If VSAM has not been loaded, a DIAGNOSE 64 
(LOADSYS) is issued to load the CMSVSAM DCSS. 



DMSCLS VSAM Processing 



DMSCLS processing is nearly the same as 
processing for DMSBOP. When DMSCLS is entered, 
it checks for an ACB to process. If there is 
one, the $$BCVSAM transient work area is 
initialized and SVC 2 is issued to FETCH the 
VSAM CLOSE transient $$BCVSAH into the DOS 
transient area. When the VSAM CLOSE routines 
complete processing, control returns to the user 
program, as in the case of OPEN. 



DM SXCP VSAM Processing 



When DMSXCP processes an EXCP request, it 
determines if the request is from IKQLAB (i.e. 
to read the SYSEES label information) . If so, 
the label information area record is filled in 
from the appropriate DOSCB. (DMSXCP determines 
that the caller is IKQLAB by comparing the 
address of the caller with the address stored in 
NUCON by DMSDOS, as described above.) 
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EXECOTING A VSAM FUNCTION FOR AN OS USER 



OS user requests for VSAM services are handled 
by DOS/VS VSAM code that resides in the CMSVSAM 
DCSS. To access this code, OS VSAM requests are 
intercepted by the CMS nodule DMSVIP, the 
interface between the OS VSAM requests and the 
CMS/DOS and DOS/VS VSAM routines. 

Because DMSVIF is in the CMSVSAM segment, it 
is available only when that segment is loaded. 
Module DHSVIB, which resides in the CMS nucleus, 
is a bootstrap routine to load the CMSVSAM 
segment and pass control to DMSVIP. 

DMSVIP receives control from VSAM request 
macros in three ways: via SVC (e.g. OPEN and 
CLOSE) , via a direct branch using the address of 
DMSVIP in the ACB, and via a direct branch to 
the location of DMSVIP whose address is 256 
bytes into the CMSCVT (CMSCVT is a CMS control 
block that simulates the OS CVT control block) . 



This last technique is used by the code 
generated from the OS VSAM control block 
manipulation macros (GENCB, SHOWCB, TESTCB, 
MODCB) . That is, the address at 256 into CVT is 
assumed to be that of a control block that is at 
displacement X'12' has the address of the VSAM 
control block manipulation routine. To ensure 
that DMSVIP receives control from these 
requests, the address of DMSVIP is stored at 256 
bytes into CMSCVT. However, until the CMSVSAM 
segment is loaded, the address at CMSCVT+256 is 
the address of module DHSVIB rather than the 
address of DMSVIP. The address of DMSVIP 
replaces that of DMSVIB when CMSVSAM is loaded. 
Both DMSVIB nd DMSVIP have pointers to 
themselves at 12 bytes into themselves to ensure 
that this technique works. 

Figure 53 shows the relationships in storage 
between the user program, the OS simulation and 
interface routines, and the CMSDOS and CMSVSAM 
DCSSs. 
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53. Relationship in Storage Between the User Program, 
Routines, and the CMSDOS and CMSVSAM DCSSs. 



the OS Simulation and Interface 



The description below illustrates the overall 
logic of that control flow. 



Initializing the CMS^DOS Environment for OS VSAM 
Processing 



DMSVIP Processing 



DMSVIP gains control from DMSSOP when an OS SVC 
19, 20 or 23 (CLOSE TYPE=T) is issued. It also 
gains control on return from execution of a VSAM 
function, as described below. DMSVIP performs 
five main functions: 

• Initializes the CMS/DOS environment for OS 
VSAM processing. 

• Simulates an OS VSAM OPEN macro. 



DMSVIP gets control when the first VSAM macro is 
encountered in the user program. Initialization 
processing begins at this time. The CMSDOS DCSS 
is loaded by issuing the command SET DOS ON 
(VSAM) . ASSGN commands are also issued at this 
time according to the user-issued DCBL's as 
indicated in the DOSCB chain. Once this 
initialization completes, DMSVIP processes the 
VSAM request. 

After the initialization, DMSVIP first checks 

to determine which VSAM function is being 

requested, OPEN, CLOSE, or a control block 
manipulation macro. 



Simulates an OS VSAM CLOSE macro. 



• Simulates an OS VSAM control block 
manipulation macro (GENCB, MODCB, SHOHCB, or 
TESTCB) . 

• Processes OS VSAM I/O macros. 



Simulate an OS VSAM OPEN 



For OPEN processing, the DOSSVC bit in NUCON is 
set on and control passes to DMSBOP via SVC 2. 
Once the CMS/DOS routines are in control. 
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execution of the VSAH function is the same as 
for the DOS VSAH functions described above. 



On return from executing the OPEN routine, 
the address of another entry point to DHSVIP, at 
label DMSVIP2, is placed in the ACB for the data 
set just opened, the DOSSVC bit is turned off, 
and control is passed to DHSSOP, which returns 
to the user program. DMSVIP2 is the entry point 
for code that performs linkage to the VSAM data 
management phase IKQVSH. This is done after the 
first OPBN because it is assumed that, once 
opened, the user performs I/O for the phase, 
e.g. a GET or PUT operation. 

When the linkage routine is entered, the 
DOSSVC bit is set on and control is given to the 
VSAH data management routine IKQVSH. On return 
from IKQVSH DHSVIP turns off the DOSSVC bit and 
returns control to the user program. (Refer to 
Simulate OS VSAH I/O Hacros in this section.) 



Simulate an OS VSAH CLOSE 



If an error return is provided for TESTCB, 
the address of DHSVIP4 is substituted in the 
PLIST. This allows DHSVIP to regain control 
from VSAH so that the DOSSVC bit can be turned 
off. The error routine is then given control 
after the address is returned to the PLIST. 



Sinulate OS VSAH I/O Hacros 



DHSVIP simulates the OS GET, PUT, POIST, EHDREQ, 
ERASE, and CHECK I/O macros. 



GET, PUTf POIgT, EHDREQ, and ERASE Processing: 



First, the OS reguest code in register is 
mapped to a DOS/VS reguest code. The HPL or 
chain of RPLs is rearranged to DOS format 
(unless that has already been done) . 

If there is an ECB address in the OS HPL, a 
flag is set in the new DOS RPL and the ECB 
address is saved at the end of the RPL. 



For CLOSE processing, the DOSSVC bit is set on 
and control is passed to the CHS/DOS routine 
DHSCLS via SVC 2. As in the case of OPEN, once 
control passes to the CHS/DOS routine, execution 
of the VSAH function is the same as for the DOS 
VSAH functions described above. 

On return from executing the VSAH CLOSE, the 
DOSSVC bit is turned off and control passes to 
DHSSOP, which returns to the user program. 



Simulate OS VSAH Control Block HaniEulation 
Hacros 



DHSVIP simulates the GEHCE, HODCB, SHOVJCB, and 
TESTCB control block manipulation macros. 

GENCB PEOCESSING: When a GENCB macro is issued 
with BLK=ACB or BLK=EXLST specified, the GENCB 
PLIST is passed unmodified to IKQGEN for 
execution. If GENCB is issued with BLK=RPL and 
ECB=address specified, the PLIST is rearranged 
to exclude the ECB specification, because DOS/VS 
does not support ECB processing. The GENCB 
PLIST is then passed to IKQGEN for execution. 

MQPCB, SHOWCB, AND TESTCB PROCESSING: When 
BODCB, SHoicB, or TESTCB is ~issued7 the OS ACB, 
RPL, and EXLST control blocks are reformatted, 
if necessary, to conform to DOS/VS formats. 

For HODCB and SHOWCB, the reguests are passed 
to IKQTHS for processing. When HODCB is issued 
with EXLST= specified, ensure that the exit 
routines return control to entry point DHSVIP3. 



Asynchronous I/O processing is simulated by 
setting active exit returns inactive in the user 
EXLST. The exception to this is the JRNAD exit 
which need not be set inactive since it is not 
an error exit. Setting error exits to be 
inactive prevents VSAH from taking an error 
exit, thus allowing such an exit to be deferred 
until a CHECK can be issued for it. 



The DOS 
IKQVSH. 



macro is then issued via a BALE to 



DOS error codes returned in the RPL FDBK 
field that do not exist in OS are mapped to 
their OS eguivalents. If the user has specified 
synchronous processing, this return code is 
passed unchanged in register 15. 

For asynchronous processing, return codes are 
cleared before return and any exit routines set 
inactive are reactivated in the EXLST. Also, 
all ECBs are set to WAITING status. 

CHECK PKOCESSING: For CHECK processing, return 
codes in the RPL FDBK field are checked to 
determine the results of the I/O operation. If 
there is an active exit routine provided for the 
return code, control is passed to that routine. 
Also, all WAITING ECBs are posted with an 
eguivalent completion code. 

If no active exit routine is provided or if 
the exit routine returns to VSAH, the return 
code is placed in register 15 and control is 
returned to the instruction following the 
CHECK. 



For TESTCB, check for any error routines the CHS/VSAH Error Return Processing 



user may have specified. If the TESTCB 
specified RPL= and IO=COHPLETE, a not egual 
result is passed to the user. All other TESTCB 
reguests are passed to DOS and the new PSW 
condition code indicates the results of the 
test. 



Two types of support for error routine 
processing are provided in DHSVIP. Entry point 
DHSVIP3 provides support for user exit routines; 
entry point DHSVIP4 provides support for ERET 
error returns . 
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USEH EXIT BOUTIME PROCESSING: DMSVIP provides 
support for OS ¥SAH I/O error exits at entry 
point DMSVIP3. At this entry point the DOSSVC 
bit is turned off and the user storage key is 
restored. 

The address of the user routine is recovered 
froa ViP's saved exit list (either the primary 
exit list in the work area or the overflow exit 
list, OEXLSA) . 

Control then passes to the appropriate exit 
routine. If the routine is one that returns to 
VSiM, the DOSSVC flag is set OH and VSAM 
processing continues. 

DMSVIP can save the addresses of up to 128 
exit routines during execution of a user 
program. 



EBET EBHOR BOUTIHE PBOCESSIHG: DMSVIP provides 
support for OS VSAM BRET exit routines used in 
conjunction with the TESTCB macro. This support 
is located at entry point DMSVIP4 . At DMSVIP4, 
the DOSSVC bit is turned off and the user 
storage key is restored. The address of the 
EBET routine is recovered from the work area and 
control passes to that routine. 

The EBET routine may not return control to 
VSAM. 



OS SIMULATIOH BY CMS 



When in a CMS environment, a processor or a 
user-written program is executing and utilizing 
OS-type functions, OS is not controlling this 
action, CMS is in control. Consequently, it is 
not OS code that is in CMS, but routines to 
simulate, in terms of CMS, certain OS functions 
essential to the support of OS language 
processors and their generated code. 

These functions are simulated to yield the 
same results as seen from the processing 
program, as specified by OS program logic 
manuals. However, they are supported only to 
the extent stated in CMS documentation and to 
the extent necessary to successfully execute OS 
language processors. The user should be aware 
that restrictions to OS functions as viewed from 
OS exist in CHS. 

Certain TSO Service routines are provided to 
allow the Program Products to run under CMS. The 
routines are the Command Scan and Parse Service 
Boutines and the Terminal I/O Service Boutines. 
In addition the user Aust provide some 
initialization as documented in TSO TMP Service 
Routine initialization. The OS functions that 
CMS simulates are shown in Figure 54. 



ISO Service Boutine Su££ort 



COMPLETION PBOCESSING FOB OS 
PBOGBAHS 



AND DOS VSAM 



Hhen an OS or DOS VSAM program completes, 
control is passed to module DMSVSB, which 
"cleans up" after VSAM. DMSVSB can be called 
from three routines after OS processing: 

• DMSIHT, if processing completes without 
system errors or serious user errors. 

• DHSEXT, if the user program is used as part 
of an EXEC file. 

• DMSABH, if there are system errors or the 
user program abnormally terminates. 

After DOS VSAM processing completes, DMSVSR 
is called by DHSDOS. 

DMSVSR issues an SVC 2 to execute the DOS 
transient routine $$BACLOS. $$BACLOS first 
checks for any OPEN VSAM files. If any are open, 
SVC 2 is issued to $$BCLOSE (DMSCLS) to close 
the files. 



TSO macros that support the use of the terminal 
monitor program (TMP) service routines are 
contained in TSOMAC MACLIB. The macro functions 
are as described in the TSO TMP documentation 
with the exception of PUTLlilE, GETLINE, PUTGET, 
and TCLEARQ. 

Before using the TSO service routines, the 
calling program performs the following 
initialization: 

1. Stores the address of the command line as 
the first word in the command processor 
parameter list (CPPL) . The TSOGET macro 
puts the address of the CPPL in register 
1. 

2. Initializes CMS storage using the STRINIT 
macro. 

3. Clears the ECT field that contains the 
address of the I/O work area (ECTIOWA) . 

4. Issues the STACK macro to define the 
terminal as the primary source of input. 



If there are no open files or if all ACB's 
have been closed, $$BACLOS issues SVC 2 to 
$$BE0J4, an entry point in DMSVSB. At $$BE0J4, a 
FOBGESTS DIAGNOSE 64 is issued to purge the 
CHSVSAM DCSS. DMSVSB then checks to see if an OS 
program has completed processing. If this is the 
case, the SET DOS OFF command is issued and 
control returns to the caller. 



CMS Simulation of OS Control Block Functions 



Most of the simulated supervisory OS control 
blocks are contained in the following two CMS 
control blocks: 



CMSCVT simulates the communication vector table 
(CVT) . Location 16 contains the address 
of the CVT control section. 
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POST 

EXIT 

GETH&IN 
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LINK 

XCTL 

LOAD 

DELETE 
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GETPOOL 
TIME 
ABEND 
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BLDL/FIND 
OPEN 
CLOSE 
STOM 
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ATTACH 
CHAP 
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STAE 
DETACH 
CHKPT 
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SYNAD 
BACKSPACE 
GET/PUT 
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NOTE/POINT 
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TGET/TPOT 
TCLEABQ 
STAX 



DMSSVT 
DMSSVN 
DMSSVN 
DHSSLM 
DHSSHN 
DHSSHN 
DHSSLM 
DHSSLM 
DHSSLM 
DHSSLM 
DHSSHM 

DHSSHN 
DHSSVT 
DHSSAB 
DHSSVT 
DHSSVT 
DHSSOP 
DHSSOF 
DHSSVT 
DHSSOP 
DHSSOP 
DHSSVT 
DHSSVT 
DHSSVT 
DHSSVT 
DHSSVT 
DHSSVT 
DHSSVT 
DHSSVT 
DHSSVT 
DMSSVT 
DHSSVT 
DHSSVT 
DHSSVT 
DHSSVT 
DHSSVT 
DHSSVT 
DHSSVT 
DHSSVT 
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DHSSVT 
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Gets the time of day 

Terninates processing 

Processes program interruptions 

Hanipulates simulated partitioned data files 

Activates a data file 

Deactivates a data file 

Hanipulates partitioned directories 

Activates a data file 

Temporarily deactivates a data file 

Obtains device— type physical characteristics 

Effective NOP 

Communicates with the terminal 

Effective NOP 

Adds entry to loader table 

Effective LINK 

Effective MOP 

Accesses or cancels timer 

Sets timer interval and timer exit routine 

Effective HOP 

Dumps specified storage areas 

Effective HOP 

Beleases a free storage buffer 

Allows processing program to decipher abend condition 

Effective MOP 

Effective HOP 

Obtains information from FILEDEF command 

Handles data set error conditions 

Backs up to the beginning of the previous record 

Hanipulates data records 

Hanipulates data blocks 

Accesses or changes relative track address 

Tests ECB for completion and errors 

Terminal processing 

Clears input queue 

Adds or deletes an attention exit level 



Figure 54. OS Functions that CHS Simulates 



CMSCB allocated from system free storage 
whenever a FILEDEF command or an OPEH 
(SVC 19) is issued for a data set. The 
CMS control block consists of the CMS 
file Control block (FCB) for the data 
file management under CMS, and simulation 
of the job file control block (JFCB) , 
input/output block (lOB) , and data extent 
block (DEB) . The name of the data set is 
contained in the FCB, and is obtained 
from the FILEDEF argument list, or from a 
predetermined file name supplied by the 
processing problem program. 

CMS also utilizes portions of the supplied data 
control block (DCB) and the data event control 
block (DECB) . The TSO control blocks utilized 
are the command program parameters list (CPPL) , 



user profile table (OPT) , protected step control 
block (PSCB) , and environment control table 
(ECT) . 



Operating System Simulation Boutines 



CMS provides a number of routines to simulate 
certain operating system functions used by 
programs such as the Assembler and the FOBTBAM 
and PL/I compilers. Some of the SVC simulation 
routines are located in the disk resident 
transient module DMSSVT. Whenever one of the 
SVC routines in DMSSVT or is invoked, that 
routine is loaded into the transient area. The 
following paragraphs describe how these 
simulation routines work. 
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XDAP-S¥C_0: Writes and reads the source code 
spill file, SYSUT1, during language conpilation 
for PL/I Optimizer and ANSI COBOL Compilers. 

mizSVC_J: Causes the active task to wait until 
one of more event control blocks (ECBs) have 
been posted. For each specified ECB that has 
been posted one is subtracted from the number of 
events specified in the WAIT macro. If the 
number of events is zero by the time the last 
ECB is checked control is returned to the user. 
If the number of events is not zero after the 
last ECB is checked and the number of events is 
not greater than the number of ECBs, the active 
task is put into a wait state until enough ECBs 
are posted to set the number of events at zero. 
When the event count reaches zero the wait bits 
are turn off in any ECBs that have not been 
posted and control is returned to the user. If 
the number of events specified is greater than 
the number of ECBs the system abnormally 
terminates with an error message. All options 
of WAIT are supported. 

JE0ST-SVC_2: Causes the specified event control 
block (ECB) to be set to indicate the occurrence 
of an event. This event satisfies the 
reguirements of a WAIT macro instruction. All 
options of POST are supported. The bits in the 
ECB are set as follows: 

Bit Settinc[ 



1 1 

2-7 Value of specified completion code 

JXIT::SVC_3: This SVC is for CMS internal use 
only. It is used by the CMS routine DMSSLN to 
acquire an SVC SAVEAREA on return fron an 
executing program that had been given control by 
LINK (SVC 6), XTCL (SVC 7) or ATTACH (SVC 42). 



G ETMl IfizSVC_ a : Control is passed to the GETMAIH 
entry point in the DMSSMN storage resident 
routine. The mode is determined: VU, VC, EC. 
A call is made to GETBLK to obtain the block of 
storage. Control blocks of two fullwords 
precede each section of available storage: (1) 
the address of the next block, (2) the size of 
this block. The head of the pointer string is 
located at the words MAINSTHT - initial free 
block, and MAINLIST - address of first link in 
chain of free block pointers. All options of 
GETMAIH are supported. 



IBIJMJMr S VC_ 5 : Releases a block of free 
storage. If the block is part of segmented 
storage, a control block of two fullwords is 
placed at the beginning of the released area. 
Adjustment is made to include this block in the 
chain of available areas. All options of 
FREEHAIN are supported. 



LINK2SVC_6: Program transfe 
the nucleus routine, DMSSLN 
causes program control to 
designated phase. If the COM 
byte OSSFLAGS is on, loading 
LOADHOD to bring a CMS MODULE 
If this flag is off, dy 
initiated by calling LOAD, 
to obtain enough storage s 



r is controlled by 

The LINK macro 

be passed to a 

PSWT bit within the 

is done by calling 

file into storage. 

namic loading is 

A GETMAIN is issued 

o that the loader 



(DMSLDR) may relocate the phase in storage. A 
chain of link request blocks is built to record 
the old SVC PSW, and the location and size of 
the phase storage area. If the routine is 
already in storage, determined by scanning the 
load request chain, no LOAD or LOADMOD is done. 
Control is passed directly to the routine. CMS 
ignores the DCB and HIARCHY options; all other 
options of LINK are supported. 

XCTL-syc J: XCTL first deletes the current phase 
from storage. Processing then continues as for 
LINK-SVC 6, as previously described. CMS 
ignores The DCB and HIARCHY options; all other 
options of XCTL are supported. 

l!2A5~SVC_8: Control is passed to DMSSLN8 located 
in DMSSLN when a LOAD macro is issued. If the 
requested phase is not in storage, a LOAD or 
LOADHOD is issued to bring it in. Control is 
then returned to the caller. CMS ignores the 
DCB and HIARCHY options; all other options of 
LOAD are supported. 

DELET E^S V C_9 : Control is passed to DMSSLN9 
located in DMSSLN when a DELETE macro is issued. 
Dpon entry, DELETE checks to see whether the 
module specified was loaded using LOADMOD or 
dynamically loaded by LOAD or INCLUDE. If it 
was loaded by LOADMOD control is returned to the 
user. If it was dynamically loaded, the 
responsibility count is decremented by one and 
if it reaches zero, the storage is released 
using FREEMAIN, and control is returned to the 
user. All options of DELETE are supported. 
Code H is returned in register 15 if the phase 
is not found. 

GETHAIN^FREEMAIN2SVC_J0: Control is passed to 
the SVC 10 entry point in DMSSMN. Storage 
management is analogous to SVC U and 5, 
respectively. All options of GETMAIN and 
FREEMAIN are supported. Subpool specifications 
are ignored. 

GETPOOL: Gets control via an OS LINK macro to 
lECQBFGI. lECQBFGI allocates an area of free 
storage using GETMAIN, sets up a buffer control 
block in the free storage, stores the address of 
the buffer control block in the DCB, and then 
returns control to the caller. 

IIHIzS VC_JJ : This routine (TIME) located in 
DMSSVT receives control when a TIME macro 
instruction is issued. A call is made (by SIO 
or DIAGNOSE) to the RPQ software chronological 
timer device, X'OFF". The real time of day and 
date are returned to the calling program in a 
specified form: decimal (DEC) binary (BIN) , or 
timer units (TU) . All options of TIME except 
MIC are supported. 

iBEHP2SVC_13: This routine (DMSSAB) receives 
control when either an ABEND macro or an 
unsupported OS/360 SVC is issued. If an SVC 13 
was issued with the DUMP option and either a 
SYSDDUMP or SYSABEND ddname had been defined via 
a call to DMSFLD (FILEDEF) , a SNAP (SVC 51) 
specifying PDATA=ALL is issued to dump user 
storage to the defined file. A check is made to 
see if there are any outstanding STAE requests. 
If not, or if an unsupported SVC was issued, 
DMSCWR is called to type a descriptive error 
message at the terminal. Next, DMSCWT is called 
to wait until all terminal activity has ceased. 
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and then, control is passed to the ABEND 
recovery routine. If a STAE macro was issued, a 
STAE work area is built and control is passed to 
the STAE exit routine. After the exit routine 
is complete, a test is made to see if a retry 
routine was specified. If so, control is passed 
to the retry routine. Otherwise, control passes 
to DHSABN unless the task that had the ABEND was 
a subtask. In that case, the resume PSW in the 
link block for the subtask is adjusted to point 
to an EXIT instruction (SVC 3) . The EXIT frees 
the subtask, and the attaching task is 
redispatched. 

SPIE-SVC 14; This routine (SPIE) receives 
control when a SPIE macro instruction is issued. 
Nhen it gets control, SPIE inserts the new 
program interruption control area (PICA) address 
into the program interruption element (PIE) . 
The program interruption element resides in the 
program interruption handler (DMSITP) . It then 
returns the address of the old PICA to the 
calling program, sets the program mask in the 
calling program's PSH, and returns to the 
calling program. All options of SPIE are 
supported. 

BI.DLZFINDlTyEe_Dl.-SVC_J8: SVC to entry points 
in DMSSOP. If "an OS disk is specified, DMSSVT 
branches and links to DHSROS. See BLDL and FIND 
under description of BPAM routines in DMSSVT. 

ST0ll-SVC_21: See STOH under description of BPAM 
routines in DMSSVT. 



0PIN^0I1MJ-SVC_J9^22: OPEN simul 
management function of opening 
files. It is a nucleus routine 
control from DMSITS when an exec 
issues an OPEN macro instructio 
macro causes an SVC to DMSSOP. DM 
the OPEN macro. The DISP and RDBA 
ignored by CMS; all other option 
OPENJ are supported. 



ates the data 
one or more 
and receives 
uting program 
n. The OPEN 
SSOP simulates 
CK options are 
s of OPEN and 



CLOSE/TCLOSE^S VC_20/23 : CLOSE and TCLOSE are 
simulated in the nucleus routine DMSSOP. It 
receives control whenever a CLOSE or TCLOSE 
macro instruction is issued. The CLOSE macro 
causes an SVC to DMSSOP. DMSSOP simulates the 
CLOSE macro. CMS ignores the DisP option; all 
other options of CLOSE and TCLOSE are 
supported. 

D EVT YP E- S VC_ 24 : This routine (DEVTYPE) , located 
in DMSSVT, receives control when a DEVTYPE macro 
is issued. Upon entry, DEVTYPE moves Device 
Characteristic Information for the requested 
data set into a user specified area, and then 
returns control to the user. All options of 
DEVTYPE are supported. 



TRKB AL^S VC_25 : 
DMSSVT. 



TBKBAL is 



NOP located in 



HT0^HT0B-SVC_35: This routine (WTO) , located in 
DMSSVT, receives control when either a HTO or a 
WTOE macro instruction is issued. For a WTO, it 
constructs a calling sequence to the DMSCWB 
function program to type the message at the 
terminal. (The address of the message and its 
length are provided in the parameter list that 
results from the expansion of the WTO macro 
instruction.) It then calls the DMSCWT function 
program to wait until all terminal I/O activity 



has ceased. Next, it calls the DMSCWR function 
program to type the message at the terminal and 
returns to the calling program. All options of 
WTO and NTOB are supported except those 
concerned with multiple console support. 

For a WTOR macro instruction, this routine 
proceeds as described for WTO. However, after 
it has typed the message at the terminal it 
calls the DMSCBD function program to read the 
user's reply from the terminal. When the user 
replies with a message, it moves the message to 
the buffer specified in the WTOB parameter list, 
sets the completion bit in the ECB, and returns 
to the calling program. 

EXTRACT-SVC_40: This routine (EXTRACT), located 
in DMSSVT receives control when an EXTRACT macro 
is issued. Dpon entry, EXTRACT clears the user 
provided answer area and returns control to the 
user with a return code of 4 in register 15. 

IDENTIFY::SVC_aj[: Located in DMSSVT, this 
routine creates a new load request block with 
the requested name and address if both are 
valid. The new entry is chained from the 
existing load request chain. The new name may 
be used in a LINK or ATTACH macro. 

ATTACH- SVC_42 : Located in DMSSLN, ATTACH 
operates like a LINK (SVC 6) , with additional 
capabilities. The user is allowed to specify an 
exit address to be taken upon return from the 
attached phase; also, an ECB is posted when the 
attached phase has completed; and a STAI routine 
can be specified in case the attached phase 
abends. The DCB, LPMOD, DPMOD, HIARCHY, GSPV, 
GSPL, SHSPV, SHSPL, SZERO, PURGE, ASYNCH, and 
TASKLIB options are ignored; all other options 
of ATTACH are supported. Because CMS is not a 
multitasking operating system, a phase requested 
by the ATTACH macro must return to CMS. 

CHAP2SVC_aU: CHAP is a NOP located in DMSSVT. 

JTIMER; S V£_i! 6 : Checks to ensure that the value 
in the timer (hex location 50) was set by an 
STIMER macro. If it was, the value is converted 
to an unsigned 32 bit binary number specifying 
26 microsecond units and is returned in register 
0. If the timer was not set by an STIMER macro 
a zero is returned in register 0, after setting 
register 0, the CANCEL option is checked. If it 
is not specified, control is returned to the 
user. If it is specified, the timer value and 
exit routine set by the STIMER macro are 
cancelled and control is returned to the user. 
All options of TTIMER are supported. 

STIMER2SVC_47: Checks to see if the WAIT option 
is specified. If so, control is returned to the 
user. If not, the specified timer interval is 
converted to 13 microsecond units and stored in 
the timer (hex location 50) . If a timer 
completion exit routine is specified, it is 
scheduled to be given control after completion 
of the specified time interval. If not, no 
indication of the completion of the time 
interval is scheduled. After checking and 
handling any specified exit routine address, 
control is returned to the user. All options of 
STIMER are supported. The TASK option is 
treated as though the REAL option had been 
specified. 
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DEfi::S?C_a8: DEQ is a HOP located in DHSSTT. 

S||P-SVC 5j: Control is passed to SHIP in 
DHSSVI when a SHAF aacro is issued. SHiP fills 
in a PLIST with a beginning and ending address 
and calls DHPEXEC. DHPEXEC duaps the specified 
storage along with the registers and low storage 
to the printer. Control is then returned to 
SHAP and SHIP checks to see if any sore 
addresses are specified. It continues calling 
DMPEXEC until all the specified addresses have 
been duaped to the printer. Control is then 
returned to the user. The DCB, SDATA, and PDATA 
options are ignored by CMS; all other options of 
SHAP are supported. 

EHfirSTC_56: EHQ is a HOP located in DHSSVT. 

FBEEDBOP^STC.S?: This routine (FREEDBUF) 
located in DMSSVT receives control when a 
FSEEDBOF aacro is issued. Dpon entry, FREEDBUF 
sets up the correct DSBCT registers and calls 
the FBEEDBUF routine in CMSSBD. This routine 
returns the dynaaically obtained buffer (BDAH) 
specified in the DECB to the DCB buffer control 
block chain. Control is then returned to the 
DMSSVT routine which returns control to the 
user. All the options of FBEEDBUF are 
supported. 

STAE-S?C 60; This routine (STAE) located in 
DMSSVT receives control when a STAE macro is 
issued. Dpon entry, STAE creates, overlays or 
cancels a STAE control block (SCB) as requested. 
Control is then returned to the user with one of 
the following return codes in register 15: 

£2^e Meaning 

GO An SCB is successfully created, 

overlaid or cancelled. 
08 The user is atteapting to cancel or 

overlay a non-existent SCB. 



Foraat of SCB 







|0 or pointer to next SCB| 

(exit address j 

8 I ^ 

Iparaaeter list address t 
12 



DETACH-SVC_62: DETACH is a NOP located in 
DMSSVT. 

CHKPliSVC 63: CHKPT is a NOP located in 
DMSSVT. 

BDJFCB-SVC_6it: This routine (RDJFCB) receives 
control when a RDJFCB aacro instruction is 
issued. When it gets control, RDJFCB obtains 
the address of the JFCB froa the DCBEXLST field 
in the DCB and sets the JFCB to zero. It then 
reads the sioulated JFCB located in CMSCB that 
was produced by issuing a FILEDEF into the 
closed area. RDJFCB calls the STATE function 
prograa to deternine if the associated file 
exists. If it does, RDJFCB returns to the 
calling program. If the file does not exist. 



BDJFCB sets a switch in the DCB to indicate this 
and then returns to the calling prograa. RDJFCB 
is located in DHSSVT. All the options of RDJFCB 
are supported. 

Note: The switch set by the BDJFCB is tested by 
the FORTRAN object-tiae direct-access handler 
<DIOCS) to deteraine whether or not a referenced 
disk file exists. If it does not, DIOCS 
initializes the direct access file. 

SlI AD::S VC_68 : Located in DMSSVT, SYNAD attempts 
to~siBulate~the functions SYNADAF and SYHADRLS. 
SYNADAF expansion includes an SVC 68 and a 
high-order byte in register 15 denoting an 
access aethod. SYNAD prepares an error aessage 
line, swap save areas and iregister 13 pointers. 
The message buffer is 120 bytes: bytes 1-50, 
84-119 blank; bytes 51-120, 120S INPUT/OUTPUT 
EBBOB nnn ON FILE: "dsnaae"; where nnn is the 
CMS RDBUF/WRBUF error code. All the options of 
SYNAD are supported. 

SYHADRLS expansion includes SVC 68 and a high 

order byte of X'FF* in register 15. The save 

area is returned, and .the message buffer is 
returned to free storage. 



BACKS P A CE2SVC_ 69 : Also in DMSSVT. For a tape, 
a BSR CO Bland is issued to the tape. For a 
direct access data set, the CHS write and read 
pointers are decremented by one. Control is 
passed to BACKSPACE in DHSSVT when a BACKSPACE 
macro is issued. BACKSPACE decrements the read 
write pointer by one and returns control to the 
user. No physical tape or disk adjustments are 
made until the next READ or WRITE macro is 
issued. All the options of BACKSPACE are 
supported . 

TGET/TPUT-SVC_9 3: Located in DMSSVN, this 
routine receives control when a TGET or TPUT 
macro is issued. It is provided to support TSO 
service routines needed by program products. 
TGET reads a terminal line; TPUT writes a 
terminal line. The return code is zero if the 
operation was successful and a four if an error 
was encountered. 

ICLE|lRQzS VC_9ii : TCLEARQ is located in DMSSVN 
and causes the terminal input queue to be 
cleared via a call to DESBDF. At completion a 
return is made to the user. 

STAXrSVC_96: Located in DMSSVT, STAX gets and 
chains a CMSTAXE control block for each STAX SVC 
issued with an exit routine address specified. 
The chain is anchored by TAXEADDR in DHSNUC. If 
no exit address is specified the most recently 
added CMSTAXE is cleared from the chain. If an 
error occurs during STAX SVC processing, a 
return code of eight is placed in register 15. 
The only option of STAX which may be specified 
is 'EXIT ADDRESS'. 



GET/PUT: See 
description. 



the 



DMSSQS prolog 



for 



BEAD/WRITE: OS READ and WRITE macros branch and 
link to DMSSBS. DMSSBS branches and links to 
DMSSEB and, if the disks is an OS disk, DMSSEB 
branches and link to DMSROS. See DMSSBS for 
description. 
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MOTE/P0IHT^FI^Ditj[£e_CL: OS HOTE , POINT, and 
FIND (type c) nacros branch and link to entry 
points in DHSSCT. If the disk is an OS disk, 
DBSSCT branches and links to DBSROS. See DMSSCT 
for descriptions. 

CHECK: See the DMSSCT prolog for description. 

Motes on using the OS simulation routines: 

• CMS files are physically blocked in 800-byte 
blocks, and logically blocked according to a 
logical record length. If the filemode of 
the file is not 4, the logical record length 
is egual to the DCBLBECL and the file must 
always be referenced with the same DCBLBECI, 
whether or not the file is blocked. If the 
filemode of the file is 4, the logical record 
length is egual to the DCBBLKSI and the file 
must always be referenced with the same 
DCBBLKSI. 

• When writing CMS files with a filemode number 
other than four, the OS simulation routines 
deblock the output and write it on a disk in 
unblocked records. The simulation routines 
delete each U-byte block descriptor word 
(BDH) and each 4-byte record descriptor word 
(RDM) of variable length records. This makes 
the OS-created files compatible with 
CMS-created files and CMS utilities. When 
CHS reads a CMS file with a filemode number 
other than four, CMS blocks the record input 
as specifies and restores the BDH and BDW 
control words of variable length records. 

If the CHS filemode number is four, CHS does 
not unblock or delete BDNs or BDWs on output. 
CHS assumes on input that the file is blocked 
as specified and that variable length records 
contain block descriptor words and record 
descriptor words. 

• To set the HEAD/URITE pointers for a file at 
the end of the file, a FILEDEF command must 
be issued for the file specifying the MOD 
option. 

• A file is erased and a new one created if the 
file is opened and all the following 
conditions exist: 

— The ODTPOT or OOTIH option of OPEN is 
specified. 

— The TYPE option of OPEN is not J. 

— The dataset organization option of the DCB 
is not direct access or partitioned. 

— A FILEDEF command has not been issued for 
data set specifying the HOD option. 

• The results are unpredictable if two DCBs 
read and write to the same data set at the 
same time. 



validity and sets the necessary internal flags 
for later use. If the disk you access specifies 
a target mode of another disk currently 
accessed, DHSACC calls DHSALU to clear all 
pertinent information in the old active disk 
table. DHSACC then calls DHSACF to bring in the 
user file directory of the disk. As soon as 
DHSACF gets control, DHSACF calls DHSACH to read 
in the master file directory of the disk. Once 
DHSACH reads the label of the disk, and 
determines that it is an OS disk, DHSACH calls 
DMSROS (ROSACC) to complete the access of the OS 
disk. Open returning from DMSROS, DHSACH 
returns immediately to DHSACF, bypassing the 
master file directory logic for CHS disks. 
DHSACF then checks to determine if the accessed 
disk is an OS disk. If it is an OS disk, DHSACF 
returns immediately to DHSACC, bypassing all the 
user file directory logic for OS disks. DHSACC 
checks to determine if the accessed disk is an 
OS disk; if it is, another check determines if 
the accessed disk replaces another disk to issue 
an information message to that effect. Another 
check determines if you specified any options or 
fileid and, if you did, a warning message 
appears on the terminal. Control now returns to 
the calling routine. 

IlilDEI COMHAND FLOB: DMSFLD gets control first 
when you issue a CHS FILEDEF command. DHSFLD 
adds, changes, or deletes a FILEDEF control 
block (CHSCB) and returns control to the calling 
routine. 

LISTDS COMMMD FLOS: The module DMSLDS gets 
control first when you invoke the LISTDS 
command. DHSLDS verifies parameter list 
validity and calls module DHSLAD to get the 
active disk table associated with the specified 
mode. DHSLDS reads all format 1 DSCB and if you 
specified the PDS option and the data set is 
partitioned, DHSLDS calls DHSROS (ROSFIND) to 
get the members of the data set. After 
displaying the DSCB (or DSCB) on you console, 
DHSLDS returns to the calling routine. 

MlMlUil COHHAND FLOS: The module DHSHVE gets 
control first when you issue a CHS HOVEFILE 
command. DHSHVE calls DHSFLD to get an input 
and output CHSCB and, if the input DHSCB is for 
a disk file, DHSHVE calls DHSSTT to verify the 
existence of the input file and get default DCB 
parameters in absence of CHSCB DCB parameters. 
DHSHVE uses OS OPEN, FIND, GET, PUT, and CLOSE 
macros to move data from the input file to the 
output file. After moving the specified data, 
control returns to the calling routine. 

fiOERY COHMAND FLOW: The module DHSQRY gets 
control first when you invoke the QUERY 
command. DHSQRY verifies parameter list 
validity and calls DHSLAD to get the active disk 
table associated with the specified mode. 
DHSQRY displays all the information that you 
requested on your console. When DHSQRY 
finishes, control returns to the calling 
routine. 



£2111£^ Flow of Commands Involving OS Agcess 



ACCESS COMMAND FLOW: The module DHSACC gets 
control first when you invoke the ACCESS 
command. DHSACC verifies parameter list 



RELEASE COHHAND FLOW: The module DMSARE gets 
control first when you invoke the RELEASE 
command. DMSARE verifies parameter list 
validity and checks to determine if the disk you 
want to release is accessed. If the disk you 
want to release is currently active, DMSARE 
calls DMSALU to clear all pertinent information 



Section 2. Method of Operation and Program organization 203 



associated with the active disk. DMSALU first 
checks the active disk table for any existing 
CMS tables kept in free storage. If the disk 
you want to release is an OS disk, DMSiLU does 
not find any tables associated with a CMS disk. 
If the disk is an OS disk, DMSALU releases the 
OS FST blocks (if any) and clears any OS FST 
pointers in the OS file control blocks. DMSALU 
then clears the active disk table and returns to 
DMSARE. DMSARE then clears the device table 
address for the specified disk and returns to 
the calling routine. 

STATE COMMAND FLOW: The aodule DMSSTT gets 
control first when you invoke the STATE 
coDoand. DMSSTT verifies the parameter list 
validity and calls module DMSLAD to get the 
active disk table associated with the specified 
mode. Upon return from DMSLAD, DMSSTT calls 
DMSLFS to find the file status table (FST) 
associated with the file you specified. Once 
DMSLFS finds the associated FST, it checks to 
determine if the file resides on an OS disk. If 
it does, DMSLFS calls DMSROS (ROSSTT) to read 
the extents of the data set. Upon return from 
DMSROS, DMSLFS returns to DMSSTT. DMSSTT then 
copies the FST (or OS FST) to the FST copy in 
statefst and returns to the calling routine. 
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returns to free storage the area which DMSROS 
occupies. 

P^SARE MODULE: DMSARE ensures that the disk you 
want to relase is an OS disk. DMSARE calls 
DMSALU to release all OS FST blocks and, if 
necessary, to free the area DMSROS occupies. 
Upon return from DMSALU, DMSARE clears the 
common CMS and OS active disk table. 

DHSFLD MODULE 

• DSN — If you specify the parameter DSN as 
•?•, PILEDEF displays the message DMSrLD220R 
to request you to type in an OS data set name 
with the format Q1.Q2.QM. Q1, Q2, and QN are 
the qualifiers of an OS data set name. If 
you specify the parameter DSN as Q1.Q2.QN, 
FILEDEF assumes that Q1, Q2, and QN are the 
qualifiers of an OS data set name, and stores 
the qualifiers with the format Q1.Q2.QN in a 
free storage block and chains the block to 
the FCB. 

• CONCAT — If you specify the CONCAT option, 
FILEDEF assumes that the specified FILIDEF is 
unique unless a filedef is outstanding with a 
matching ddname, filename, and filetype. 
This allows you to specify more than one 
FILEDEF for a particular ddname. The CONCAT 
option also sets the FCBCATML bit in the FCB 
to allow the OS simulation routine to know 
the FCB is for a concatenated MACLIB. 



5MSACC MODULE: Once DMSACC determines that the 
disk you want to access is an OS disk, it 
bypasses the routines that perform 'LOGIN HFD' 
and 'LOGIN ERASE*. 

If the disk you want to access replaces an OS 
disk, message DMSACC72UI appears at your 
terminal. 

If you specified any options or fileid in the 
ACCESS command to an OS disk, a warning message, 
DMSACC230M, appears to notify you that such 
options or fileid were ignored. DMSACC returns 
to the calling routine with a warning code of 
4. 

DUSACF MODULE: DMSACF verifies that the disk you 
want to access is an OS disk and, if it is, 
exits immediately. 

MSACM MODULE: DMSACM saves the disk label and 
VTOC address in the ADT block if the disk is an 
OS disk. DMSACM checks to determine if a 
previous access to an OS disk loaded DMSROS. If 
not, DMSACM calls DMSSTT to verify that DMSROS 
text exists. Upon successful return from STATE, 
DMSACM loads DMSROS text into the high storage 
area with the same protect key and calls the OS 
access routine (ROSACC) of DMSROS to read the 
format 4 DSCB of the disk. Upon successful 
return from DMSROS, control returns to the 
calling routine. Any other errors are treated 
as general logon errors. 

DMSALU MODULE: If the disk is an OS disk, 
DMSFRET returns the OS FST blocks (if any) to 
free storage. DMSALU clears the OS FST pointer 
in all active OS file control blocks, decrements 
the DMSROS usage count and, if the usage count 
is zero, clears the address of DMSROS in the 
nucleus area. DMSALU also calls DMSFRET to 



MEMBER — If you specify the member option, 
filedef stores the member name in FCBMEMBR in 
the FCB to indicate that the OS simulation 
routine should set the read/write pointer to 
point to the specified BPAM file member when 
OPEN occurs. 



PMSLjDS MODULE: DMSLDS saves the return register, 
sets itself with the nucleus protection key, 
clears the dsname key, and initializes its 
internal flag. 

DMSLDS verifies parameter list validity. The 
data set name must not exceed 44 characters, and 
the disk mode (the last parameter before the 
options) must be valid. DMSLDS joins the 
quailifiers with dots (.) to form valid data set 
names. If you specify the data set name as a 
question mark (?) , DMSLDS prompts you to enter 
the dsname in exactly the same form as the 
dsname which appears on the disk. 

DMSLDS calls DMSLAD to find the active disk 
table block. If you specify filemode as an 
asterisk (*) , DMSLAD searches for all ADT 
blocks. If you specify the filemode as 
alphabetic, DMSLAD finds only the ADT block for 
the specified filemode. 



If you specify the dsna 
optional) , DMSLDS sets the chann 
read by key. If you did not sp 
DMSLDS searches the whole VTOC 
DSCBS and displays all the reques 
contained in the DSCB on your co 
specify the format option, the 
BLKSI, DSOHG, DATE, LABEL, FMODE 
name appear on you console; othe 
FMODE and data set name appear. 



e (which is 
el programs to 
ecify a dsname, 
for format 1 
ted information 
nsole. If you 

RECFM, LRECL, 
, and data set 
rwise, only the 
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If you specify the PDS option, DMSLDS calls 
the 'find* routine (rosfind) in DHSBOS to read 
the aenber directory and pass back, one at a 
tiae, in the fcbmeobr field of CHSCB the name of 
each meaber of the data set. This occurs if the 
data set is partitioned. 

After processing finishes, DMSLDS resets the 
nucleus key to the saae value as the user key, 
puts the return code in register 15, and returns 
to the calling routine. 

MSLFS MODULE: DMSLFS verifies that the PST 
being searched for has an OS disk associated 
with it. DMSLFS calls the DMSROS state routine 
(ROSSTT) to verify that the data set exists and 
CMS supports the data set attributes. Upon 
return from DMSBOS, a return code of 88 
indicates that the data set was not found, and 
DMSLDS starts the search again using the next 
disk in seguence. Any other errors, such as a 
return code 80, cause DMSLFS to exit 
iaaediately. A return code of froa DMSBOS 
indicates that the data set is on the specified 
disk. Fron this point on, execution occurs 
coaaon to both CMS and OS disks. 

DMSMVE MODULE: If you specify the PDS option and 
the input is from a disk, DMSMVE sets the 
FCBMVPDS bit and issues an OS FIND macro before 
opening an output DCB to position the input file 
at the next member. DMSMVE then stores the 
input member name in the output CMSCB for use as 
the output filename. After reaching end-of-file 
on a member, the message DMSMVE225I appears, 
DMSMVE closes the output DCB, and passes control 
to find the next member. After moving all the 
members to separate CMS files, movefile displays 
message DMSMVE226I, closes the input and output 
DCBS, and returns control to the calling 
routine. 

DMSBOS MODULE: 

• BOSACC Routine — ROSACC gets control from 
DMSACH after DMSACM determines that the label 
of the disk belongs to an OS disk. The 
ROSACC routine reads the format 4 DSCB of the 
disk to further verify the validity of the OS 
disk. ROSACC updates the ADT to contain the 
address of the high extent of the VTOC (if 
the disk is a DOS disk) or the address of the 
last active format 1 DSCB (if the disk is an 
OS disk) , and the number of cylinders in the 
disk. If the disk is a DOS disk, ROSACC sets 
a flag in the ADT. Information messages 
appear to notify you that the disk was 
accessed in read-only mode. If the disk is 
already accessed as another disk, another 
information message appears to that effect. 
Finally ROSACC zeroes out the ADTFLG1 flag in 
the ADT, sets the ADBFLG2 flag to reflect 
that an OS disk was accessed, and returns 
control to the calling routine. 

• ROSSTT Routine — Verifies the existence of 
an OS data set and verifies the support of 
the data set attributes. 

Note: Within the ROSSTT description, any 
reference to FCB or CMSCB implies a DOSCB if 
DOS is active. 

ROSSTT gets control from DMSSTT after 
DMSSTT determines that the STATE operation is 



to an OS disk. The BOSSTT routine searches 
for the correct FCB which a previous FILEDEF 
associated with the data set. If the DOS 
environment is active, ROSSTT locates the 
correct DOSCB that defines a data set 
described by a previous DLBL. If ROSSTT 
finds an active FST, control passes to 
BOSSTBET; otherwise, BOSSTT acguires the 
dsname block, places its address in the FCB, 
and moves the dsname in the FCB to the 
acguired block. BOSSTT acguires an FST 
block, chains it to the FST chain, and fills 
all general fields (dsname, disk address, and 
disk mode) . ROSSTT now reads the format 1 
DSCB for the data set and checks for 
unsupported options (BDAN, ISAM, VSAM, and 
read protect) . 

Errors pass control back to the calling 
routine with an error code. ROSSTT groups 
together all the extents of the data set (by 
reading the foraat 3 DSCB if necessary) and 
checks them for validity. ROSSTT bypasses 
any user labels that may exist and displays a 
message to that effect. Next, BOSSTT aoves 
the DSCB1 BLKSIZE, LBECL, and RECFM 
parameters to the OS FST and passes control 
to rosstret . 

BOSSTBET Boutine — If the disk is not a DOS 
disk, rosstret passes control back to the 
caller. If the specified disk is a DOS disk, 
rosstret fills in the OS FST BLKSIZE, LBECL, 
and BECFM fields that were not specified in 
the DSCB1. If the CMSCB fields are zero, 
rosstret defaults thea to BLKSIZE=32760, 
LRECL=32670, and RECFM=U. Control then 
returns to the calling routine. 

ROSBPS Boutine — BOSBPS reads the next 
record of an OS data set. Upon entry to the 
ROSRPS entry point, ROSRPS calls CHKXTNT and, 
if the current CCBHR is zero, SETXTNT to 
ensure the CCHHR and extent boundaries are 
correctly set. ROSRPS then calls DISKIO 
and, if necessary, CHKSENSE and GETALT to 
read the next record. If no errors exist or 
an unrecoverable error occurred, control 
returns to the user with either a zero (I/O 
OK) or an 80 (I/O error) in register 15. If 
an unrecoverable error occurs, BOSHPS updates 
the CCHS and buffer pointers as necessary and 
recalls CHKXTNT and DISKIO to read the next 
record . 

ROSFIND Routine — ROSFIND sets the CCHHR to 
point to a meaber specified in FCBMEMBR or, 
if the FCBMVPDS bit is on, sets the CCHHR to 
point to the next meaber higher than FCBMEMBR 
and sets a new member name in FCBMEMBR. 

Upon entry at the ROSFND entry point, HOSFND 
sets up a CCN to search for a higher meaber 
name if the FCBMVPDS bit is on, or an egual 
member name if the FCBMVPDS bit is off. It 
then calls SETXTNT, DISKIO and, if needed, 
CHKSENSE and GETALT to read in the directory 
block that contains the member name 
reguested. After reading the block, it is 
searched for the requested member name. If 
the member name is not found, an error code 4 
returns to the calling routine. If an I/O 
error occurs while trying to read the PDS 
block, an error code 8 returns to the calling 
routine. If the meaber name is found. 
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TTRCNVRT is called to convert the relative 
track address to a CCHH and pass the address 
of the member entry to the calling routine. 

• ROSNTPTB Routine — ROSNTPTB gets the current 
TTB, sets the current CCHHR to the value of 
the TTR, and backspaces to the previous 
record. 

Upon entry at the ROSNTPTB entry point, 
ROSHTPTB checks to determine if a NOTE, 
POINT, or ESP operation was requested. 

If register is zero, NOTE is assumed. The 
note routine calls CHRCHVHT to convert the 
CCHB to a relative track and returns control 
to the calling routine with the TTR in 
register 0. 

If register is positive upon entry into 
DHSROS, POINT is assumed and ROSNTPTB loads a 
TTR from the address in register and calls 
TTRCNVRT and SETXTST to convert the TTR to a 
CCHHR. Then control returns to the calling 
routine. 

If register is negative upon entry into 
DMSROS, BSP (BACKSPACE) is assumed. The 
backspace code checks to determine if the 
current position is the beginning of a track. 
If not, the backspace code decrements the 
record number by one and control then returns 
to the calling routine. If the current 
position is the beginning of a track, the 
backspace code calls CHRCNVRT to get the 
current CCHH. The backspace code then calls 
rdcnt to get the current record number of the 
last record on the new track, calls setxtnt 
to set the new extent boundaries, and returns 
control to the calling routine. 

DBSSCT MODULE: 

• NOTE Routine — Upon entry to note, DMSSCT 
checks to determine if the DCB refers to an 
OS disk. If it does, DMSSCT calls DMSROS 

(ROSNTPTB) to get the current TTR. Control 
then returns to the user. 

• POINT Routine — Upon entry to point, DMSSCT 
checks to determine if the DCB refers to an 
OS disk. If it does, DMSSCT calls DMSROS 
(ROSNTPTB) to reset the current TTR, calls 
CKCOHCAT and returns control to the calling 
routine. 

• CKCONCAT Routine — Upon entry to CKCOHCAT, 
DMSSCT checks to determine if the FCB MACLIB 
CONCAT bit is on. If it is on, DCBRELAD+3 
sets the correct OS FST pointer in the FCB 
and returns control to the calling routine. 
If the FCB MACLIB CONCAT bit is off, control 
returns to the calling routine. 

• FIND (type_C) Routine — If the DCB refers to 
an OS disk, DMSSCT calls DMSROS (ROSNTPTB) to 
update the TTR and control returns to the 
calling routine. 

EMSSEB MODULE: 

• EOBROUTN Routine — If the FCB OS bit is on, 
control passes to OSREAD. Otherwise, if no 
special I/O routine is specified in FCBPROC, 
control passes to E0B2 in DMSSEB. 



• OSREAD Routine — DMSSEB calls DMSROS to 
perform a read or write and then control 
passes to EOBRETRN which, in turn, passes 
control back to DMSSBS. DMSSBS passes 
control back to the routine calling the read 
or write macro operation. 

DMSSpP MODULI — If the MACLIB CONCAT option is 
on in the CMSCB, OPEN checks the MACLIB names in 
the global list and fills in the addresses of OS 
FSTS for any MACLIBS on OS disks. The CMSCB of 
the first MACLIB in the global list merges and 
initializes CMSCBS. 

If the CMSCB refers to a data set on an OS disk, 
DMSSOP checks to ensure that the data set is 
accessible and the DCB does not specify output, 
BDAM, or a key length. If any errors occur, 
error message DHSSOP036E appears and DMSSOP does 
not open the DCB. DMSSOP fills them in from the 
OS FST for the data set. 

If the CMSCB fcbmembr field contains a member 
name (filled in by FILEDEF with the member 
option) , DMSSOP issues an OS FIND macro to 
position the file pointer to the correct member. 
If an error occurs on the call to the FIND 
macro, error message DMSSOP0 36E appears and 
DMSSOP does not open the DCB. 

DMSSVT MODULE: 

• BSP (backspace) Routine — Upon entry, 
backspace checks for the FCB OS bit. If it 
is on, the BSP routine calls DMSROS 
(ROSHTPTB) to backspace the TTR and control 
returns to the calling routine. 

• FIHD (type_D) Routine — Upon entry to find, 
the find routine checks the FCB OS bit. If 
it is on, the FIND routine takes the OS FST 
address from the CMSCB or, if the CONCAT bit 
is on, from the global MACLIB list. The FIND 
routine then calls DMSROS (ROSFIND) to find 
the member name and TTR. DMSROS searches for 
a matching member name or, if the FCBMVPDS 
option is specified, a higher member name. 
If the DMSROS return code is or 8, or if 
the FCBCATML bit is not on, control returns 
to the calling routine with the return code 
from DMSROS. If the return code is 4 and the 
FCBCATML bit is on, DMSSVT checks to 
determine if all the global MACLIBS were 
searched. If they were, control returns to 
the calling routine with the DMSROS return 
code. If they were not, DMSSVT issues the 
FIHD on the next MACLIB in the global list. 

• BLDL Routine— BLDL list = FF LL NAME TTR KZC 
DATA 

If the DCB refers to an OS disk, the BLDL 
routine fills in the TTR, C-byte and data 
field from the OS data set. 

DMSQRY MODULE: 

• SEARCH Routine — The search routine ensures 
that any OS disk currently active is included 
in the search order of all disks currently 
accessible. 

• DISK Routine — The disk routine displays the 
status of any or all OS disks using the 
following form: 
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•HODE(CDU): (HO. CYLS.)» TYPE R/0 " 0S.« 

DHSSTT liODOlE — DHSSTT verifies that the disk 
being searched is an OS disk. DHSSTT calls 
DHSLFS to get the FST associated vith the data 
set. Upon return froa DHSLFS, DHSSTT checks the 
return code to ensure that CHS supports the data 
set attributes. & return code of 81 or 82 
indicates that CHS does not support the data set 
and Bessage DHSSTT229E occurs to that effect. 
DHSSTT then clears the FST copy with binary 
zeros, and aoves the filename, filetype, 
fileaode, BLKSIZB, LBBCL, BECFH, and flag byte 
to the FST copy. FroB this point on, conmon 
code execution occurs for both CHS and OS 
disks. 



Routines Coiion to All of DHSROS 



procedures froa the procedure library (via the 
PSERV coaaand) or displaying the procedure 
library (via the DSERV coanand) . 

CHS/DOS does not support the standard label 
cylinder. 



INITIALIZING DOS AND 
CONTROL COHHANDS 



PROCESSING DOS SYSTEH 



Initialization of the CHS/DOS operating 
environaent reguires the setting of flags and 
the creation of certain data areas in storage. 
Once initialized, these flags and data areas aay 
then be changed by routines invoked by the 
systea control coaaands. 

Five modules are described in this section: 



CHRCNVRT Routine — The CHRNCVRT routine 
converts a CCHH address to a relative track 
address. 

CHKSENSE Routine — CHKSBNSE checks sense 
bits to determine the recoverability of a 
unit check error if one occurs. 

CHKXTNT Routine — CHKXTHT checks to 
determine if the end of split cylinder or the 
end of extent occurred', and, if so, updates 
to the next split cylinder or extent. 

DISKIO Routine — DISKIO starts I/O operation 
on a CON string via a DIAGNOSE X'20*. 

GETALT Routine — GETALT switches reading 
from alternate track to prime track, and from 
prime track to alternate track. 

RDCNT Routine — RDCNT reads count fields on 
the track to determine the last record number 
on the track. 

SETXTNT Routine — SETXTNT sets osfstend to 
the value of the end of the extent and, if a 
new extent is specified, sets CCHHR to the 
value of the start of the extent. 



DHSSET Activates the CHS/DOS environment 
control blocks to be used during 
CHS/DOS processing. 

DHSOPT Sets or resets compiler execution-time 
options. 

DHSASN Relates logical units to physical 
units. 

DHSLLU Lists the assignments of CHS/DOS 
physical units. 

DHSDLB Associates a DTF with a logical unit 
for CHS/DOS processing. 



DHSSET — Initializing the CHS/DOS Operating 
Environment 



DHSSET initializes the 
environment as follows: 



CHS/DOS operating 



Verifies that the mode, if specified, is for 
a DOS formatted disk. 

Stores appropriate data in the SYSRES LUB and 
PUB. 



SIHDLATING A DOS ENVIRONHENT UNDER CHS 



CHS/DOS is a functional enhancement to CHS that 
provides DOS installations with the interactive 
capabilities of a VH/370 virtual machine. 
CHS/DOS operates as the background DOS 
partition; the other four partitions are 
unnecessary, since the CHS/DOS virtual machine 
is a one-user machine. 

CHS/DOS provides read access to real DOS data 
sets, but not write or update access. Real DOS 
private and system relocatable, source 
statement, and core-image libraries can be read. 
This read capability is supported to the extent 
reguired to support the CHS/DOS linkage editor, 
the DOS/PLI and DOS/VS COBOL compilers, the 
FETCH routine, and the RSERV, SSERV, and ESEBV 
commands. No read or write capability exists for 
the DOS procedure library, except for copying 



Locates and loads the CHS/DOS discontiguous 
shared segment. Saves (in NUCON) the 
addresses of the two major CHS/DOS data 
blocks, SYSCOH, B6C0H,and the address of the 
CHS/DOS discontiguous shared segment 
(CHSDOS) . 

Sets the DOSHODE and DOSSVC bits in DOSFLAGS 
in NUCON. 

Assigns (via ASS6N) the SYSLOG logical unit 
as the CHS virtual console. 



The CHS/DOS operating environment is entered 
when the CHS SET DOS ON command is issued, 
invoking the module DHSSET. 



Section 2. Hethod of Operation and Program Organization 207 



Data Areas Prepared for 
QJlSyJlSlS Initialization 



Processing During DHSjDPT — Setting and Resetting ComBiler Options 



Several data areas are prepared for processing 
daring initialization. The main CMS data area, 
NUCON, is modified to contain the addresses of 
two DOS data areas, SYSCOM and BGCOM. 

The SYSCOM DSECT is the DOS system 
communications region. It consists mainly of 
address constants, including the addresses of 
the AB option table, the PUB ownership table, 
and the FETCH table. It also includes such 
information as the number of partitions (always 
one for CMS/DOS) and the length of the PUB 
table. 

The BGCOM DSECT is the partition 
communication region. It includes such 
information as the date, the location of the end 
of supervisor storage, the end address of the 
last phase loaded, the end address of the 
longest phase loaded, bytes used to set the 
language translator and supervisor options, and 
the addresses of many other DOS data areas such 
as the LUB, PUB, NICL, FICL, PIB, PIB2TAB, and 
the PCTAB. 

The LUB and PUB tables are also made 
available during initialization. The LUB is the 



logical unit block table, 
interface between the user's 
CMS/DOS physical units. It 
for each symbolic device 
system. 



It acts as an 

program and the 

contains an entry 

available in the 



Each of the symbolic names in the LUB is 
mapped into an element in the PUB, the physical 
unit block table. The PUB table contains an 
entry for each channel and device address for 
all devices physically available to the system 
and also contains such information as device 
type code, CMS disk mode, tape mode setting, and 
7-track indicator. 

Two bits are set in DOSFLAGS in NUCON, 
DOSMODE and DOSSVC. DOSMODE specifies that this 
virtual machine is running in the CMS/DOS 
operating environment. DOSSVC indicates whether 
OS or DOS SVCs are operative in the operating 
environment. If DOSSVC is set, DOS SVCs are 
used; otherwise, OS SVCs are operative. 



SETTING OR RESETTING SYSTEM ENVIRONMENT OPTIONS 



Once the CMS/DOS environment is initialized, the 
flags and control blocks set during 
initialization can be modified and manipulated 
to perform the functions specified by commands 
entered at the console. This section describes 
the modules that set and reset the system 
environment options. That is, they set those 
options that control compiler execution and that 
control the configuration of logical and 
physical units in the system. 



The CMS/DOS OPTION command invokes module 
DMSOPT, which sets either the default options 
for the compiler or the options specified on the 
command line. The nonstandard language 
translator options switch and the job duration 
indicator byte are altered. Options are set 
using two control words located in the partition 
communication region (BGCOM) . Bits in bytes 
JCSH3 or JCSWU are set, depending on the options 
specified. 



DMSASN — Associate Sjfstem or Programmer Logical 
Units with Phisical Units 



Module DMSASN is invoked when the ASSGN command 
is entered. DMSASN first scans the command line 
to ensure that the logical unit being assigned 
is valid for the physical unit specified (for 
example, SYSLOG must be assigned to either the 
virtual console or the virtual printer) . Once 
the command line is checked, PUB and LUB entries 
are modified to reflect the specified 
assignment. 

For the PUB entry, the device type is 
determined (via DIAG 2U) and the device type 
code is placed in the PUB. Other modifications 
are made to the PUB depending on the specified 
assignment. The LUB entry is then mapped to its 
corresponding PUB. 



DMSLLJU — List the Assignments of CMS/D03 Logical 
Units 



The function of DMSLLU is to reguest a list of 
the physical units assigned to logical units. 
It performs this function by referencing 
information located in the CMS/DOS data blocks, 
specifically SYSCOM, LUB, and PUB. Another data 
block, the next in class (NICL) table is also 
referenced. 

The information on the command line is 
scanned and the appropriate items are displayed 
at the user's console. If an option (EXEC or 
APPEND) is specified, an EXEC file is created 
($LISTIO EXEC A1) to contain . the output. If 
EXEC is specified, any existing SLISTIO EXEC A1 
file is erased and a new one is created. If 
APPEND is specified, the new file is appended to 
the existing file. 



51?SDLB — Associate a 
IjOaical Unit 



DTF Table Filename with a 



DMSDLB is invoked when the CMS/DOS DLBL command 
is entered. DMSDLB associates a DTF (Define The 
File) table filename with a logical unit . This 
function is performed by creating a control 
block called a DOSCB, which contains information 
defining a DOS file used during job execution. 
DLBL is valid only for seguential or VSAM disk 
devices. 
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This infornation parallels the label 
inforaation written on a real DOS SYSHES unit 
under DOS/VS. The DOSCB contains such 
information as the name, type, and mode of the 
referenced dataset, its device type code, its 
logical unit specification, and its dataset type 
(SAN or VSAM) . 

A DOSCB is created for each file specified by 
the user during a terminal session. The DOSCBs 
are chained to each other and are anchored in 
NOCON at the field DOSFIRST. The chain remains 
intact for the entire session, unless an ABEND 
occurs or the user specifically clears an entry 
in the the DOSCB chain. A given DOSCB is 
accessed when an OPEN macro is issued from an 
executing user program. 



The overall logic flow for 
follows: 



DMSDLB is as 



1. Scans the command line to ensure that any 
options entered are valid (i.e. anything 
to the right of the open parenthesis) . 



2. 



3. 



Processes the first o 
When ddname is specif 
DOSCB chain to find 
none is found, DHSDL 
storage to create a 
file. The old copy 
saved so that, in c 
processing, it can 
The new copy of the 
and DOSCB replaces t 
are no errors. 



perand (ddname or *) . 
ied, loop through the 
a matching ddname. If 
B calls DMSFBE to get 
new DOSCB for this 
of the DOSCB is then 
ase of errors during 
be retrieved intact. 
DOSCB contains updates 
he old copy if there 



The mode specification is checked to ensure 
that it is a valid mode letter; if the file 
is a CMS file, the mode letter must specify 
a CMS disk. If DSN has been specified, the 
mode letter must be for a non-CMS disk. 



4. Process each option 
appropriately. 



on the command line 



5. If EXTEHT or MULT is specified, a separate 
block of free storage is obtained to 
contain information about the extent, for 
example, a block is obtained to contain the 
DOS data set name. 

5. Check for errors. If there are errors, any 
blocks created during processing are purged 
and an error message is issued. If there 
are no errors, restore the old block, which 
has been modified to reflect current 
processing, and return control to DMSITS. 



the type of DTP specified, i.e. the table 
generated by a unit record DTP macro is slightly 
different than the table generated by a DTP disk 
■aero. 

Five routines are invoked to perform OPEN 
functions, DMSOPL, DHSOBI, DMS0H2, DMS0B3, and 
DMSBOP. DMSCLS performs the CLOSE function. 



Openina Files Associated With DTP Tables 



Depending on the type 
a user program, one 
routines could be inv 
control to DHSOBI and, 
specified, DMS0H2 or 
These three routines ( 
request the relocati 
DMSOPL is invoked by 
they need access to a 
These routines are mai 
DMSBOP, which perfor 
opening the specifi 
routines calls DMSBOP. 



of OPEN macro issued from 

of five CMS/DOS OPEN 

oked. OPENR macros give 

depending on the DTP type 

DHS0R3 may be invoked. 

DMS0H1,DMS0R2, and DMS0R3) 

on of a specified file. 

the DOS/VS compilers when 

source statement library. 

nly interface routines to 

ms the main function of 

ed file. Each of the 



DMSBOP is the CMS/DOS routine that simulates 
the DOS/VS OPEN function. The basic function of 
DMSBOP is the initialization of DTP tables, i.e. 
setting fields in specified DTFs for use by the 
DOS/VS LIOCS routines. 

When a DOS problem program is compiling, a 
list of DTFs and ACBs is built. At execution 
time, this list is passed to DMSBOP. The logic 
flow of DMSBOP is as follows: 

1. Scans the list of DTP and ACB addresses, 
handling each iteam in the list in line. 
When the OPEN macro expands, register 1 
points to the name of the $$B transient to 
receive control ($$BOPEN) and register 
points to the list of DTF/ACB addresses to 
be opened. 



2. When an ACB is encountered in the table, 
control is passed directly to the VSAM OPEN 
routine, $$BOVSAM. The VSAM routine is 
responsible for opening the file and 
returning control to DMSBOP. 

3. When a DTP is encountered in the table, 
DMSBOP itself handles the OPEN: 

a. For reader/punch files (DTFCD) , the 
OPEN bit in the DTP table is turned 
on . 



PROCESS CMS/DOS OPEN AND CLOSE FUNCTIONS 



The CMS/DOS 
response to DOS 
DTP (define the 
method control 
DTPxx and ACB 
executing user 
information such 
for the file, t 
device code for 
information in 



PEN routines are invoked in 
OPEN macros. They operate on 

file) tables and ACB (access 
block) tables created when the 

macros are issued from an 
program. These tables contain 

as the LOG unit specification 
he DTP type of the file, the 

the file, and so forth. The 
the tables varies depending on 



b. For printer files (DTFPR) , if two 
lOAREAs are specified, the lOBEG is 
loaded with the address of the 
appropriate lOAREA. Next, the PUB 
index byte associated with the logical 
unit specified in the DTP is checked to 
ensure that a physical device has been 
assigned and the PUB device code is 
then analyzed. The OPEN bit in the DTP 
table is then turned on. 



For console files 
logic is required. 



(DTPCN) , no OPEN 
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n. 



5. 



d. For tape files (DTFMT) , the PUB device 
type code must specify TAPE. If an 
lOREG is specified (for output tapes 
only), the address of the appropriate 
lOAREA is placed in it. For input 
files, there is separate processing for 
tapes with standard label, nonstandard 
label, and no label. For output tapes, 
both tape data files and work tape 
files are treated as no label tapes. 

e. For disk files (DTFxx) , the LUB is 
verified to ensure that the logical 
unit has been assigned. A check is 
made to ensure that the DOSCB exists 
for the DTP filename. For disk output 
files, the address of the appropriate 
lOAREA is placed in lOEEG. For disk 
input files, the existence of the file 
is verified via a call to DMSSST. 
Also, EXTEHT information is initialized 
and the OPEN bit is posted. 

f. DTFDT and DTFCP are separate DTP types 
that could describe any of the above 
devices. 

After all files in the table have been 
opened, DHSBOP returns control to the 
problem program via SVC 11. 

If errors are encountered during DMSBOP 
processing, an error message is issued and 
return is made via SVC 6. 



QiosiSS £il§§ Associated With DTFs 



The CHS/DOS routine that processes CLOSE 
requests is DHSCLS, whose logic is analogous to 
that of DMSBOP, the OPEN routine described 
above: when CLOSE expands, register 1 points to 
$BCLOSE and register points to the list of 
DTF/ACB addresses. The same table containing 
DTFs and ACBs used to open files is also used to 
close those files. Each entry in the table is 
processed as it occurs, with control passing to 
a VSAM CLOSE routine ($$BCVSAM) when an ACB is 
encountered. The OPEN bit is then turned off. 



DMSPET and DMSFCH — Bring a Phase into Storaae 
for ixecution 



The DOS/VS FETCH function is simulated by CMS 
modules DMSFET and DMSFCH. The main control 
block used during a FETCH operation is FCHSECT, 
which contains addressing information required 
for I/O operations. 

The FETCH command line invokes module 
DMSFET. This module first validates the command 
line and issues a FILEDEF for the DOSLIB file. 
It then issues a FILEDEF for a 
DMSFET then issues a DOS SVC a, 
the module DMSFCH to perform the 
operation. 



DOSLIB file. 

which invokes 

actual FETCH 



DMSFCH first 
fetched resides 
core- image lib 
library. If t 
these libraries 
is for a phase 
library. To f 
OPEN and FIND 
18) . 



determines where the phase to be 
The search order is private 
rary, DOSLIB, system core-image 
he phase is not found in any of 
, DMSFCH assumes that the FETCH 
in a system or private core- image 
ind a DOSLIB library member, OS 

macros are issued (SVC 19 and 



Hhen the member is founds OS READ and CHECK 
macros are issued to read the first record of 
the file (the member directory) . This record 
contains the number of text blocks and the 
length of the member. 

All addressing information is stored in 
FCHSECT and the text blocks that the phase are 
read into storage. If the read is from a CMS 
disk, issue the Os READ and CHECK macros to read 
the data. If the read is from a DOS disk, first 
determine whether this is the first read for the 
DOS discontiguous shared segment (bCSS) . If 
this is the case, CCH information is relocated 
to ensure that the DCSS code is reentrant. For 
all reads for a DOS disk, a CP READ DIAG 
instruction is issued. When the entire file is 
read, it is relocated (if it is relocatable) . 

If a DOSLIB is open, close it using an OS SVC 
20 and return control to DKSFET. DMSFET then 
checks to see whether START is specified and, if 
so, an SVC 202 is issued for the CMS START 
command to execute the loaded file. 



PROCESS CMS/DOS 
COMMANDS 



EXECUTION-RELATED 



CONTROL 



Hhen 
control 
DMSITS. 



all FETCH processing is complete, 
returns to the CMS command handler. 



The CMS/DOS FETCH and DOSLKED commands simulate 
the operation of the DOS/VS fetch routines and 
the DOS/VS Linkage Editor. The three CMS 
modules that perform this simulation are: 

• DMSFET — Provide an interface to interpret the 
DOS FETCH command line and execute the phase, 
if START is specified on the command line. 

• DMSFCH — Bring into storage a specified phase 
from a system or private core-image library 
or from a CMS DOSLIB library. 

• DMSDLK — Link edit the relocatable output of 
the CMS/DOS language translators to create 
executable programs. 



Sisulate the Functions of the DOS/VS Linkage 
Editor7~DMSDLK~ 



CMS simulation of the DOS/VS Linkage Editor 
function directly parallels the DOS/VS 
implementation of that function. For detailed 
information on the logic of the function, see 
the publication DOS/VS Linkage Editor Loqic, 
Order No. SY33-8556. 

Note that the modules comprising the DOS/VS 
Linkage Editor are prefixed by the letters IJB 
and are separate CSECTs. ALL of these CSECTs 
have counterparts contained within the one CMS 
module, DMSDLK. They are treated as subroutines 
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within that lodule, but perform the saae 
functions as their independent DOS/VS 
counterparts and have been naaed using the saae 
naaing conventions as for the DOS/VS CSECTs. 
For example, the IJBESO CsECt in DOS/VS is 
paralleled by the CHS DHSDLK subroutine 
DLKBSD. 

A brief dscription of the logic follows. The 
CHS/DOS DOSLKED command invokes the module 
DHSDLK, which is entered at subroutine DLKINL. 
DLKIML performs initialization and is later 
overlaid by the text buffer and the linkage 
editor tables. DLKINL starts to read from a 
DOSLNK file and processes ACTION statements, if 
there are any. 

On encountering the first non-ACTION card (or 
if there is no DOSLNK file) , the main flow is 
entered. Depending on the input on the DOSLNK 
or the TEXT file, records from either of those 
files may be read or records from a relocatable 
library may be read. The type of card image 
read determines the subroutine to which control 
is given for further processing. 

An ENTRY card indicates the end of the input 
to the linkage editor. At this point, a map is 
produced by subroutine DLKMAP. DLKRLD is then 
entered to finish the editing of object modules 
by relocating the address constants. If the 
phases are to be relocatable, relocation 
information is added to the output on the 
DOSLIB. Updating of the DOSLIB library is 
performed by DLKCAT using the OS STOH macro. 

A significant deviation from DOS/VS code is 
the use of OS macros, in some instances, rather 
than DOS/VS macros. To take advantage of CMS 
support of partitioned data sets, the OS OPEN, 
FIND, READ, CHECK, and CLOSE macros are issued 
rather then their DOS/VS counterparts. 



SIMULATE DOS SVC FUNCTIONS 



statement describing how the SVC function is 
performed. 

SVC 0: EXCP — Handled by module DMSXCP. .. reads 
from CMS or DOS/VS formatted disks. CCis are 
converted to appropriate CMS I/O requests, for 
example, RDBUF/iRBUF, CARDHD/CARDPH. The CCB is 
posted (indicating I/O completion) using CMS 
return information. If a non-zero return code is 
returned, a CANCEL is performed. I/O requests 
to DOS disks are handled using CP DIAGNOSE 
instructions. 

SVC U FETCH — Handled by DMSFCH. .. loads a 
problem program phase into core and executes it, 
if execution is requested. For details on how 
FETCH works, see the section "Bring a Phase into 
Storage for Execution: DMSFET and DMSFCH." 

SVC 2: FETCH — Handled by DMSFCH. .. loads a 
$$$$6-Transient phase into core and executes it, 
if execution is requested. For details on how 
FETCH works, see the section "Bring a Phase into 
Storage for Execution: DMSFET and DMSFCH." 

SVC 4: FETCH — Handled by DMSFCH. . .loads a 
problem program phase into user storage and 
executes it, if execution is requested. For 
details on how FETCH works, see the section 
"Bring a Phase into Storage for Execution: 
DMSFET and DMSFCH." 

SIC 5: MVCOM — Handled by DM SDOS. .. provides the 
user with a way of altering bytes 12 through 23 
of the partition communication region (BGCOM) . 
Checks to ensure that the specified field is 
correct length and then moves the information to 
the specified field. 

SVC 6: CANCL — Handled by DMSDOS. .. cancels a 
CMS/DOS session. Processing depends on value in 
register 15 on entry; if above 256 the request 
is from a system program. If below 256, request 
is from a user program. Processing continues 
with control passing to EOJ code, described 
below. 



All SVC functions supported for CMS/DOS are 
handled by the CMS module DMSDOS. DMSDOS 
receives control from DMSITS (the CMS SVC 
handler) when that routine intercepts a DOS SVC 
code and finds that the DOSSVC flag in DOSFLAGS 
is set in NUCON. 

DMSDOS acquires the specified SVC code from 
the OLDPSW field of the current SVC save area. 
Using this code, DMSDOS computes the address of 
the routine where the SVC is to be handled. 

Many CMS/DOS routines (including DMSDOS) are 
contained in a discontiguous shared segment 
(DCSS) . Most SVC codes are executed within 
DMSDOS, but some are in separate modules 
external to DMSDOS. If the SVC code requested 
is external to DMSDOS, its address is computed 
using a table called DCSSTAB; if the code 
requested is executed within DMSDOS, the table 
SVCTAB is used to compute the address of the 
code to handle the SVC. 

The it3ms below show the SVCs supported by 
CMS/DOS simulation routines, the name of the 
macro that invokes a given SVC code, the CMS 
module that executes the code, and a brief 



SVC 7: WAIT — Handled by DMSDOS. . .informs 
system programs to wait for a system event to 
take place before processing can continue. WAIT 
is an effective NOP for CMS/DOS. 

SVC 8: Handled by DMSDOS. . .temporarily returns 
control to a problem program. The address of 
the problem to which control is being passed is 
contained in register 0. This address is stored 
in the SVC save area OLDPSW field and control is 
passed to the CMS SVC handler (DMSITS) . 

SVC 9: Handled by DMSDOS. - .returns control to 
system program (i.e. a user program has been 
given control, as in the case of SVC 8, and must 
return control to the system routine, a 
$$$$B-Transient routine, that called it) . 

SVC JJ: Handled by DMSDOS. . .returns control to a 
problem program from a $$$$-B transient 
routine. Uses the SVC save area OLDPSW field to 
return to the calling program. 

SVC _12: Handled by DMSDOS. . .resets flags in the 
linkage control byte of the Partition 
Communication Region (BGCOM) to zero; also, 
provides the user the capability to use a mask 
to set the value of this same byte. In both 
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cases, the SVC routine that handles the request 
performs an AND operation to accomplish the 
function. 

SVC lU: EOJ -- Handled by DMSDOS. .. normally 
terminates execution of a problem program. 
Clears control blocks and resets control words. 

SVC J6: Handled by DMSDOS. . .establishes linkage 
with or terminates linkage to a user's program 
check routine. Locates the appropriate PC 
option table entry. If contents of register 
is zero, terminates linkage: stores a zero into 
the routine address field of the PC option 
table. If register is non-zero, the address 
of the PC routine and the save area address is 
passed to the STXIT macro. If a STXIT PC 
routine is already active, the complement of the 
new routine address is placed in the PC option 
table; if no STXIT PC routine is active, both 
the new routine address and the save area 
address are placed in the PC option table. 

SVC J[7: Handled by DMSDOS. . .provides supervisory 
support for the exit macro . Locates appropriate 
PC option table entry and restores user's 
registers and PSH. Stores the address of the PC 
routine in the PC option table and returns to 
the next sequential address in the interrupted 
program. 

SVC 26: Handled by DMSDOS. .. validates address 
limits. Checks the limits passed in registers 1 
and 2 and either returns control to the caller 
or writes an error message. 

SVC 33: COMRG — Handled by DMSDOS. .. provides 
the address of the partition communication 
region (BGCOM) . Returns the address of BGCOM in 
register 1. 

SVC 34: Handled by DMSDOS. . .supports the GETIME 
■aero. Updates the date field in the partition 
communications region (BGCOM) . 

SVC 37: Handled by DMSDOS. . .establishes linkage 
to or terminates linkage from a user's abonormal 
termination routine. Locate the AB table 
entry. If register ccontains zeros, 
terminates linkage: if the AB routine is active, 
stores zeros into the routine address field of 
the AB option table. If the AB routine is not 
active, stores zeros into both the routine 
address field and the save area field of the AB 
option table. 

If register is non-zero, establishes 
linkage: passes the address of the AB routine 
and the save area address to the STXIT AB macro. 
If STXIT AB is active, the complement of the AB 
routine address is stored in the AB option 
table. If STXIT AB is not active, both the 
address of the new AB routine and the address of 
the save area are placed in the option table. 

SVC 40: POST — Handled by DMSDOS. .. signals the 
completion of a system event. 

SVC 50: Handled by DMSDOS. . .issues an error 
message and terminates the command. Issued by a 
LIOCS routine when that routine is requested to 
perform a function it could not perform. 



SVC 61: GETVIS — Handled by DMSDOS. .. used by 
VSAM to obtain scratch storage; also, obtains 
storage for a relocatable VSAM routine. Storage 
is obtained from the user free storage area and 
the address of the storage is returned in 
Register 1. 

SVC 62: FREE VIS ~ Handled by DMSDOS. .. returns 
storage obtained by a GETVIS. Address of the 
area to be returned is pointed to by Register 
1. 

SVC 63: OSE — Handled by DMSDOS. . .VSAM uses SVC 
63 to ensure that system resources are updated 
serially, so that two or more attempts to modify 
the same data at the same time do not succeed. 
A table of counters (RURTBL) is kept for system 
resources. These counters are posted when a 
request is made for system resources. If a 
resource is already in use, a return code of 
eight is placed in gister 0. if the resource is 
available, a zero is returned in Register 0. 

SVC 64: RELEASE — Handled by DMSDOS. .. VSAM uses 
SVC 64 to release a system resource obtained via 
USE SVC. The appropriate counter in RURTBL is 
decremented by one each time a resource is 
released. 

SVC 65: CDLOAD — Handled by DMSDOS. . .loads a 
relocatable VSAM phase into storage unless that 
phase has already been loaded. 

If an anchor table is available, it is 
searched for the phase. If the phase is found, 
its load point, entry point, and length are 
returned in registers 0, 1, and 14, 
respectively, and register 15 contains zeros. 

If the phase is not found in the anchor 
table, DMSFCH is called to search for it. If 
the phase is found in the discontiguous shared 
segment, return is made to the requestor as 
above. 

If the phase was found, but not loaded, 
storage is ontained for it via the GETVIS SVC. 
DMSFCH is called again to load the phase into 
the storage just obtained. An anchor table is 
then built in the user area (unless one already 
exists) and return to the caller is then made as 
described above. 

SVC 66: RDMQDE -- Handled by 
DMSDOS. .. determines whether the problem program 
is running in real or virtual mode. Register 
contains zero on return if the program is 
running in virtual mode. 

SVC 75: SECTVAL ~ Handled by DMSDOS. .. used by 
VSAM I/O routines to obtain a sector number for 
3330 or 3340 devices. The appropriate sector 
value is calculated from input supplied in ser 
registers 1 and 0. The sector number (from to 
127) is returned in register 0. 

Certain DOS SVCs are treated as no-ops by 
CMS/DOS and other DOS/VS SVCs are not supported. 
These are listed below. 
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S7CS TREATED AS NO-OP BY CMS/DOS 



PROCESS CMS/DOS SERVICE COMMANDS 



SVC Action 

10: Sets tiner interval 

18: STXIT (IT) 

20: Establishes linkage to OC 

22: Seizes (interruption enable/disable) 

24: Sets timer interval 

35: Holds a track 

36: Frees a track 

41: Dequeues a resource 

42: Enqueues a resource 

52: Returns reaaining tiner interval 

(Register is also cleared) 

67: PFIX, fixes pages in real storage 

68: PFREE, frees pages in real storage 

71: SETPFA 

85: RELPAG 

86: FCEPGOUT 

87: PAGEIN 



DHSSRV — Copies books fron a systea or private 
source statement library to a specified output 
device. 

DHSPRV — Copies DOS procedures from a DOS system 
procedure library to a specified output device. 



DMSRRV — Copies modules from a 
relocatable library to a 
device. 



system or private 
specified output 



DMSDSV — Lists the directories of DOS private or 
system libraries. 

DBSDSL — Deletes members (phases) of a DOSLIB 
library; compresses a DOSLIB library; lists the 
members (phases) of a DOSLIB library. 



SVCS NOT SUPPORTED BY CMS^DOS: The following 
SVCs cause an error message to be generated and 
are treated as a CANCL (SVC 6) . 



ESERV — De-edits, displays or punches, verifies, 
and updates edit assembler macros from the 
source statement library. 



SVC 

~3 

13 

15 

19 

23 

25 

27 

28 

29 

30 

31 

32 

38 

39 

43 

44 

45 

46 

47 

48 

49 

51 

53 

54 

55 

56 

57 

58 

59 

60 

69 

70 

72 

73 

74 

76 



Action 

Forces dequeue 

Sets switches in BGCOH 

Heads queue and executes channel program 

Returns from user's IT 

Loads phase header 

Issues HIO 

Special HIO 

Returns from user's MR 

Multiple WAITN support 

Haits for a QTAM element 

Posts a QTAM element 

Reserved for IBM use 

Initializes a subtask 

Terminates a subtask 

Reserved for IBM use 

External unit checks record 

Emulator interface 

OLTEP in supervisor state 

Multiple HAITF support 

Fetches a CRT trans 

Reserved by IBM 

Returns phase header 

Reserved by IBM 

Frees real page frames 

Gets real page frames 

Gets or frees PUB of POWER device 

Makes POWER dispatchable 

Interface between JCL and supervisor 

Interface between EOJ and supervisor 

EREP and CRT I/O areas address 

REALAD 

VIRTAD 

GETCBUF/FREECBUF 

SETAPP 

Fixes pages in real storage for restart 

Initializes for recording of RMSR I/O 

error 



77: TRANSCSW 
78: Reserved for IBM use 
79: Reserved for IBM use 
80: Reserved for IBM use 
81: Reserved for IBM use 
82: Reserved for IBM use 
83: Reserved for IBM use 
84: Reserved for IBM use 
88 and up: 

Reserved for IBM use 



TERMINATE PROCESSING THE CMS/DOS ENVIRONMENT 



DHSBAB — Gives control to an abnormal termination 
routine once linkage to such a routine has been 
established via the STXIT AB macro. 

DMSITP--Processes program interrupts and SPIE 
exits. 

DMSDMP — Simulates the $$BDDMP and $$BPDUMP 
routines; issues a CP DUMP command directing the 
dump to an offline printer. 



PERFORM MISCELLANEOUS CMS FUNCTIONS 



CMS BATCH FACILITY 



The CMS Batch Facility is a function of CMS. It 
provides a way of entering individual user jobs 
through an active CMS machine from the virtual 
card reader rather than from the console. The 
batch facility reissues the IPL command after 
each job. 

The CMS Batch Facility consists of two 
modules: DMSBTB, the bootstrap routine (a 
nonrelocatable CMS module file) and DMSBTP, the 
processor routine (a relocatable CMS text file 
that runs free storage) . 



GENERAL OPERATION OF DMSBTB 



The bootstrap module, DMSBTB, loads the 
processor routine DMSBTP and the user exit 
routines BATEXIT1 and BATEXIT2 (if they exist) 
into free storage. 

DMSBTB first ensures that DMSINS (CMS 
initialization) has set the BATRUN and BATLOAD 
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flags on in the CHS n 
Indicating that either an 
program load coBDand has b 
CMSBATCH coanand has bee 
after initial progran load 
not, error message DMSBTB 
batch console returns 
interactive environment, 
called to confirm the exis 
file DBSBTP TEXT. If the 
error message DMSTBTIOOE i 
console returns to t 
environment. 



ucleus constant area 
explicit batch initial 
een issued or that the 
n issued immediately 
has taken place. If 
101B is typed and the 

to a normal CHS 
STATE (DMSSTT) is then 
tence of the processor 

file does not exist, 
s typed and the batch 
he CMS interactive 



Using the "state" copy of the file status 
table (FST) for DMSBTP, DMSBTB computes the size 
of DMSBTP TEXT file by multiplying the logical 
record length by the number of logical records 
(no DS constants) . A free storage reguest is 
made for the size of DMSBTP and the address of 
the routine is then stored at ABATPEOC in the 
MOCON area of the CMS nucleus. 

The existence of the user exit routines is 
determined by STATE. If they exist, their sizes 
are included in the request for free storage. 

The free storage address is translated into 
graphic hexadecimal format and the CHS LOAD 
command is issued to load the DMSBTP TEXT file 
into the reserved free storage area. The user 
exit routines, BATEXIT1 TEXT and BATEXIT2 TEXT 
are also loaded at this time. If these files do 
not exist, an unresolved external reference 
error code is returned by the loader, but is 
ignored by DMSBTB because these routines are 
optional. If an error (other than unresolved 
names) occurs, error message DMSBTB101E is typed 
and the batch console returns to the CMS 
interactive environment. 



The loader tables 
address of the ABEND en 
loaded batch processo 
found, its address and 
are stored in ABATA 
respectively, in the 
nucleus. If the A6EMD 
in the tables, error me 
and the batch consol 
interactive environment 



are searched for the 

try point DMSBTPAB in the 

r. When the entry is 

that of entry DMSBTPLH 

BND and the ABATLIHT 

NUCON area of the CMS 
entry point is not found 
ssage DMSBTB101E is typed 
e returns to the CHS 



The BATLOAD flag is set off to show that 
DHSBTP has been loaded, the BATHOEX flag is set 
on to prevent user job execution until DHSBTP 
encounters a /JOB card and finally, control is 
returned to the command processor DHSINT. 

If an error message is issued, DHSERB is 
called to type the message, and the BATRUN and 
BATLOAD flags are set off before control is 
returned to CMS. This allows the normal CHS 
interaction to resume. 



GENERAL OPERATION OF DMSBTP 



The batch processor module DHSBTP simulates the 
function of the CMS console read module DMSCRD. 
This is accomplished by issuing reads to the 
virtual card reader, formatting the card-image 
record to resemble a console record and 
returning control to CMS to process the command 



(or data) request. DMSBTP also performs reads 
to the console stack if the stack is not empty, 
checks for and processes the /JOB card, ensuring 
that it is the first record in the user job, 
traps all CP commands to maintain system 
integrity and performs job initialization, 
cleanup, and job recovery. 

Opon receiving control, DHSBTP checks the 
BATCPEX flag in NUCON. If the flag is set on, 
control was received from DHSCPF and a branch is 
made to the CP trap routine to verify that the 
command is allowable under batch. The function 
of that routine is described later. If the 
BATCPEX flag is off, control was received from 
DHSCRD (console read module) and DMSBTP checks 
for finished reads in the real batch console 
stack. If the number of finished reads is not 
zero, control is returned to DMSCRD to process 
the real console finished (stacked) reads, if 
the number of finished reads is zero, a record 
is read from the batch virtual card reader into 
the CARD buffer via an SVC call to CARDRD 
(DHSCIO) . The record in the CARD buffer is 
typed on the console via the HETERM macro. If 
the BATHOVE flag is set on (HOVEFILE executing 
from the console) , the records in the file are 
not typed on the console. 

The record in the reader buffer is scanned to 
compute its length with trailing blanks deleted. 
It is then moved to the CHS console read buffer 
and the computed length is stored in the 
original DMSCRD parameter list, whose address is 
passed by DHSCRD when it initially passes 
control to DMSBTP. 

If the first user record is not a /JOB card, 
error message DMSBTP 105E is typed and normal 
cleanup is performed with the BATTERH flag set 
on. This flag prevents another initial program 
load, since it is not needed at this time. 
Reads to the card reader are then issued until 
the next /JOB card is found. 

If the first record is a /JOB card, DMSBTP 
branches to its /JOB card processing routine 
which calls DHSSCNN via a BALR. A check is made 
for the existence of the userid and account 
number on the card. If the fields exist, a CP 
diagnose "»C' is issued to start accounting 
recording for that userid and account number. 
If an error is returned from CP denoting an 
invalid userid, or if the userid or account 
number fields were missing on the /JOB card, 
error message DMSBTP 106E is typed and normal 
cleanup is performed with the BATTERM flag set 
on. 

The jobname, if provided on the /JOB card, is 
saved and a message is issued via SVC to inform 
the source userid that the job has started. The 
spooling devices are closed and respooled for 
continuous output, a CP QUERY FILES command is 
issued for information purposes and the implied 
CP function under CMS is disabled and the 
protection feature set off via SVC calls to SET 
(DMSSET) . The BATPROF EXEC is executed via an 
SVC to EXEC. The BATNOEX flag, which is set by 
DMSBTB to suppress user job execution until the 
/JOB card is detected, is set off. The BATUSEX 
flag is set on (for DHSCPF) to signal the start 
of the actual user job, and a branch is taken to 
read the next card from the reader file (user 
job). 
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After reading the /JOB card, DMSBTP continues 
reading and checks for a /* card, a /SET card, 
or a CP command. If a card is none of these, 
DMSBTP passes control back to the command 
processor DMSINT for processing of the command 
(or data) . 

If a /* card is read and it is the first card 
of the new job, it is assume to be a 
precautionary measure and thus ignored by DMSBTP 
which then reads the next card. If it is not 
the first card a check is made for the BATMOVE 
flag. If the flag is on, the /* card indicates 
an end-of-file condition for the MOVEFILE 
operation from the console (reader) and is 
conseguently translated to a null liiie for the 
MOVEFILE command. 

If the BATMOVE flag is not on, the /* card is 
and end-of-job indicator and an immediate branch 
is taken to the end-of-job routine for cleanup 
and reloading of CMS batch. 

When a CP command is encoutered DMSBTP 
branches to a routine that first checks a table 
of CP commands allowable in batch. If the 
command is allowed, a check is made for a reader 
or other spool device in the command line. If 
the CP command is allowed but would alter the 
status of the batch reader or any spooling 
device or certain disks, or if the command is 
not allowed at all, error message DMSBTP107E is 
typed, and the next card is read. 

If the CP command is LINK, the device address 
is stored in a table so that DMSBTP can detach 
all user disk devices at the end of the job. 



A CP DETACH command 
address corresponding 
IPL disk, the batch 19 
device. If the device 
these, error message DM 
the next card is r 
returns control to DM 
BATCPEX flag is set on 
command. 



is examined for a device 
to the system disk, the 
5 work disk or any spool 
to be detached is any of 
SBTP107E is displayed and 
ead. Otherwise, DMSBTP 
SINT (or DMSCPF is the 
) for processing of the 



When a /SET control card is encountered, the 
card is checked for valid keywords, valid 
integer values (less than or equal to the 
installation default values) , and if an error is 
detected, error message DMSBTP108E is typed. An 
abnormal termination message is also sent to the 
source userid and the job is terminated with 
normal cleanup performed. If the control card 
values are valid, the appropriate fields are 
updated in the user job limit table DMSBTPLM and 
the next card is read. 

If DMSBTP detects a "not ready" condition at 
the reader, a message is typed at the console 
stating that batch is waiting for reader input. 
DMSBTP then issues the HAITD macro to wait for a 
reader interrupt. When first detecting the 
empty reader, DMSBTP calls the CP accounting 
routines via a CP diagnose • 4C ' to charge the 
wait time to the batch userid. 



If a hard error is detected at the reader, 

DMSBTP sends an "intervention required" message 

to the system console and branches to its 

abnormal terminal routine and waits for an 



interruption for the reader by issuing the WAITD 
macro. 

When a /* card is read (with the BATMOVE flag 
off) or when the end-of-file condition occurs at 
the reader, DMSBTP branches to the cleanup 
routine which sends the source userid a message 
stating that the job ended normally or 
abnormally (if cleaning upa fter an abnormal 
termination) and turns off the BATOSEX flag (for 
DMSCPF) to signal the end of the user user job. 
CONWAIT (DMSCWT) is called via SVC to allow any 
console I/O to finish, the spooling devices are 
closed (including the console) , and all disks 
that were made available by issuing the CP LINK 
command are returned by issuing the CP DETACH 
command. 

DMSBTP then relinquishes control by issuing 
the CP IPL command with the PARM BATCH option 
which loads a new CMS nucleus and the next job 
is started when CMS attempts its first read to 
the console. 



A branch is 
DMSBTP itself 



reader, 
routine 
DMSABN 
during 



However, the 
is to receive 
when there is 



made to the CMSBTP routine when 
detects an I/O error at the 

primary purpose of the 
control not only from 

an abnormal termination 



the user job, but also from DMSITE, 



DMSPIO, and DMSCIO when a user job exceeds one 
of the batch job limits (BATXLIM flag is on) . 
This routine, entry point DMSBTPAB, calls the CP 
DUMP routine via SVC and then branches to the 
cleanup routine which reloads CMS Batch and 
treat the remainder of the current job as a new 
job with no /JOB card. This has the effect of 
flushing the remainder of the job. This 
technique is used because batch must keep its 
reader spooled "continuous. " Entry point 
DMSBTPAB is also used by the CMS commands that 
are disabled in CMS batch. In this case 
(BATDCMS flag set on) , an error message is 
displayed and control returned to CMS. 

When a CP command is called via an SVC in 
DMSBTP, the CMS CP module (DMSCPF) is acutally 
called to issue the DIAGNOSE instruction to 
invoke the CP command. DMSBTP calls DMSCPF by 
issuing a direct SVC 202 or by issuing the 
LIHEDIT macro with the CPCOMM option that 
generates an SVC 203. 



OTHER CMS MODDLES MODIFIED IN CMS BATCH 



several CMS modules check whether CMS batch is 
running, and, if so, perform functions 
associated with batch operation. These are 
shown in the following list: 

Module Function Performed for CMS Batch 
DMSINI Passes batch parameters to DMSINS. 
DMSINS Oses batch IPL parameters to reload 

CMS Batch. 
DMSLDR Loads DMSBTP into free storage. 
DMSCRD Passes control to DMSBTP to read from 

the reader rather than from the 

console. 
DMSITE Accounts for virtual time used by 

batch job — ABEND if over limit. 
DMSPIO Accounts for number of lines printed 

by batch job — ABEND if over limit. 
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DHSCIO Accounts for number of cards punched 

by batch job — ABEND if over limit. 
DMSABN Passes control to batch ABEND routine 

in DMSBTP. 
DMSERB Passes control to batch ABEND routine 

instead of entering disabled wait 

state . 
DMSMVE Turns the BATMOVE flag on and off — 

allows batch to treat moved blanks as 

data. 
DHSSET Disabled if batch running, except 

during batch initialization. 
DMSRDC Disabled if batch running. 
DMSCPF Distinguishes between CP command 

issued by user and by batch. 
DMSFLD Disallows reader device 

specification. 
EMSDSK Disk load not allowed in batch. 



CP PROGRAM ORGANIZATION 



USE OF THE ANNOTATED FLOW DIAGRAM 



The following text sections, which describe each 
major Cp function, are annotated flow diagrams. 
These diagrams, consisting of logic labels and 
commentary, describe the general flow and use of 
CP logic modules and their relationship to other 
modules while performing a specific function or 
task. The annotated flow diagrams do not 
contain references to error messages, abnormal 
termination conditions, or most control block 
field labels. This avoids complexity and makes 
the general logic of CP and its related tasks 
more understandable to the user. With 
"understandability" as the key, obtuse and 
complex logic that is used for obscure and 
seldom used functions is not described. Also 
the flow diagram does not indicate or describe 
every entry point encountered in a function. 
Nor do the diagrams illustrate the innumerable 
times that commonly used modules are utilized. 
DMKFRE and DMKCVT, the obtaining and returning 
of free storage and the number base conversion 
modules are such examples. Annotated flow 
diagrams are arranged by function and 
subf unction. Titles for these functions and 
subfunctions also precede annotated flow text 
and labels. The text in the charts is prefixed 
by underscored and capitalized entry points and 
labels. Entry points are indicated by 7 or 8 
characters; the first three characters are DMK. 
labels are indicated by prefixing with a comma 
and the six-character module identification. 

Note: annotated flow diagrams are not to be 
construed to be trace material. The dynamics of 
CP operations preclude the use of the annotated 
flow diagrams, as they are shown in this manual, 
as traces of CP functions. 



VM/370 CP INTERRUPTION PROCESSING 
SVC INTERRUPTIONS - PROBLEM STATE 



DHKPSASV 

Entry for SVC interruptions from problem or 
supervisor states. For problea mode and 



SCP used 
examining 

passing. 



in the 
passed 



ADSTOP (SVC X 'B3«)r the overlaid instruction 

is replaced 
DHKCFMBK 

Console function mode is entered. 
DHKPSASV 

~For~problem state SVC 76 (X«4C') check for 

valid parameter passing. 
DHKVERp, DMKVERO 

Determine the operating 

virtual machine by 

parameters in RO and R1. 
DHKPSA, SVCVER 

For invalid parameter 

recording is not performed. 
DMKIOEVR 

The SVC is reflected back to the user. 
DMKIOFVR 

On correct parameter reflection, record the 

error. 
DMKTRCSV 

The DMKTRC module is called if TRACE SVC was 

invoked. 
DMKPSA, REFSVCB 

For EC mode machine or page not in real 

storage. Per results of TRACE activity, go 

to the DMKDSPCH; if not successful, go to 

DMKDSPB. 
DHKPRGRF 

If tracing not active, flag user as being in 

instruction wait state and reflect the SVC 

back to the user. 
DMKPSASy 

If the virtual machine is in BC mode and page 

is in real storage, generate and store an 

old SVC PSH. Then fetch the new SVC PSH. 
DMKDSPB 

If wait state is not indicated, store user's 

new PSH in RUNPSH, restore registers and 

dispatch via LPSH. 



SVC INTERRUPTIONS - SUPERVISOR STATE 



and is a SVC 



DMKPSASU 

Entry is for a system failure 
or SVC H ABEND condition. 

DMKDMPDK 

Perform partial or full real storage dump. 

DMKCKPT 

Checkpoint the system. 

DMKCPINT 

Perform an automatic IPL if indicated 

DMKPSA,SVCLINK 

Entry via SVC 8 provides linkage to a called 
routine in R15 

DMKPTRUL 

If called routine is not resident, page it in 
and return control to the caller by loading 
the SAVERTH into the old PSH and then load 
the old PSH. The callers addressability, 
SAVEAREA address and return address are 
maintained in a new SAVEAREA. 

DHKPSA, SVC BET 

Entry via SVC 12 return control from 
called routine to the calling routine 
restores addressability via R12 and R13. 

DMKPGSOL 

If a nonresident module - unlock page 
return it to DASD device. 

DMKPSA, SVCRLSE 

Entry via SVC 16 to release the current 
SAVEAREA used by SVC 8 and 12. Return to 
caller. 



the 
and 



to 



216 



IBM VH/370; System Logic and Problem Determination Guide 



DHKPSA, SVCGET 

Entry via SVC 20 to obtain a new SAVEAREA. 
Return to caller. 



the class and code, branch to the appropriate 
data collection routine. 



EXTERNAL AND CLOCK INTERRUPTION REFLECTION 



5i3§§ Code Function 

Perform tiner driven system 
clock and counter recording 

97 MONITOR tape header record 

98 MONITOR tape trailer record 

99 MONITOR suspension due to tape 
DMKPSAEX busy 

Entered via the interruption key on system 1 Begin console read 

console, adjust accounting to charge for 1 Console output 

supervisor overhead. If problem mode, ATTN 2 End Console read 

interruption, update the virtual machine PSW 3 Console sleep 

from the external old PSW. 2 2 Drop user from queue 

MKPSA, EXTBDTTN 3 Add user to queue 

Exit to dispatcher, if there is no logged-on 4 Add user to eligible list 

operator, or the operator is disconnected, or 4 Oser statistics 

there is no active terminal. If the operator 5 instruction simulation 

was logged on and the external interruption 6 0+1 DASTAP 

key was pressed, disconnect the operator's Device statistics header 

terminal 7 DASD seek channel program 

DMKfiCNCL 8 2 Device statistics and system 

Clear all console requests. counters 
DMKSCNRD 

If the device is a terminal or graphic device Each collection routine calls buffer 

issue HIO to the real device management for space for the collected data. 

DMKDSPCH If the MONITOR tape is busy MONITOR activity 

Exit to the dispatcher. is suspended. If not busy call - 

IMPS A, EXT BUTT H DMKSTKCP 

For 370t/3705, convert resource identifier to~stack a CPEXBLOK for the event to call the 

for the NCF terminal for the indexable entry scheduler. 

into the NICBLOK for the associated VMBLOK DMKHQN, EXIT2 

then Restore all registers to their previous 

DMKROMP values prior to the MONITOR CALL. Load the 

Reset all BTUs. old program check PSW to resume processing. 
EMKDSPCH 

Exit to the dispatcher. 
PMPSA, EXTEXTD 

Upon "location X»80« timer interruption, PROGRAM INTERRUPTION PROCESSING 

indicate the user end of the time slice by 

storing flag in the VMBLOK's VMOSTAT. 

DMKDSPCH DMKPRGIN 

Exit to dispatcher. For a program interruption received while in 

DMKPSA, EXTTIMER supervisor mode (indication of CP module 

Upon CPU timer interruption, VMTLEVEL in error) and INTRDR+1 does not indicate MONITOR 

VMBLOK as a real CPU timer interruption. CALL (X'i»0') exit to - 

DMKTMRVT DMKPRG, CPERROR 

Simulate the interruption. Send ABEND message to the system operator. 

DMKDSPCH DMKDMKPK 

Exit to the dispatcher. Dump storage and initiate IPL 

DMKPSA, EXTCKC DMKPKGIN 

Upon clock comparator interruption reflection For supervisor state and MONITOR CALL save 

DMKSCHTfi registers in in DMKPRGPR 

Use the printer to unchain the active PMKPRGMI 

TRQBLOK. Call DMKSTKIO. ~ Do MONITOR CALL interruption processing 

DMKSTKIO (DMKMON) . 

Stack the block. DMKPRG, PRNSIM 

DMKDSPCH For paging exception XM1« and EC mode with 

Exit to dispatcher. DMKVATEX 

Translation on, process the exception. 
DMKPRGIM 

For paging exception, x Ml' and EC mode with 

MONITOR INTERRUPTION PROCESSING DMKVATPF 

DMKVATPF 

Translation off, and enabled for I/O 

DMKMONTI interrupts and PAGEX on, process the pseudo 

For monitor requests, with an operation code page fault 

of X'AF', increment TOD with DMKPRGTI value DMKPBG, PAGEXCP 

and insert in TRQBLOK. For all other page fault conditons go to 

DMKSCHST DM KPT RAN 

Insert the block in the request block chain. DMKPTRAN 

DMKMONTI Bring in the page from the auxiliary device. 

Collect Monitor timer driven date for the DMKDSPCH 

enabled classes. On the successful decode of Exit to dispatcher. 
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DMKPRG, PR N STAT 

For segment exception X' 10* with EC mode on 

and translation on 
DMKVATSX 

process the exception. 
DMKPRG, PRGSIMI 

For the segment exception, X'10« does not 

follow the above parameters; process it as an 

addressing exception. 
DHKPRG, THAN SEX 

Process X'12' translation exceptions. 
£1!KPRG» PRG01 

For privileged or operational exception of a 

virtual machine in supervisor mode, examine 

ITRPR+1 if X«01' or '02 • call - 
DMKPRVLG 

to process the exception. 
DMKPRV, DMKPBGSB 

For virtual machines in problem mode, store 

the users new program PSW in TMBLOK VMPSH. 
DMKPSASV 

When the program interrupt occurs and the 

users page is not resident or the virutal 

machine is in EC mode, paging is performed 
EMKDSPB 

Check the new PSH. 
DMKPRVLG 

Validate the privileged operation indicated 

in VMIllST+2 and perform the service. 

^o^e 2E§£9ltion 

X'08' SSK - Set storage key 

X'09' Insert storage key 

X'Ua« EX - Execute instruction 

X'80« SSM - Set system mask 

X«82« LPSW - Load PSH 

X«9C« SIO - Start I/O 

X«9D« TIO - Text I/O 

X«9E' HIO - Halt I/O 

X«9F' TCH - Text Channel 

X»AC« STNSM - Store, then AND system mask 

X'AD' STOSM - Store, then OR system mask 

X'BI' LRA - Load real 

X»B202« STIDP - Store CPD ID 

X«B203» STIDC - Store channel ID 

X«B20U' SCK - Set TOD clock 

X'B206' SCKC - Set TOD clock comparator 

X'B207« STCKC - Store TOD clock comparator 

X«B208« SPT - Set CPU timer 

X«B209« STPT - Store CPU timer 

X»B20A« SPKA - Set PSW key from address 

X'B20B' IPD - Insert PSW key 

X'B20D» PTLB - Purge TLB 

X«B6' STCTL - Store control registers 

X"B7' LCTL - Load control registers 

X^BA' CS - Compare and swap 

X'BB* CDS - Compare double and swap 



DMKHVCAL 

On privileged operations of DIAGNOSE X«83' 

and the associated function code, perform the 

service. 
DMKVIO 

Execute privileged I/O operations of SIO, 

HIO, TIO and TCH. 
DBKTMRTH 

Perform privileged operations related to TOD 

clock, TOD clock comparator and the CPU 

timer. 
DMKPRGSjl 

Program interruption is reflected back to the 

user on invalid instruction operands. 



unsupported instruction operand codes and 
DIAGNOSE '83' function codes that are not a 
multiple of U. 



VIRTUAL I/O 
PROCESSES 



OPERATIONS 



AMD 



INTERRUPTION 



CTCA OPERATIONS BETWEEN TWO VIRTUAL MACHINES 



DMKVIOEX 

Virtual I/O operation is reflected to DMKVCA, 

the channel adapter module, for processing. 
DMKVCAST 

For SIO, check if the CTCA is coupled. If 

not coupled, call DMKDIASM. 
DMKDIASM 

simulate return status. 
PUMCA, VCHSTART 

For a coupled CTCA, analyze operations 

resulting in X-side (read) and Y-side (write) 

of the data transfer operation. 
PHKXCA, VCASIOB 

Detected interruptions are presented to users 

via stacked lOBLOKS and DMKSTKIO. 



determined by examining 
to determine mode and 



processed by determining 
present and whether the 



DMKVCATS 

CTCA TIO activity is 

Y-side information 

activity. 
DMKVCASH 

CTCA HIO and HDV is 

the conition code to 

Y-side should be notified. 
DMKVCARD 

CTCA process results from RESET xxx or SYSTEM 

RESET commands. The CTCA status is reset but 

the CTCAs are not uncoupled. 
DMKVCARS 

Uncoupling CTCA is achieved in the VDEVBLOK 

(VDEVNRDY flag) idle CTCA plus an invoked 

DETACH XXX or user LOGOFF. Return to calling 

routine. 



SCHEDULING I/O FOR CP AND THE VIRTUAL MACHINE 



DMKIOSQR 

Entered via SVC. Entry point indicate a CP 
I/O event as indicated in the lOBLOK. For 
start request, increment the SIO count in the 
RDEVBLOK and start the device if it is 
available. If not (device busy or already 
scheduled) queue the lOBLOK and return the 
operation to the caller. 

DMKIOSfiV 

Entered via SVC. Entry point indicates 
virtual machine initiated I/O event. 
Preserve VMBLOK address in R11, turn off 
lOBCP bit in the lOBLOK, add 1 to SIO count 
in the VDEVBLOK (or RDEVBLOK) . Process the 
SIO if there is any available path to the 
device. If not, queue the lOBLOK and return 
the operation to the caller. 
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STANDARD DASD I/O IMITIATED VIA DIAGNOSE 



DMKDGDDK 

Perform simple disk I/O of a standard 

format. Entry is via DHKHVC code XM8«. 
DMKSCNVU 

Find device related to SIO cuu address. 
DMKFEEE 

Allocate storage for lOBLOK and RCWTASK. 
DMKGDDK 

Build and check the CCH string. 
DMKIOSfiV 

Execute I/O. On completion, post condition 

code (and error return code in HI 5, if 

detected) . 
DMKDSPCH 

Exit to dispatcher. 



GENERAL I/O OPERATION INITIATED VIA DIAGNOSE 



EMKGIOEX 

Perform general I/O operation. Entry is via 

DMKHVC code 20. 
DMKSCNVU 

Find device related to SIO cuu address. 
DMKFEEE 

Allocate storage for the lOBLOK. 
DMKCCWTR 

Build the read CCH list. 
DMKIOSjJV 

Queue the I/C request for execution. 
jDMKGIO, DIAGHTN 

On interruption return, check status. 
DMKUNTFR 

If no problem encountered, free storage used 

for CCH string and lOBLOK. 
DMKGIQ, DIAGRTN 

Reflect the condition code and return code to 

the user. 
DMKDSPCH 

Exit to dispatcher. 
DMKUNTRN 

On returned error condition, convert real CSH 

to virtual CSH and set in user's page 0. 
EMKGIO, GIOEXT 

Exit via SVC 12. 



VIRTUAL MACHINE I/O INSTRUCTION SIMULATION AND 
INTERRUPTION REFLECTION 



IZO Instruction Simulation 



DMKIOEX 

Entry from DMKPRV to simulate I/O per 

VMBLOK's VMIST field. 
fiMMIfir ZIQSIO On detected SIO, call - 
DMKSCNVU 

To locate VCHBLOK, VCUBLOK, and VDEVBLOK for 

the cuu called per SIO instruction. 
DMKVIOEX 

Determine device availability and set 

condition code accordingly. 
DMKI0Si2V 

If the operation is warranted, schedule the 

operation. 
DMKIIQr IIOTIO 

For TIO, check device status, pending 

interrupts, and set appropriate condition 

codes. 



DMMIO, V 10 Hip 

For HIO, check for dedicated channel, CE, CU, 
or device busy condition, and subchannel busy 
and set appropriate condition codes. 

PMKVIOr VIOTCH 

Check for dedicated selector or busy channel 
and check for pending abnormal interruption 
and set appropriate condition code. 



l£££rru£tion Reflection 



DMKVipiN 

Entry from DMKDSP to process the reflected 

virtual interruption. 
DMKSCNVU 

Locate the VCHBLOK, VCUBLOK, and VDEVBLOK. 
DMKVIOIN 

Analyze blocks and reflect condition code to 

user. If condition code equals 1 (cc=1), 

save status from the real device (if real 

device) and DMKUNTFR. 
DMKUNTFR 

Translate and store CSH in user's page 0. 
DMKIIO, VIOCCJ 

On TIO or HIO, free the device and set CC=1. 
DMKFRET 

Fret storage for the lOBLOK. 
DMKDSPCH 

Exit to dispatcher. 



VIRTUAL CONSOLE SIMULATION 



DMKVIOEX 

Entry for virtual console activity comes from 

the SCP stored in the user's virtual 

machine. The program's generated CCHs and 

data are reflected to the attached terminal 

used by the virtual machine operator. 
DMKVCNEX 

Locate and move non-TIC CCHs from the users 

virtual storage to a VCONCTL block. 
DMKVCN, GET CCH 

Update CAH and CSH in respective control 

block. 
DMKVCN, VCNRD 

For read operation, build a read console 

buffer VCONBUF for the input to be read from 

the terminal. 
DMKQCNRD 

Execute the read operation and call 

DMKVCHEX. 
DMKVCNEX 

Set return address in VCONCTL VCNRDRET 

field. 
DMKVSPVP 

Spool console activity if SPOOL CONSOLE START 

specified. 
DMKpSPCH 

Exit to dispatcher. Halt for completion. 
DMKVCN VCNHR 

Calculate and obtain free storage (VCONBUF) 

necessary for the write to console 

operation. 
DMKVCN, VCNMDAT 

Translate and bring in user's data page and 

move it into VCONBUF. 
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DMKQCNWT 

Write data to user's terminal. 
DMKDSPCH 

Exit to dispatcher. 

DHKVCH, VCMSMCM 

ON a sense operation r set CE and DE in the 
virtual PSW. Beflect the PCI flag in the PSH 
if the PCI flag was set in the CCH. Set the 
IL flag if warranted. Move the sense data 
from the VDEVBLOK to user storage as 
designated by the CCW. Update VDEVBLOKS 
VDE¥CSW to reflect status and count. 

DMICN, VCNCCJ 

On completion of I/O operation, set 
appropriate status for command reject, not 
ready protection check, incorrect length, 
channel program check. Set appropriate CC 
and CSH in users page 0. Otherwise post 
pending interruption status in VHBLOK, 
VCHBLOK, VCUBLOK and VDEVBLOK. 

DMKVCH, FLAGTEST 

If command chaining, process the next CCW. 

EMKDSPCH 

Exit to dispatcher. 



LOCAL GRAPHIC I/O AND INTERRUPTION PROCESSING 



DMKGRBEN 

Entry for local graphic device enable and 
disable function (from DHKCPVEN and unstacked 
CPEXBLOK). Invoking CP ENABLE/DISABLE 
commands, start or terminate local 3270 
display (and supported print devices) and 
3066 console activity. 

DMKFREE 

Performs enabling function. Gets storage for 
lOBLOK and TRQBLOK generation. 

DMKGRB, LQGUSER 

Form and write out the logo at the screen. 

PMKGRB, ATTNMI 

Unsolicited attention for RDEVBLOK 
(enabled) . 

DHKBLDVM 

Build LOGON VMBLOK for logon process. 

DMKCFMBK 

Enter console function mode for terminal 
input. 

DMKigSfiR 

Schedule request to clear screen preparatory 
to logon. 

DMKDSPCH 

Exit to dispatcher to wait for interruption. 
Successful logon per the next interruption 
begins the operation of building the user's 
virtual machine. 

DMKGRAIN 

Local 3270 display and 3066 interruption 
entry from dispatcher. 

DMKSCNBU 

From the lOBLOK, locate the real device 
blocks related to the interruption. Analyze 
lOBLOK CSW and condition code and the I/O 
operation to determine read/write sequential 
action. For unit error, retry 10 times (if 
applicable) . If recovery fails, log off. 
For ATTN interruptions, attempt to log on the 
new user if unsolicited ATTN occurs. 
Otherwise, set up for READ CCW string. 

DMKFREE 

Get storage for function and build CONTASK, 
lOBLOK, TRQBLOK. 



DMKIOSQR 

Issue the SIO. 

DMKDSPCH 

Wait for the response. 

DMKGRA, RDINT 

On the interruption response, go to the 
return processing address in the TRQBLOK 
extension THQBCRT. For read return, 
determine function key action and write 
response (if appropriate) via KEYTBL. On 
response of CE and DE go to auxiliary 
processing address and execute the processing 
routines : 

CONRETBF - completion of a write CONTASK 
RDMINT - completion of a buffer read 
GRFCFM - execute console function 
SETREJ - set no accepted timer 
SETMOR - set more... timer delay 
SETWNG - set 10 second clear warning 
RDEXIT - clear buffers after PF keys 
STRTREAD - set read status 
HOCTL - process next CONTASK or go idle 

DMKGRA, RDATA 

Process read response of data plus ENTER 

key. 
DMKCNSED 

Edit and modify length count. Move data to 

caller's buffer. 
DMKfiCNWT 

Schedule rewrite to screen (unless 

inhibited) . 
DMKigSgR 

Perform start I/O. 
DMKDSPCH 

Exit to dispatcher. 
DMKGRBIC 

Entry point to process CONTASKS queue for 

local 3270 and 3066 devices. 
DMKFREE 

Get storage for lOBLOK and TRQBLOK. 
DHKGRB, BLDCCWS 

Execute CONTASK, if appropriate. If not - 
pilKpsPCH 

Exit to dispatcher. 



LOCATE AND VALIDATE AN ISAM READ SEQUENCE 



DMKISMTR 

intry from DMKCCW modules to locate and 
modify an ISAM CCW string. Using the lOBLOKs 
lOBCAW locate the RCWTASK. Check for the 
ISAM read CCW. 

DMKISM, CHKRD 

Check for the correct ISAM sequence as 
follows: 

1. The last CCW in the RCWTASK is a TIC. 

2. This RCWTASK points to the nex,t RCWTASK 
with a minimum of 2 CCWs. 

3. The first modified CCW is in real 
storage. 

H. The last byte of the ISAM read overlays 
the operation code of the first CCW in 
the next RCWTASK. 

5. The TIC in the RCWTASK is to the next 
RCWTASK 's first CCW. 

6. The date address of the first CCW in the 
next RCWTASK is the same address of the 
ISAM read+1 as it is in real storage. 
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DHKFREl 

Storage obtained for seven double words save 

block. 
DMKISM, CHKTSK2 

Institute the ISAM read aodification as 

follows: 

1. Set the read to point to the save block 
data area. 

2. Set the CP TIC to point to the modified 
CCH in the same block. 

3. Set the modified CCH (seek head) in the 
save block to point to the save block 
data area. 

U. Set the CP TIC in the save block to 

return to the RCHTASK following the 

modified (seek head) CCH. 
5. Set the search CCH in the RCHTASK to 

point to the data area in the same 

block. 



DODBLEHOBD SAVE BLOCK 



Bead 


Address | (2) TIC Address 


1 




Onused | 






Read Data. Area 




1(3) 


Modified CCH 




(*») 


TIC to RCHTASK 






Real Read CCH 






Real TIC CCH 





DMKISM, CHKTSK2 

Return to DMKCCH module via SVC 12 



SCHEDDLING CP AMD VIRTUAL MACHINE I/O OPERATIONS 
AND INTERRUPTION HANDLING 



DMKigSQR 

Entry to process CP generated I/O. Flag the 
lOBLOK as a CP generated event. Initiate I/O 
if path to real device is free (available) . 
If not, gueue the lOBLOK and return to 
caller. 

DMKIOSflV 

Entry to process I/O for virtual machine I/O 
operations. MARK lOBLOK as not CP 
initiated. Save VMBLOK address. If path to 
the VDEVBLOK or the VDEVBLOK is busy queue 
the lOBLOK and return to caller. 

£!1KI0S,I0STATPV 

If avciilable status, start the I/O and return 
to caller. 



SIO Ogerations 



DMKios, igssig 

Set the subchannel path busy and chain the 
active lOBLOK from the RDEVBLOK. 

DMKigs, igssio 

Locate caller *s CAH and issue the SIO. Check 
SIO completion. Returned condition code sets 
sequel action. cc=0 indicates successful 
start; cc=1, ccw stored, initiate sense 
operation; cc=2, busy condition, retry or 
requeue lOBLOK; cc=3, fatal error (not 
operational, stack the lOBLOK and return to 
caller. 



HIQ Operations 



DMKigSHA 

Entry point for halting a device. If device 
is not active, return to caller. If lOBLOK 
active, reset the lOBLOK to halt the device 
and mark the device reset in RDEVBLOK. 

DMKigs, igsjoKi 

If the channel path is busy with a burst mode 
operation, stack the lOBLOK to halt the 
operation when the channel path becomes 
available. Return to caller. 



lDiSiEi]J£ti°JB RE££SSSiIi3 



DHKigsiN 

Entry from I/O new PSH. Check old PSH. If 

problem mode, save CPU status in the VMBLOK. 
DMKSCHRN 

Locate RCHBLOK, RCUBLOK, RDEVBLOKs for 

interruption unit. 
DMOSQDC 

Process dedicated channel interruption 

condition. If control unit end or channel 

available interruption occurs, restart the 

operation, if interruption does not occur 

stack it. 
DMKigsiN 

If the lOBLOK is not active on RDEVBLOK 

interruption, call DMKIOS. 
DMKigS, igSENSE 

Schedule sense operation, then go to 

dispatcher. 
DMKIQS, igSRSTRT 

For PCI or CE interruptions, copy and stack 

the lOBLOK. 
DHKCNSIN 

Process PCI or CE interruptions, if related 

to local graphic device or nondedicated TP 

line. 
DMKigS, Dg SENSE 

For split seek complete interrupt, rechain 

the seek and reschedule operations. 
DMKSTKig 

Stack lOBLOK and restart any units freed by 

the interruptions. 
DHKDSPCH 

Exit to dispatcher. 



DMKigS, igBSTART 

If I/O request has not been reset, save the 
address of the active lOBLOK and set device 
busy. If the device is being reset, unflag 
scheduled device and scheduled control unit. 
Stack the lOELOK and restart the device. 
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TERMINAL CONSOLE I/O CONTROL, START/STOP, 3210, 
3215, AND OTHERS 



Jsablina/pisajblinj 



DMKCHSEN 

Per unstacked CPEXBLOK, on enable or disable 

function, check current status of the current 

real device and set flag in RDEVFLAG. Build 

CONTASK and lOBLOK. 
DMKIOSfiR 

Issue SIO for enabling or disabling function 

and check return. 
DMKDSPCH 

Exit to dispatcher. 



Process CONTASK data 



DMKCNSIC 

Entry froa DHKQCO nodule. Build I/O CCW 
string as defined by the console device 
type. Also select the proper line code to 
interface with the device. Place in 
CONTASK. For output CONTASK determine the 
correct translation table applicable to 
teminal connunications (DHKTBL) . To append 
proper control character to the data stream 
for the particular device type, refer to the 
following labels: 

• SiJKCNS, IHCWTTY 
Teletypewriters 

• DHKCNS, INC27aj 
2741, 3767 

• DMKCNS, IHC1050 
l050, 1051 

• DMKCNS, INC3210 
3210, 3215 

CMKCHS, IHCFINS 

Attempt to start I/O by halting the current 
operation, if the operation is a 'prepare' 
CCH or the input is a read and the 
forthcoming output is a priority write 
CONTASK. 

DMKFREE 

Get storage to build lOBLOK, if needed. 

EBKCNSIN 

Set return address in lOBIRA. 

DMKIOSfiR 

Start I/O. If busy condition encountered 
build CPEXBLOK and queue for later 
execution. 

DHKDSPCH 

Exit to dispatcher. 



assume an attention interruption and build a 

•prepare' CCW for the 2741. 
DMKCNS, CNSLOGF 

For unit check and timeout condition - logoff 

the virtual machine and re— enable the line. 
DMKCNS, CNSRTRY 

For data check and other conditions, retry 

the previous operation. 
DMKCfiHET 

Process completed output contask. 
DMKCNSIN 

Interpret interruption status and CCH 

residual count for input CONTASK completion. 
DMKCNS, CNINCT 

Validate input data and control characters 

and translate to EBCDIC from line code. 
DHKTHHip 

Attempt to identify, if applicable, the line 

code identification; PTTC/EBCD or 

correspondence . 
DMKCNSED 

Perform line editing of the input buffer. 
DMKCNS, CNSRTifJ 

Prepare and issue control CCHs to request 

status information from the terminal. 



Processing the Control CONTASK Interruption 



DMKCNSIN, CNSCTAK 

For control task interruption return, examine 
the interruption status according to control 
task function: 

• DMKCNS, CNSTAK 
Reset control task. 

• DMKCNS, CHSCTID 
Device identification. 

• DMKCNS, CNSCTPR 
Attention signal. 

DMKCNS, CNSCTPR 

Write 'VM/370 Online' interpretation of 
response determines retry, or build new 
CONTASK and execute or stack or process next 
CONTASK. 

DHK^CNET 

Process completed CONTASK requests. If no 
tasks remain for the terminal, set lOBLOK's 
lOBIRA to DMKCNSIN and link the lOBLOK to the 
user. 

DMKDSPCH 

Exit to dispatcher. 



CONSOLE SCHEDULING 



Start^StO£ Terminal Interruption Process 



DUKCNSIN, CMBREAK 

For an active input task halted, 

RDEVFLAG=RDEVHIO to process priority output 

task. 
DMKFREE 

Build CONTASK for reverse break CCWs. 
DMKCNS, CNSBREAK 

Move the input CONTASK following the last 

priority write output CONTASK on the chain. 
DMKCNS, CNSIOUC 

For unit check with intervention required. 



DMKQCNHD 

SVC entry to build CONTASK for input data. 

Set the input buffer to zeroes. 
DMKFREE 

Get storage to build CONTASK. 
DMKQCN, ENQOEOE 

Stack CONTASK on RDEVBLOK, if RDEVCON was 

zero. If not, exit to the appropriate 

interrupt handler per RDEVTYPC and RDEVTYPE 

or - 
DMKSPCH 

Exit to dispatcher. 

DMKQCNHT 

SVC entry to build CONTASK for output data. 
Strip trailing blanks from output message. 
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■odify byte count and determine real device 

destination. 
DMKFBEE 

Get storage to build output CONTASK. 
DMKflCH, HRDSCK 

Update CONTASK CCH message byte couht for the 

message text, terminal and line control 

information and (if appropriate) time stamp. 
DMKCVTDT 

If time stamp required, get the value for 

CONDATA area. 
DMKVSPVP 

Spool console message, if ?DEVFLAG=VDEVCSPL . 
DMKfiCH, CRSCAN1 

If message data contains carriage returns, 

XM5«, create a separate CONTASK for each 

line. 
DBKfiCN, HAKEUPR 

On first CONTASK or priority CONTASK, enqueue 

on chain from BDETBLOK in appropriate 

location, then call related interrupt 

handler. 
DMKfiCN, WAKEMUP 

If NORET or DEFRET specified, build and stack 

CPEXBLOK to alert the interruption handler 

and return via EXIT SVC otherwise go to 

specified interruption handler. 
JDHEfiCNTO 

Entry via SVC to disconnect and logoff a 

virtual machine as a result of transmission 

line failures. Place the virtual machine in 

a wait state, VMRSTAT=VMCFWAIT. 
JDMKSCHDL 

Alter virtual machine to unrunnable state. 
DMKFREE 

Get storage for message for the system 

operator. 
DHKSCNRHf DMKSCNRD, DHKCVTEH, EMKSYSNM 

Fill in message variables. 
DMKSCNR, DMKSCNRD, DMKCVTBH, DHKSYSNM 

Fill in message variables. 
DMK2CNWT 

Send the user disconnect message to the 

operator. 
SM2CN, DSCGTRfi 

Build TRQBLOK, if needed, for 15 minute 

delay, schedule it, and exit via SVC. 
DBKflCN, DSCTLOG 

After time elapse, TRQBLOK is unstacked and 

VMOSTAT is set to VMKILL for inevitable 

DMKUSOFF logoff operation. 
DMKDSPCH 

Exit to dispatcher. 



3704/3705 INTERRUPTION HANDLER 



DBKHNHIC 

Entry via DHKQCN or via CPEXBLOK for 
3704/3705 resource initialization. Locate 
the NICBLOK and check resource avaiability. 

DHKRNH, LINEBRK 

For resource unavailable, set RC=12 in 
CONTASK save area and return task via 
DMKQCNET. 

DBKRNH, TAGTASK 

For resource available, set CONTASK values 
per input and output task requirements. 

DBKRNH, TASKEKfi 

Move CONTASK from RDEVBLOK chain to NICBLCK 
chain. 

DHKRO* M START 

On 3704/3705 available condition, search 
NICLIST and build an lOELOK if required. 



DBKHNHIC, RNEXLST 

Search the NICBLOKS for CONTASKs to be sent 

to 3704/3705, build and chain for output. 
DBKRNH, RNCfiill 

Perform necessary function for each 

resource. 
DMKigS^R 

Start output I/O operations. 
DBKRNH, RNICHN1 

Return via R7. 
DBKHNHND 

Entry via SVC to schedule resource control 

tasks. 
DBKRNH, RNHNDTK 

Build control CONTASK and enqueue it for 

execution. 
DMKRHH, STKCPEX 

For NOHET specified, build and stack a 

CPEXBLOK to perform SVC exit. 
DMKHNH, RNDEXIT 

~Attempt~to start output via GOTO DMKRNHIC. 
DMKRNH, RNFDISC 

intry for 3704/3705 recovery. 
DMKNLDR 

Load the 3704/3705, if it was not previously 

loaded. 
DHKFRE 

Get storage to build CKPBLOK 

(telecommunications control block) , if 

necessary. 
DMKRNH, RNSBITS 

Record active line and enabled terminal flag 

bits. 
DMKflCNET 

Clear CONTASK chains. 
DBKfiCNTO 

Force disconnect to all active users. 
DMKNLDMP 

DUBP the 3704/3705. 
DBKNLDR 

Reload the named program. 
DBKRNHND 

On 'IPL complete* signal, reeQable 

resources. 
DMKFRET 

Release the CPEXBLOK. 
DMKDSPCH 

Exit to dispatcher. 
DMKRNHIN 

Entry via lOBLOK to perform input and output 

interruption processing. 
PMKRNK, RNIOERR 

For input process failure. Analyze the 

failure and if related to the 3704/3705 and 

not to a particular resource, either retry or 

dump and reload. 
DBKRNH, READBDF 

Interpret response codes for each BTU 

received and schedule necessary control 

operations. 
DBKRNH, CHPRJAD 

Generate response to a read error. 
DMKRNH, CMP WRITE 

Generate response to a write error. 
DMKRNH, CMPCpNT 

Generate response to a contact task error. 
DMKRNH, COMDISC 

Generate response to a disconnect task 

error. 
DMKRNH, COMCNTi 

Generate response to a control task error. 
DMKRNH, UNSOLIT 

Generate response to a unsolicited read. 
DMKfiCNET 

Return completed CONTASKs. 
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DMKRNH, BNSTAHT 

Attempt to restart the 3704/3705. 
DHKDSPCH 

Exit to the dispatcher. 



DMKRNHIN 

Entry via lOBLOK to perform input and output 

interruption processing. 
DMKRNH, SCHREAD 

On output, examine Interrupt status per 

lOBLOK values and if ATTN, build and start a 

read CCW sequence. 
DMlMr BNIOiyC 

If unit check and fatal, dump and reload the 

3704/3705. 
IMllHr MQilAD 

If pending ATTN cleared via SIO - 
DHKigSfiR 

Reschedule write operations. 
fiMIlS, HNS LOW DN 

If unit exception, set RDEVSLOW and 

reschedule rejected CONTASKs. 
DMKfiCNET 

Return only CONTASKs without CONRESP or 

CONSPLT set. Retain others until final 

response is received. 
EMKRNH, M START 

Attempt to restart the 3704/3705. 
DMKDSPCH 

Exit to dispatcher. 



HANDLING REMOTE 3270 WITH BINARY SYNCHRONOUS 
LINES 



3277 Remote Station and Binary Sjf nchronous Line 
Iflablin^/Disablina 



NETWORK ENABLE/DISABLE 



EMKRGBEN 

Entered when the 
command is issued. 

DBKISII 

Get storage for the necessary CONTASK, 
lOBLOK, and if applicable, BSCBLOK. 

IMIGB, LINES UP 

Set up required CCHs and control data in the 
CONTASK for tasks. These tasks include: 
enabling the binary synchronous line, 
enabling a device, LOGO messages, screen 
formatting, and disable line or device 
(logoff) . 

DMKFREE 

For logon function build logon VMBLOK. 

DMKIOSjJR 

Start line I/O or device I/O, for not busy 
condition. 

PM8GB, RGFTASK 

For busy condition, build CPEXBLOK and exit 
to caller. 



Ji§aS§st Handler for 3270 I/O Events 



DMKRGBIC 

Entry from DHKDSP. On a not available line 
condition, exit to dispatch. For available 
line, process the associated CONTASKs by 
queueing the related resource from the 
NICBLOK. 



BUKIOS, RG START 

Process POLL SIO on a no CONTASK queued 
condition. 

DMKIOS^R 

Process selection SIO on available resources 
and not in control mode per NICBLOK 
conditions and the CONTASK CONSTAT field. 

DMKDSPCH 

Exit to dispatcher. 



Secondary; Interruption Processor for 3270 



DMKRGAIN 

Entry from DMKIOS, examine line interruption 
condition. Discard any of the following and 
go to the dispatcher: nonbinary synchronous 
line, copied lOBLOK, unsolicited 
interruption, bisync line flagged not-in-use, 
non-terminal class device. 

DMKRGA, FA TALE R 

For lOBFATAL condition or any non-zero 
condition code, free all related CONTASK, 
lOBLOK, lOERBLOK, and BSCBLOK. 

DMKRGA, DISASTA 

Log off all affected users on that line. 

DMKHSWR 

Send message to the system operator. 

DMKDSPCH 

Exit to dispatcher. 

DMKRGAIN 

If line or terminal response did not fall in 
the previous category, process via TP code 
branch. The code in the fifth byte of the 
ending CCH or IOBCSH-8. 



TP Code 
TPOO 
TP01 
TP02 



TP03 
TP04 

TP05 
TP06 
TP07 
TP08 

TP09 
TP10 
TP11 
DMKDSPCH 
Exit to 



Function 
Error Handling CCW 
Enable/disable function 
Write EOT (sequence prior to polling 
and addressing) 

Write polling or addressing characters 
Handle station's status and sense 
message 

Read response to addressing 
Write response to text 
NO-OP following POLL command 
Unit exception condition 
(timeout) 

All reset commands 
Bead/write text 
Read response to text 



the dispatcher. 



3270 Binarjr Synchronous Line Error Recoverj[ 



DMKBSCER 

Entry via DMKIOS and SVC 8 to process errors 
related to the binary synchronous line unit 
check and channel error conditions. On first 
error pass, move the lOBRBIOK pointer from 
the lOBLOK to the RDEVBLOK, reset retry and 
fatal flags, set the SRP flag and call 
DMKFREE. 

DMKISIl 

Get free storage for a work area for retry 
CCWs. 
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DMKBSC, NOTFIBST 

On a not first error condition, test for 
unrecoverable error condition. Onrecoverable 
errors include: 

prograa check, protection check, chaining 
check, equipment check, interface control 
check and channel control checks. If one of 
these, notify the system operator. Beset 
flags, initiate error recording and 

DM K FREE 

"free lOERBlCK. 

DMKIOSfiR 

Go back to scheduler. 

Analyze TP code, sense data CSH residual 
count and retry count to determine retry or 
lOBFATAL flag setting. 



REAL STORAGE ALLOCATION AND PAGE HANAGEHENT 



J^EOcess A Page Reguest 



DHKPTRM 

Enter via the TRANS MACRO per paging request 
as determined by DAT created program 
interrupt (page or segment exception) . 

DMKPIS RESTART 

Return to Caller, if virtual address in R 1 is 
beyond range of user's directory specified 
storage size. 

5MI1S» MDBOK 

Check page residency via LRA (LOAD REAL 
ADDRESS) operation. 

DMKPIlr TESTLOCK 

For resident page, lock page in storage (if 
appropriate). 

DMKPTBr GETRADD 

Set real address in R2 , make PA6TABLE entry 
valid. Set cc=0 and exit to caller. 

JDMKPTR, IN IRAN 

For page not resident but in transit 
(SWPTABLE, SWPFLAG) , place virtual machine in 
locate mode. Locate CPEXBLOK for the real 
page requested and chain another CPEXBLOK 
with a return address of TRANRETN, to the 
same chain. 

DMKPTR, TRANRETN 

After page is no longer in transit, restore 
registers and return to RESTART for 
processing. 

DMKPIS* GETPAGE 

Reclaims a page on FREELIST (CORETABLE) . 

DMKPTR, DO 10 

For page that is not in storage, do setup to 
read in the page. 

DMKPTRr CKDEFEB 

For DEFER option passed in R2, build CPEXBLOK 
to return to user after page is in storage. 

DMKPTR, PAGIH 

After the page is read into storage DMKPAGIO 
process, place its CORTABLE entry into the 
user's page list then remove the user from 
the wait state and update the lock count (if 
required) . 

DMKPTR , GETRADD 

Set real address in R2, make PAGTABLE entry 
valid. Set cc=0 and exit to caller. 



Storage " " ~ 



DMKPTRFR 

Per the caller's code in R2, obtain a page 
frame — 

DMKPTB, GETFRII 

Obtain page frame via COBTABLE reference then 
exit to caller. 

DMKPTBFE 

Entry via CPEXBLOK, check page availability 
via flush list (DMKPTBFL) , if none available 
steal a user's page. 

DMKPTRf SELECT 

The SELECT routine is entered to replenish 
the FBEELIST from the flush list or user's 
pages that have not been referenced. 

DMKPTBFT 

Process pages to be returned by chaining them 
to the FBEELIST. On page returns DEFEB page 
requests are processed first. 

DMKPTBLK 

In'Iocking a page in Beal Storage (address in 
B2) , add 1 to lock count; if previously 
locked, and exit to caller. If not 
previously locked, unchain the COBTABLE entry 
from the user's page list and set the lock 
count to 1. 

DMKPTEDL 

To unlock a locked page, reduce Lock ountby 1 
and exit. If the lock count is now equal to 
zero, place COBTABLE entry on user's page 
list prior to exiting from routine. 



BEADING/WBITIHG A DASD PAGE TO/FBOH VIBTUAL 
STORAGE 



li£:^ual Storage and Management - Nog-JC Mode 



DMKPGAGT 

Entered via SVC call to read in DASD page 

into storage. 
DMKPGTPR 

Release DASD space that was previously 

occupied by this virtual storage page. 
DMKRPA, RESIDENT 

Bemove resident page frames from the user 

list. 
DMKPTBFT 

Place these page frames on the free list. 
DMKBPA, STOBDASp 

Update the SHPTABLE with disk address in BO. 
DMKPTBAN 

Bring the page into storage. 

DHKEM* Mil 

Put real storage address of the virtual page 
is passed back to the caller in B2. 

DMKfiaPI 

Entered via SVC call to write out a page to 

DASD storage. 
DMKPTBAN 

Locate the page to be moved and lock it. 
DMKPBAPT 

Store all registers in CPEXBLOK and flag 

CPEXBO as a write request. 
DMKPAGIO 

Write the page. 
DMKPHA» IPJITN 

Decrement page wait count. If zero results, 

take user out of page wait. 



Section 2. Method of Operation and Program Organization 225 



DMKPTROL 

Unlock the page frame. 



Return to caller. 



IiEtli§l Storac[e Manac|ement - EC Mode 



DMKVaT^B 

Entry via BiLR when an EC node virtual 
machine needs a shadow table generation and 
update or purge operation. 

PMKV&TMD 

Get storage to create shadow table. Flag 
VMBLOK to show shadow table existance. 

DMKVaTBC 

Free shadow page, segment and copy segment, 
when user leaves EC mode or alters CR 0. 

DMKVATRN 

Entry to perform third level to first level 
translations and third level translations to 
second level address translations. Ose TRANS 
macro to access virtual segment and page 
tables to get the virtual page into real 
storage. 

DMKVATLA 

Osing the TRAMS macro to access the virtual 
segment and page tables, pass the resulting 
page and displacement to DMKPRVLG. 

DMKVATPX 

Invoked by DMKPRGIN when a paging exception 
is received for an EC mode virtual machine. 

BMKVAT, SETOPEX 

Perform set up operation and develop page 
table address. 

DMKPTRAN 

Get the page. 

DMKVATPX 

Update the shadow table. 

jDMKTATSX 

Invoked by DHKFRGIN when a segment exception 
is received for an EC mode virtual machine. 

DMKTAT, SETOPEX 

Perform setup operation, then invalidate the 
shadow page table or if none exists, allocate 
a new shadow table and set it invalid. 

DMKVATPF 

Entered via DMKVATPG from DHKPRG to simulate 
pseudo page fault interrupts when a paging 
exception occurs with pseudo page faults 
interrupts enabled. 

DMKPTRAN 

Bring in the DASD page. 

DMKPHGSM 

Reflect program check XM4' to the user. 

DMKVATr PAG RES 

Hhen the page becomes resident in storage. 
Build the PGBLOK, set high order bit in the 
translation exception address field, 

DMKDSPGH 

Exit to dispatcher. 



DASD page and place it in R1. Return to 
caller. 

DMKPGTRPR 

Entry to deallocate DASD page used for paging 
and Spooling. Via RDEVBLOK locate the 
BECBLOK and reset appropriate bit in the 
RECBLOKs RECHAP and adjust the member of DASD 
pages in use. If all the pages on the DASD 
cylinder have been deallocated, deallocate 
the cylinder. Exit to caller. 

DMKPGTSR 

Entry to release a group of DASD pages no 
longer needed for spool file use. Per R1, 
find RECBLOK and dummy RECBLOKs and reset the 
RECHAP bits as specified. Free related 
RECBLOKS, if complete deallocation occurs. 

DMKPGTCG 

Entry for allocation of enough DASD spool 
space to record a 370U/3705 dump. Scan 
RDEVBLOK and associated ALOCBLOK for enough 
contiguous available space to record the 
dump. When found, flag cylinder as allocated 
and build and chain the required RECBLOKs. 

jDMKPGTVG 

DMKPGT contains an internal table, PAGETABL, 
in which the allocation of page frames for 
the CP paging VHBIOK is kept. The PAGETABL 
is scanned for a zero bit denoting the page 
frame is available. The page is marked 
allocated by setting the bit to one and the 
address of the page frame is returned to the 
caller in R1. If no page frames are 
available, a CPEXBLOK is built and queued to 
the deferred request chain. 

DMKPGTVG 

Entry to release a page of virtual storage. 
Check the chain of deferred requests. If 
there are none, reset the page bit in the 
PAGETBL to and exit to the caller. 
Otherwise, give the page to the first 
requestor in the deferred chain and stack his 
CPEXBLOK for the dispatcher. 



SHARED SEGMENT STORAGE MANAGEMENT 



DHKVMAPS 

Entry via DMKPRT because a shared page 
(address in R2) has been detected by CP. The 
virtual machine (VMBLOK) that caused the page 
alteration has its named system released. 
The original page swap tables are copies. 

DMKRMSG 

The running virtual machine is informed of 
the share page violation. 

DMKVMASH 

Entered via DMPDSP/BALR, the shared page 
table are examined for hardware change bit 
being on. The resulting condition code is 
reflected to the caller. 



ALLOCATION AND DEALLOCATION OF DASD SPACE 



TEMPORARY DISK STORAGE MANAGEMENT 



DMKPGTPG 

Entry to search and allocate a DASD page for 
paging/spooling. 

EMKPGTSG 

Search appropriate RECBLOK chain for 
available DASD page. If none found, locate 
next available cylinder and construct a new 
RECBLOK, calculate address of the allocated 



DMKTDKGT 

Entry to allocate temporary disk space 
(T-disk) . With RO equal to the number of 
cylinders required and R1 equal to the device 
type, locate RDEVBLOK and related ALOCBLOK 's 
ALOCMAP. If no allocation space is to be 
found, return to caller with in R8. If 
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allocation is successful, flag ALOCMAP, with 
X'AA* as allocated and put first cylinder 
address in B1 and HDEVBLOK pointer in R8 and 
return to caller. 



PAGING I/O SCHEDULER 



DMKDSPCH 

Exit to caller. 

DMKPGSFS 

Entry to examine user's page tables for a 
named system. Locate segment table and check 
each page table header for a named system. 
If found, set cc=0; if not, set cc=2 and 
return to caller. 



cylinder 
channel 



EMKPAGig 

Entry to initiate Page I/O activity. Osing 

Preformatted lOBLOK from lOBSTACK, fill in 

the CCRs with DASD opcode and values derived 

from CPEXSLOK swap table and core table. 

Chain the CPEXBLOK on the in-transit queue. 
DMKPaG, GETRDEV 

Find the Paging BDEVBLOK. 
JSUKPAGr FINDIOB 

search lOBLOKs seeking the same 

address. If found, chain the 

programs together with TICs. 
DMKDSPCH 

Exit to the dispatcher. 
DMKPAG, fiOEUEDig 

If no lOBLOKs with some cylinder address are 

found - 
DMKigSQR 

Start the I/O operation. 
DMKDSPCH 

Exit to the dispatcher to await interrupt. 
5MIM» MSI ASS 

Opon interrupt return, unchain the CPEXBLOK 

from the intransit queue. 
DMKSTPCP 

Stack all deferred requests for execution. 
DMKPAG, 0NSTACK3 

Return lOBLOK to lOBSTACK or free it. 
DHKPAG, OVERHEAD 

Calculate paging load and store it, the TOD, 

and other values in PSA. 
EMKDSPCH 

Exit to dispatcher. 



RELEASE VIRTUAL STORAGE PAGES 



DMKPGSSS 
Entry 
Per R1 
and R2 
set par 

DMKPGSPg 
Entry 
decreme 
flag fu 
for sha 
count, 
from th 



to release partial virtual storage, 
(address of first page to be released) 
(address of last page to be released) 
tial entry flag. 

to check for shared segments and 
nt usage count. Some registers and 
11 entry condition. Examine VMSHRSTtS 
red segments. If so, decrement use 
On use count unchain the SHRTABLE 
e active list. 



MKPGS, CKCLEAR 

On NOCEAH~exit to caller. If not, store 

number of release pages in R8. 
SMKPGS, PAG OUT 2 

Locate page and swap tables for the segment 

to be released and index to the entry for the 

first page. 
DMKPTRAN 

Initiate paging, and when paging stops 

release the page frame. 
DMKPGS, HE XT PAGE 

8 value. 



DMKPGSPS 

Entry to release storage containing a named 
system passed by the caller. Search the page 
tables looking for a header equal to the 
named system. If found, release the swap and 
page tables and build new ones, if the 
address range still lies within the user's 
virtual storage size. 



FREE STORAGE MANAGEMENT 



DMKFREE 

Entry to obtain a block of storage, validate 
input doubleword request (RO) . 

DMKFRE, FREES UB 

ON subpool size request, index into 
SUBTABLE. For correct size block found, 
remove block from chain and put the address 
of the block in R1. Return to caller. 

DMKFRE, FREE 02 

For subpool size not found condition get next 
large subpool size. Remove block from chain, 
put address in R1 and return to caller. 

DMKFRE TR YSPLIT 

For subpool that cannot honor request, start 
search a 30 doubleword end for block 
requirement. When a block is found, split 
block (if necessary) and give caller address 
of his portion in Rl and chain the remainder 
to the appropriate subpool size. Return to 
caller. 

DMKFRE, CLEARSAV 

If no block can be found to honor user 
request, call - 

DMKPTHFR 

Fetch a page from the dynamic paging area. 
Chain it to the free storage chain. 
Processing then continues. See entry DMKFRE, 
FREESUB. 



DMKFRERS 

Entry to return all subpool blocks to the 
free storage chain per the SUBTABLE 
reference, as each subpool block is released, 
its address and length are placed in R1 and 
R2 respectively. Branch and link to FRET05 
to return the block to the free storage chain 
(DMKFRELS) . Repeat action through all 
subpools. Return to caller. 

DMKFRET 

Entry to restore block to subpool or free 
storage. Per RO and R1 (number of 
doublewords to be released and and address of 
the first double word, respectively) , the 
subpool sized block is returned to the 
appropriate subpool. Update the pointer in 
the SUBTABLE. 

DMKFRE/ FRET 2 J 

If subpool size block being returned' is 
within the dynamic paging area, process as a 
block of more than 30 doublewords. 
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Blocks larger than 30 doublewords to be 
returned are merged into the free storage 
chain indicated by DMKFBELs. 

DMKPTRFT 

Restore page to dynamic page area; if a 
complete page is alloted, blocks belonging to 
the dynamic paging area can be built. 

DMKFRE, FRET03 

Return a block of storage to free storage 
chain by merging into the chain storage 
addresses in an ascending order of seguence. 
Return to caller. 



CP IHITIALIZATIOM AND TERMINATION PROCEDURES 



Loading the Nucleus 



DHKCPI, NfSWS 

Locate an available primary or alternate 

system console (PSA values) . 
DMKCPI/ NOTCHNG 

Build user directory page list per DHKSYSUD. 
DjlKLOGOP 

Log on the system operator. 
DUKCPIf START SYS 

Force non nucleus modules to DASD page 

device. 
DMKIOEFL 

Initialize error recording cylinders. 
DMKNLDR 

Auto load 3704/3705; if appropriate. 
DHKCPVAE 

Enable 270X lines, if appropriate. 
DMKPTRDL 

Unlock CPI as initialization is complete. 
DMKpSPCH 

Await interrupts. 



DMKCKPT 

Initial entry point to load the system after 
loading the first module, DMKCKP, from the 
system residence volume. Check CPID in PSA 
for startup method, 

DBKSAVRS 

For CPID egual to not warm or not CPCP, 
insert COLD and load the nucleus. Then 
branch to DMKCPINT, to perform CP 
initialization. 

DHKCKPJ. NOTERM 

OH CPID=HARM or CPCP, halt and drain all I/O 
devices and remember enabled terminals. 

DMKCKP, NEXTCH 

DMKBSPCV to validate warm start cylinder. 

DMKCKP, CLOCK OK 

Save accounting data, log message, SDFBLOKs 
and enabled terminals and lines on checkpoint 
cylinders. 

EMKCKP, CHK05 

Save spool records allocation and spool hold 
queue blocks on checkpoint cylinder. 

DMKCKP, SHDTSYS 

If normal shutdown indicated, issue message 
to system operator and load disabled wait 
state code X«008« . 



System Initialization 



DMKCPIHI 

Entry point to perform system 

initialization. 
DMKCPI, KEYLOgP 

Determine real storage size, initialize 

CORTABLE, Allocate free storage and 

initialize system paging tables 
DMKCPI, CPIHIP 

Check via HIO for online and ready status of 

all DNKRIO generated devices. 
SMC PI f CPISTCAH 

Read volume labels and match to RDEVBLOK, 

RDEVSER. 
SMCIPr DMP ALLOC 

Allocate dump file to system device. 
DMKCPI, ALOCLE 

Build allocation block for CP-owned devices. 
DMKCPI, M ICIEST 

Test for virtual machine assist feature 

availability If available, build HICBLOK and 

link to VMMICRO. 



Harm Start 



DMKWRMST 

Entry from DMKCPI initialization. Check 

R2=01, if so go to DMKWRN, WARMCLR for cold 

start. Check Harm start cylinder for 8 byte 

XFFs identifier. 
DMKHRM, ENABLERT 

If enable records on, warm start cylinder, 

enable appropriate RDEVBLOKs. 
DUKMIMf EN 37 OS 

If warm start record indicates, set flag for 

auto load of the named NCP program. 
DMKHRM, ENR3270 

Enable binary synchronous lines by clearing 

NICBLOK Offline flag, (if appropriate) 
DMKHRM, ACNTRT 

Build ACNTBLOK, load it with warm start 

cylinder data and chain it. 
DMKHRM, HARMLOG 

Build buffer and load it with the saved log 

message. 
DMKHRM, HARMSPL 

Build SPFBLOKs and fill with appropriate 

printer, punch and reader spool data. 
DMKHIMr W*5H0I;D 

Build SHQBLOK and move hold queue record data 

to the new block and chain it to the hold 

queue chain. 
DMKHRM, HARMCLR 

Clear 8 bytes of record 1 on the warm start 

cylinder. Check CPID again. 
DMKCKSHM 

For CPID=CKPT or FORCE, reconstruct spool 

checkpoint records. 
DMKCKSIH 

For~CPID=NOT CKPT or NOTFORCE, initialize the 

checkpoint cylinders. 
DMKCKSPL 

Files in the systems spool hold queue are 

added to the checkpoint cylinder. 
DMKHRMr GETDISK 

Read in the remainder of warm start data. 



Normal Shutdown 



DMKCPSSH 

Entry point results from involing CP SHUTDOHl 
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comffland. Close active spool files for 

callers or operator console. 
DIKCPS, DASDCH 

Via EDEVBLOK, locate and record DASD 

statistical data. 
DMKCPS, DASDCH I 

Put CPCP into CPID to denote shutdown. 
DMKDHPES 

Set up CAW, CCWs and issue IPL to system 

residence device to reinitialize CP. 
DMKCKPT 

Save spooling and accounting data. 
DMKMONSH 

Stop monitor tape activity. 
JDMKCPI SHDTSYS 

Sense shutdown flag, issue DMKCPI961Ii, enter 

disable wait state code X'006'. 



DHKCFMBK 

Send read CCHs to the terminal for LOGON or 

DIAL response. 
DMKTRMID 

On response determine translate tables to be 

used. 
DMKFMBK 

Validate command and transfer to DMKLOGON. 
DMKLOGON 

LOGON command execution. 
DMKDIAL 

Dial access linkage to multiaccess system. 
DMKUDR 

Via user directory access, validate user 

logon eligibility. On acceptance of 

eligibility, that is the successful 

completion of logon, build and allocate 

control blocks and linkages for the user's 

virtual machine. 



Dum£ the System 



DMKDHPDK 

Entry occurs via ABENDOOO condition or by 

pressing system console RESTART button. Save 

PSA values. Determine if dump is full or 

just CP portion. 
DMKDMP, DMEMSG 

Format and issue ABEND message to operator 

and transfer to DMKDMP and DMPDASD. 
DMKDMP, DMPDASD 

Write out a defined amount of storage or all 

storage to selected DASD device. 
MKDMP, DSKEND 

Place sending record number and the system 

file number in the dump file SFBLOK. 
DMKDMP » RECSRCH 

Chain dump file RECBLOKs to RDEVBLOK, and 

link dump file SFBLOK onto the system reader 

chain. 
DMKDSP RESTART 

Restart the system on warm start indication. 
DHKDMP, DMPTAPE 

Dump CP storage or all storage to the 

selected Tape Drive per specified tape 

parameters. 
DMKDMD RESTART 

Restart the system, if warm start is 

indicated. 
DMKDMP, DM££8T 

Dump CP storage or all storage to the 

selected printer. 
DMKDMS RESTART 

Restart the system, if warm start is 

indicated . 



IPL the Virtual Machine 



DMKCFGIP 

For the IPL of a named saved system, the name 
is verified and resources are checked for 
availability. Virtual storage is set up with 
the saved system via SWAPTABLE, SEGTABLE, 
SHRTABLE updates. For the IPL of device 
address, the IPL simulator is loaded in the 
user's storage. 

PMKVMIPL 

User's page 0, set console address, IPL 
device address, VMBLOK flags IPL device type 
and class and user CAW. Read in 24 bytes 
from the CTCA, reader, DASD or tape unit into 
the user's virtual location zero. The CCW 
pointer is now set to the IPLCCW at virtual 
location X'8' and the program is loaded. 

DMKVMI, IPLDOHE 

For IPL STOP, the virtual machine is placed 
in console function mode to allow change to 
nucleus name and apparent storage size before 
continuation. 

PISIIJI, LOADNQW 

IPL address is inserted in X'02' if BC mode, 
or X'BA', if EC mode. The user's CAW and 
registers are restored and control is given 
to the user by loading the current PSW at 
virtual location 0. 



Virtual Machine Termination 



VIRTUAL MACHINE INITIALIZATION AND TERMINATION 



H^§chinc[ a Virtual Machine to the Sjfstem 



DMKCNSIN 

Entered via interruption from a console or 
terminal (not displays) device. If 
appropriate, determine and store device type 
in the RDEVBLOK. Write the VM/370 online 
message. Sets up to receive attention 
interruption . 

DMKBLDVM 

On attention interruption, build skeleton 
VMBLOK for LOGONxxx. 



DMKDSOLG 

Entry is the result of user invoking LOGOFF. 

Set flags in VMBLOK indicating logout 

operation. 
DMKOSO, OS 00 6 

Retain line communication, if HOLD operand 

specified. 
DMKOSO, OS008 

Adjust return address to not run the user. 
DMKOSOFF 

Set~VMBLOK flags. 
DMKTRCHD 

Called to reset tracing. 
DMKPERT 

Called to reset tracing. 
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DMK ACO^M 

Iccounting called to coapute the connect tine 

for the LOGOFF aessage. 
DMKfiCMJT 

Write the aessage to the user. 
DMKSCHPL 

Called to alter aserdispatch status. 
DMKCFPBB, DMKGSPO 

Beset the virtual aachine. 
DMK¥4TBC 

Release shadow tables (if any) . 
DMKSCHRT 

Dequeue clock coaparator request (if any) . 
DMKBLDBL 

Belease segaent tables, page and swap tables 

related to the user. 
DBKDSO, 03094 

Via DHKFRBT return user VMBLOKs to free 

storage. 
DM2 SO, OS 09 3 

For the systea operator, clear and 

reinitialize the THBLOK. 
DMKFBET 

Return all other virtual aachine control 

blocks to free storage. 
DBKACOFF 

Punch an accounting card for the user. 
DMKUSp, OS 098 

Free LOGOFF aessage area. Exit to do free 

storage maintenance. Exit to DMKCFH or 

DMKDSPCH. 
DMKOSOFL 

Entry is the result of the invoked FORCE 

coaaand. 
DMKSCNAO 

Locate userid VHBLOK. 
DHKOSOFL 

Set" VMKILL in VHBLOK, build CPEXBLOK and 

stack it for dispatcher. 
DMKDSPCH 

Opon CPEXBLOK execution, process as at LOGOFF 

entry DMKDSOFF. 
DHKDSODS 

Entry froa an invoked CP DISCOMN coanand. 

Set disconnected VHDISCK in VHOSTAT. 

5M2CNHI 

Send disconnect aessage to user. 

DMKOSOpS 

increaent return address to DMKCFM by 4 to 
prevent a return read to the user's 
terainal. Clear VMTEBM field to indicate the 
user terminal is disconnected. 

DMKfiCNHT 

Send aessage to system operator informing him 
of user disconnect status. Exit to DMKCFM. 



CONSOLE FONCTION (CP COMMAND) PROCESSING 



DMKCFMBK 

Entry used when the ATTENTION key (or 
equivalent) is pressed once or twice 
(according to the VM or CP status) to allow 
the user to direct a line of input data for 
CP comaand processing. Set VMFCWAIT and VMCF 
bits in VHBLOK indicating wait state and 
console function mode. 

DMKFREE 

Builds an 18 doubleword CONBOF buffer for the 
read operation. 

DMKSCNFD 

Matches the 8-byte command name against the 
table of matching command names, the 



truncations of command nanes, and the 
allowable abbreviations, starting at 
COMNBEGO. 

The format of the table entry is: 

liSl^ l|u»,ber of Bjtes 

Coaaand naae 8 

Class mask 2 

Abbreviation count 2 

Routine address 4 
DMKCFl), CONFFIND 

After a command match 

privilege class of the 

with the user's privilege class, VMCLEVEL in 

the VMBLOK. 
PUKCFJ, CON FC ALL 

The last 4~bytes of a command contain 

address of the routine that processes the 

command. 



has been made, the 
command is matched 



the 



Figure 55 is a list of all CP commands and 
the associated processing modules. 
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Command 


Entry Label 






ADTOLOG 


DMKLOGON 






LOGIN 


DMKLOGON 






LOGON 


DMKLOGON 






DIAL 


DMKDIAL 






ATTACH 


DMKVDBAT 






ATTN 


DMKCFMRQ 






ADSTOP 


DMKCPVAC 






ACNT 


DMKCPVAC 






BEGIN 


DMKCFMBE 






BACKSPAC 


DMKCSOBS 






CHANGE 


DMKCSDCH 






CLOSE 


DMKCSPCL 






COOPLE 


DMKDIACP 






DISPLAY 


DMKCDBDI 






DCP 


DHKCDBDC 






DEFINE 


DMKFENIN 






DETACH 


DMKVDBDE 






DISCONN 


DHKDSODS 






DISABLE 


DMKVPVDS 






DMCP 


DMKCDBDM 






DRAIN 


DHKCSODB 






DDMP 


DHKCDBDO 






ECHO 


DHKHSGEC 






EXTERNAL 


DMKCPBEX 






ENABLE 


DMKCPVEN 






FLOSH 


DMKCSOFL 






FORCE 


DHKOSOFL 






FREE 


DHKCSPFB 






HALT 


DMKCPVH 






HOLD 


DHKCSPHL 






INDICATE 


DHKTHIEN 






I PL 


DHKCFGIP 






LINK 1 


DHKINKIN 






LOADBOF 


DHKCSOLD 






LOADVFCB 


DHKCSOVL 






LOCATE 


DHKCFDLO 






LOCK 


DMKCPVLK 






LOGOFF 


DMKOSOLG 






LOGOOT 


DMKOSOLG 






MONITOR 


DHKHCCCL 






MESSAGE 


DHKHSGHS 




1 


MSG 


DMKMSGMS 


1 



Figure 55. CP 
Entry 



Commands and Their 
Points (Part 1 of 2) 



Module 
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1 Conmand 


1 


Entry Label 




1 NETNOBK 




DHKHETWK 






1 NOTREADY 




DNKCPBNR 






1 ORDER 




DHKCSUOR 






1 PURGE 




DMKCSUPU 






1 QUERY* 




DMKCFMQU 






1 READY 




DMKCPBRY 






1 REPEAT 




DHKCSORP 






1 REQUEST 




DMKCFMRQ 






1 RESET 




DNKCPBRS 






1 REHIMD 




DMKCPBRW 






1 SYSTEM 




DMKCPBSR 






1 SAVESYS 




DMKCFGSV 






1 SET 




DMKCFSET2 






1 SHUTDOWN 




DMKCPVSH 






1 SLEEP 




DMKCFMSL 






1 SPACE 




DMKCSOSP 






1 SPOOL 




DMKCSPSP 






1 STORE 




DMKCDSTO 






1 START 




DMKCSOST 






1 STCP 




DMKCDSCP 






1 TAG 




DMKCSTAG 






1 TERMINAL 




DMKCFTRM 






1 TRACE 




DHKTRACE 






1 TRANSFER 




DHKCSUTR 






1 UNLOCK 




DMKCPUVL 






1 VARY 




DMKCPVRY 






1 HNG 




ONKHSGWN 






1 WARNING 




DMKMSGWN 






1 '*' 




DMKCFM 






1 CP 




DMKCFM 






1 iMajor operand 


decode 


Of QU ERY 


is 


by a 


1 scan table at QRYLIST 


in DMKCFMQU. 


De- 


i pending on the 


operand match. 


DMKCQP, 


1 DMKCQG, or DMKCQR are called. 


The 


re- 


1 spective entry 


points are DMKCQPRV, 


1 DMKCQGEN, and DMKCQREY 


. 






1 ZMajor operand 


decode 


(except for PFnn) 


1 is contained by 


the scan table 


star 


ting 


1 label SETSTART in DMKCFSET. 







tiae value (sinulation of virtual aachine 
stop button depression) the VMBLOKs VMSLEEP 
bit is set. The terminal console keyboard is 
now inactive until the user hits an ATTENTION 
key or the SLEEP command times out. 



DISPATCHING AND SCHEDULING 



Ii£§:t Reflection for the Dispatched Victual 
Machine 



DMKDSPA 

Entry for fast reflection activity. Perform 

user (PSA RUNUSER) accounting and determine 

validity of fast reflection by examination of 

DMKDSTAT values. 
DMKDSP, RUNTIME 

Do user accounting, then load the remaining 

time slice. 
DMKDSP, SETjJUANT + U 

Build the PSW,~then dispatch virtual machine 

with LPSW RUNPSW. 



PSW Validation 



DMKDSPB 

Entry to dispatcher when the user's PSW has 

been external to DMKDSP. 
DMKDSP, CKPSW 

Verify the PSW change. 

DMKDSP, UNSTACK 

Unstack any pending interrupts for the user 

(if enabled) . 
DMKDSPCH 

Go to the dispatcher. 



Figure 



55. CP Commands and Their 
Entry Points (Part 2 of 2) 



Module 



MAIN DisEatch Entry 



DMKQCNRD 

Read in the terminal input command line. 

DMKCFMAT 

On NULL data and ATTN key indication, post 
attention interrupt pending in VDEVBLOK, 
VCUBLOK and VCHBLCK. Return to run the 
virtual machine. 

DMKCFMR2 

On receipt of CP commands ATTN or REQUEST, 
process the same as previous entry, 
DMKCFMAT. 

DMKCFM 

On receipt of * (asterisk) return to DMKCFMBK 
to set up another read. If console spooling 
is enabled, all console input and output 
including comments are spooled for printer 
output. 

DMKCFMBE 

On receipt of BEGIN, simulate the start 
button on the virtual machine (If optional 
address is supplied with BEGIN command the 
supplied address is substituted for the 
location counter address) . 

JDMKCVTHB 

Convert this address to binary notation. 

DMKCFMSL 

On receipt of the SLEEP command or SLEEP with 



DMKDSPCH 

Normal dispatch entry after each interrupt 

handler has finished processing, and after 

each CPEXBLOK, I/O request and external 

interrupt has been serviced. 
DMKPSP, RUNIIMl 

For CPSTATUS=CPRUN, stop charging time to old 

virtual machine, start charging time to new 

Virtual machine. 
DMKDSP, WAITIME 

For CPSTATUS=CPWAIT, if old virtual machine 

was not CP start charging CP with wait time. 
DMKDSP, PRQCWAIT 

Via VNTLEVEL, allocate time to appropriate 

virtual machine time category. 
DMKDSP, UNSTACK 

For nonrunnable virtual machine, go to entry 

DMKDSP, DISPATCH. 
DMKDSP, UNSTACK 

For runnable user, check pending 

interruptions for the following: 

• DMKDSP, CKPEND 

Per interruption (VMPERPND) . 
Pseudo page faults (VMPGPND) 
External interruptions 

• DMKDSP, UNSTIO 
I/O interruptions. 
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• DMKDSP, STORECSW 
I/O interruptions 
swapping user PSWs 
address and status i 

DMKDSP, NOT 8 AC Z A 

Clear the pending bit i 

CMKDSP, CKPSH 

Validate the PSW. 

DMKVATBC 

For virtual machine lea 
the shadow tables. 

DMKVATJJP 

For virtual machine in 
translate mode, initial 

DMKDSP, DSPMSG 

For PSH invalid, sen 
virtual machine, and p 
If disconnected and i 
user. 

DHKDSP, DISPATCH 

Determine "if virtual 
additional execution, 
entry. 



are reflected by 
and storing the unit 
n low storage. 

n the VMBLOKs. 



ving EC Node, clean up 



BC mode and entering 
ize shadow tables. 

d error message to 
lace user in CP mode, 
nvalid PSW, log off 



machine is allowed 
If not, use DMKSCHDL 



from eligible list search. Return to entry 
DMKDSP, CKCPSTAK. 



Other Scheduler Function 



DBKSCHST 

Set a clock comparator interrupt request. 
DMKSCHRT 

Reset a clock comparator interrupt request. 
DMKSCHBD 

Set up a request block for midnight date 

change. 
DMKSCH80 

Process a real interrupt timer request. 
DMKSCHCP 

Process a real CPU timer interrupt. 



SPOOOLING VIRTUAL DEVICE TO REAL DEVICE 



Dispatching the New Virtual Machine 



DMKDSP CKCPSTAK 

Process a stacked lOBLOK or TRQBLOK as 
indicated via DMKDSPRQ. The new user 
lOBDSER/TRQBUSER is time stamped and a branch 
is made to lOBIRA/TRQBIRA. 

DHKDSP, CKCPREi2 

If system extending search CPEXBLOK for exit 
address of DMKPTRFD, DMKPTRFE, or DMKPTRFP. 
If none found load a wait state. 

DMKDSP, CKPREfiB 

If not extending, unstack first CPEXBLOK. 
The new virtual machine is time stamped and 
branch taken to CPEXADD. 

DMKDSP, CKUSER 

Load last virtual machine with remaining time 
slice if applicable. Load the highest 
priority user in the dispatch queue, if 
available and applicable. If not enter the 
wait state to await an interruption. 



'Scheduling Users for Execution 



DMKSCHDL 

Entry to modify the user's status. If the 
user has the wait bit on in his running 
status (VMHSTAT) , the user is not 
dispatchable or unqueue before the user's 
time slice has ended, the user has set 
favored execution option, or the user is not 
eligable for Q1. 

DMKSCH, CKCPWAIT 

Determine the running or not running of the 
real timer per VMBLOKs VMRSTAT, VMTLEVEL 
values. 

DMKSCH, CKHSTAT 

Process virtual machine, if currently not 
runnable. 

DMKSCH/ CKRUN 

Process virtual machine, if currently 
runnable. 

DMKSCH, CK WRITING 

Add runnable virtual machine to active queue 



Efocessinjg Virtual Output Fi.les 



DHKVSPEX 

Entry from DMKVIO to initiate SIO on a 

spooling device that is available (not busy 

and no interruptions pending) . 
DMKVSP, OPEN 

Determine if output device needs to be 

opened. 
DMKSPLOV 

If yes, build message control blocks: SFBLOK 

and VSPCTLBLOK. 
DMKPGTVG 

Obtain a virtual buffer; the address is 

stored in VSPVAGE. 
DMKPGTSG 

Obtain a DASD page; the address is stored in 

VSPDPAGE. 
DMKVSP, BDILDCTL 

Assign a spoolid and the other user, record, 

and device values plus DMKCVTDT. 
DMKCVTDT 

Assigns the time stamp and date and stores it 

in SFBLOK. 
DMKVSP, PRTCONT 

Generate TAG record at the start of the spool 

data buffer. 
DMKVSP, CCHOK 

After CCW validity check, data and CCWs (if 

appropriate) are moved to the work buffer. 

Trailing blanks are truncated and when the 

buffer is full, it is written out to the DASD 

slot. 
DMKVSPVP 

On console spooling, the following occurs: 

1. Skip to channel 1 every 60 lines. 

2. Write out the system console, spool file 
buffer every 16 lines. 

3. Place the system console in a pseudo 
closed state for checkpoint recovery in 
the event of system failure. 

DMKVSP, LASTCCW 

When all CCWs are processed, post 
interruption pending to the VDEVBLOK, VDEVCSW 
and return control to the user. 
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^losincj Virtual Out£Ut Files 



Closing Virtual Ingut Files 



DMKVSFCO 

Entry via CP CLOSE connand. If device busy, 
defer close operation by building CPEXBLOK, 
stack it and exit to dispatcher. 

DMKVSP, PRTEOP 

On device not busy, write final buffer page 
to DASD storage. 

JDMKSPLCV 

Queue closed virtual printer or punch spool 
file, queued to the read spool output device 
or transfer the file to another user's 
virtual reader. Also update the SFBLOK with 
nuBber of copies printed/punched, 
distribution code, hold status, and file 
owner ID. If VSPXBLOK with TAG data exists 
for the spool device, copy the TAG data to 
the TAG record in the first spool file data 
buffer. 

JQMSPL, TXTXFB 

If a "spooled to" file, queue to the end of 
the reader file chain. Otherwise, chain the 
SFBLOK to the designated real spool printer 
or punch. 

DMKCKSPL 

Checkpoint the new spool file block. 

5MSPL, SETPEND 

For a "spooled to" file find a virtual reader 
with the proper class and in the ready state 
with no active file, and no pending 
interrupts. Then build an lOBLOK with lOBIRA 
of DMKVIOIN. 

DMKSTKIO 

Stack the lOBLOK. 

MKSPL, SETPESp 
Exit to DMKVSP. 

DMKSPL, TSTHOLD 

For not "spooled to" files and not in user or 
systen hold, find printer or punch with the 
proper class. Then build an lOBLOK with 
lOBIBA of DHKBSPEX. 

DBKSTKIO 

Stack the lOBLOK. 

DMKSPL, TSTHOLD 

Exit to DHKVSP. 



££2£essing Virtual Injgut Files 



DMMSP, OPENRDR 

Entry to "open a spool input file. If 
VDEVSPL=0 the file needs to be opened. Build 
VSPLCTL block and a work buffer. Search the 
systea reader file chain per PSA linkage 
ARSPBD for a file with appropriate user and 
class. 

PfiKYSP, SETFLAG 

On file found condition, place first DASD 
page address in VSPLCTL, VSPDPAGB. Obtain a 
virtual buffer and retain its address in the 
VSPLCTL block. 

DMXSP, BEADEB 

Check the CCNs for validity, aove and expand 
the data back to its original size and the 
data is noved fron the work buffer to user's 
virtual storage. 

DMKVSP, BDRCOONT 

On EOF, set SFBEOF bit in SFBLOK and return 
to caller. 



DMKVSPCB 

For CLOSE operation requested via console 

conmand and the device is busy, initiate a 

delayed close by constructing and stacking 

the CPEXBLOK for the CLOSE. 
DMKVSP, RDREOF 

For normal end-of file and VDEVSFLG indicates 

continuous read. 
DMKVSP, OPENCONT 

Locates the next file and continue reading. 
DMKVSP, LASTFILE 

For last file, post end status in BDEVBLOK. 
DMKVSPr FILECLR 

For HOLD status file (VDEVSFLG=VDEVHOLD) , 

call DMKCKSPL. 
DMKCKSPL 

Checkpoints the file. 
DMKVSP » FILECLR 

Dnchain the file (except hold files) from the 

reader queue and call DNKSPLDL. 
DKKSPLDL 

Delete the file. 
DMKVSP, DVICECLR 

To clear the device, call DMKRPAGT. 
DMKRP^GT 

Releases the storage page. 
DMKPGTVR 

Releases the virtual buffer. 
DMKFRET 

Releases storage for the work buffer and 

VSPLCTL block. 



SPOOLING TO THE EEAL PRINTER/PONCH OUTPDT DEVICE 



DMKRSPEX 

Entry from the dispatcher when an lOBLOK is 

unstacked with and interrupted for spooling 

unit record device. lOBRADD points to the 

HDEVBLOK RDEVTYPC input or output class. 
DMKHSP, RSPLOOT 

If RDEVSPOL indicates an available spool 

device (not active) , 
DMKFREE 

Get storage for a work buffer and build a 

RSPLCTL block and link it to RDEVBLOK. 
DMKRSP, PRNXTFIL 

Search printer and punch SFBLOK chains for 

corresponding device and class. On a found 

condition, unchain the block, put its address 

in HSPSFBLK. 
DMKSEPSP 

If called, provides separators for output 

pages or cards. 
DMKRSP, PRO CESS J 

Bring first spool data DASD page to the work 

buffer and convert CCW addresses to real 

device addresses. 
DMKIOSfiR 

Start the spool device. 
DMKiSPr PRHXTPAG 

Repeat the process until done. 
DMKRSP, REPEAT 

Reprocess and reaccess the buffer, if 

multiple copies are specified. 
DMKCKSPL 

Checkpoint records the change to COPY count. 
DMKSPLDL 

Delete the file on completion (unless HOLD 

specified) . 
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DHKRSP, PRNXTFIL 

Locate the next spool file to process. 
J5IKRSP, PHTIDLE 

Processing for the device is cooplete as 

there are no aore SFBLOK, for this device or 

the device was drained. 
DHKFBET 

Release work area and coapleted lOBLOK 

storage . 
DMKDSPCH 

Exit to the dispatcher. 



SPOOLING TO THE REAL INPOT DEVICE 



DHKSPLOR 

Assuae there is no active file being 
processed on the real input file reader. The 
spooling operator has issued the STABT 
coaaand to the device to 'open* the reader. 

PMKSPL, BUILDCTL 

Build RSPLCTL and SFBLOK. 

DMKPGT¥G 

Get virtual buffer and place its address in 
RSPVPAGE. 

DBKPGTSG 

Get DASD buffer and place its address in 
SFBSTART and BSPDPAGE, linke together by. 
pointers. 

DHKIOSflH 

Start the reader. 

DSKpSPCe 

Await the interruption. 

JDMKRSP, RDERGETID 

Check that the first card in the buffer is 

the userid header. If so, proceed. 
DMKRSP HDRCARDS 

preload the buffer with CCWs. 
DMKigsgR 

Issue the SIO (SlO«s of 42 cards per buffer 

load) . 
DMKRSP, RDRSIO 

Write the buffer to the DASD 

until EOF detected. 
JDMKSPLCR 

Close the file on EOF. 

reader spool chains. 
DMKCKSPL 

Add the spool reader 

checkpoint cylinder data 
5MKSPL, RDRPEND 

If the file owner is 

virtual reader is available, an lOBLOK 

constructed with device end pending - 
DHKSTKIO 

Stacks it. 
5MRSP, RDREXIT4 

Release storage for virtual buffer, RSPLCTL 

and the SFBLOK. 
DMKDSPCH 

Exit to the dispatcher. 



DHKCKSPL 

Delete the SFBLOK froB checkpoint cylinder 

data. 
DMKSPLDL 

Assuae the delete routine is not running, 

build a CPEXBLOK to call DNKSPLDR. 
DJBKSPLDR 

Sets" the DELSil=X»80« (delete routine 

active) . 
DMKSTKCP 

Stacks it and exits to caller. 
DHKSPLDR 

On unstacking the CPEXBLOK, if the SFBLOK is 

a systen duap file, calls DMKDRDDD. 
DHKDHDDD 

"Deallocates DASD buffers. 
DMKSPL, HEXTSFB 

For coiplete allocation chains of RECBLOKS, 

call DMKPGTSR 
DMKPGTSR 

deallocate DASD buffer and return to storage 

held by the dunmy BECBLOKs. 
DMKSPL, DEL ST ART 

For incoaplete allocation RECBLOK chains, 

deallocate by calling DHKPGTSD. 
DHKPGTSD 

Deallocates a page at a time via SFBSTART and 

the lOBLOK until the last page is reached. 
DHKFRFT 

"Delete the SFBLOK, then go to DHKSPL and 

HEXTSFB. 
DBKSPL, HEXTSFB 

If the delete queue is not empty, process the 

next SFBLOK an identical manner. Continue 

until all SFBLOK deletions are complete then 

call DMKFBET. 
DHKFBET 

Delete the lOBLOK. 
DHKDSPCH 

Exit to the dispatcher. 



BECOVEHY MAHAGEMEHT SDPPOBT OPEBATIOH 



slot. Bepeat Establishing the Error Becording Base 



Queue the file on 



file block to the 



logged on, and 



his 
is 



SPOOL FILE DELETICH 



DHKPLDL 

Hith R7 not equal to zero, place the 
specified SFBLOK on the delete chain anchored 
to DMKRSPDL. 



DBKIOEPL 

Entry from CP initialization module to set up 
pointers to VM/370 error recording 
cylinders. 

DMKIOGFI 

The STIDP instruction store CPU version and 
model in CPOID of PSA. 

DMKIOG, ISSUEIHS 

Check attached channels. If standalone 
channel on the 165 or 168 the address of the 
logout routines are stored in the DHKCCH 
module. 

DBKIOG, CHAHGEID 

Set up pointers for machine check and channel 
check record area and extended logout areas. 

DMKIOGr PASTDAVJ 

Determine the 90% full and 100X full capacity 
of designated error recording cylinders and 
store the amount in DHKIOEHX and DHKIOENI 
respectively. 

DMKIOG, FINDREC 

Check first records on each cylinder of the 
error recording cylinders for proper format. 
If invalid, reformat. If valid but clear, 
store pointer value in PSA as the first 
available slot for error record. If valid but 
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used, search for first unused slot and store 

its value in PSA. 
eHKIOG, CYLFUIL 

On a cylinder full condition, inform the 

operator, and continue. 
DMKIOEFL 

Turn off the recording in progress switch and 

exit to caller. 



hardware recovery is not active process as in 

DMKMCH, MCHSYSIL. 
DMKMCH, MCHHAIT 

For TOD damage, load PSW, enter wait state. 
DMKMCH, MCHRESTA 

If the TOD is not damaged, the address of the 

TOD is saved for accounting purpose and- 
DMKDMPRS 

Dumps and initiates system restart. 



Process the Machine Check Interruption 



l£2cess the Channel Check Interruption 



DMKHCHIN 

Entry via the machine check PSH upon 
detection of an unrecoverable and nonfatal 
CPU or storage error. Disable soft machine 
recording store logout area on the machine 
check and channel check recording cylinders. 
The system is enabled for hard machine checks 
with a pointer to the termination routine. 
DMKMCH, ENHARD for virtual user store status 
in VMBLOK. DMKMCH, MCHSYSIL for system 
damage timing facility or uncorrectable 
retry, multibit storage error post system 
operator message, flag system as terminated. 
Place wait state code, if first hard error, 
record it. If the fault occurred in problem 
state, terminate the active virtual machine. 

DMKMCH, SOFTSTG 

For corrected ECC or CPU retry, update soft 
error count and record the error and dispatch 
the virtual machine. 

DMKMCH, MCHSKIP 

For multibit storage error in problem mode, 
exercise storage location to clear up or flag 
as unavailable (permanent error) . 

DMKMCH, MCHCHAMG 

On an altered page condition, the virtual 
machine is reset, otherwise, the error is 
recorded and the virtual machine is 
redispatched . 

DMKMCH SPFTEST 

Storage key failure. Exercise the 2K page 
key. If CP area and solid error condition 
process as DMKMCH, MCHSYSIL, intermittient, 
restore the key and go to the dispatcher. If 
key failure and in virtual machine area if 
permanent error, mark page as unavailable, 
terminate the user. If intermittent condition 
refresh the key and dispatch the virtual 
machine. 

DMKMCH, VIRTERM 

On conditions that cause the terminated or 
reset. The error is recorded, and both the 
user and the operator receive status 
messages. Per the termination flag/ VMBLOK, 
the user is logged off and control returns to 
the dispatcher or is reset via DMKCFPRR. 

DMKCFPRR 

Virtual storage is released, the virtual 
machine is flagged dispatchable and placed in 
console function mode. 

DMKMCH, TERM 

On a hard machine check while handling a 
machine check, the machine check new PSH is 
loaded with a wait state PSW and the current 
PSH is enabled for hard machine checks. 

DMKMCH, MCHTERM2 

Locate the system or the user's VMBLOK. 

DMKMCH, MCHTEHM3 

On second hard machine check error, or 
machine check handler is not active or 



DMKCCHIS 

Entry via DMKIOS via CSW channel error 
DMKFREE 

Obtain storage and build a CCHREC block and 

if lOBLOK and RDEVBLOK exist, build an 

lOERBLOK. 
DMKCCH, CCHIOERL 

Store the "cCHREC address, it length and the 

CSH in the lOERBLOK 
DMKCCH, CCHDEPND 

Call appropriate channel error analysis 

module. Analyze channel logout data for 

validity. 
DMKCCH, SCNEND 

Record the error on the error recording 

cylinder, if appropriate 
DMKCCH, CPTERM 

Terminate CP if the PSA's terminate flag is 

set. 
DMKCCH, CCHHAIT 

The SEREP code (X'OF') is placed in the 

interruption code of the machine check new 

PSW. The I/O old PSW, CSW, and CAW are 

restored. Checkpoint is set up by moving 

'CPCP' into 'CPID'. The TOD clock is saved 

and a wait state PSW is loaded to place the 

system in a disabled wait state. 
DMKCCH, SCNEND 

Unless termination is established, return to 

DMKIOS for recovery. 



Recording the Errors of thg Virtual User Vi§ SVC 
76 



DMKERO 

Entry via DHSPSA as a result of SVC 76 

detection. Check parameters passed in RO and 

R1. 
DMKFREE 

Obtain storage for a record buffer for the 

user error record 
DMKVER, BUFFUL 

Using valid record type (from the buffer) 

branch to an appropriate routine to format 

that particular record type. 
DMKVER, VER30 

Using RDEVBLOK, VDEVBLOK and VMBLOK, convert 

virtual data to real values and place in 

record. 
DMKIOERV 

Record the error. 
DMKDSPCH 

Exit to dispatcher 
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USER DIRECTOBY ROUTINES 



DMKODRFU 

Entry after CP detected LOGON coimand. 
DHKSYSPL points to the directory. Deter aine 
length of userid, if valid call DHKLOCKQ. 

DMKLOCKi) 

Lock the directory in storage. 

DHKODR» NXTPAGE 

Bring in each directory page and return each 
page (and clear the buffer) until a UDIRBLOK 
match occurs or directory's last page is 
detected. 

DiKUDR, FINDUSER 

On userid found move UDIRBLOK to caller's 
area. 

DMKLOCKjS 

Unlock the directory in storage 

SMfiSBf EXIT ceo 

Return to caller 

DMKUDRFD 

Entry from calling routine to find the 
addressed (cuu) device UDEVBLOK in users 
directory and move it to the caller. Via 
UMACBLOK locate the UDEVBLOKs. 

DMKUDR, FIN DDE V 

Check user device address is the same as in 
the UDEVBLOK. Search the chain until match or 
end of chain occurs. 

DMfiPB* DEVFOUND 

For found condition, post condition code in 
users VMPSH. 

DMKUDRRD 

Entry from calling routine to read the 
UDEVBLOK addressed into the caller's buffer 
using the DASD and the user displacement from 
the UMACBLOK bring in the buffer page to 
storage. Determine if the virtual directory 
page address (UDBFVADD) exists in the user 
directory buffer blocks. If not call- 

DMKPGTVG 

and get a virtual page 

DMKRPAGT 

For DASD address does not match the UHACBLOK, 
point to the DASD page and bring in the 
virtual buffer page. Move UDEVBLOK into 
callers area and set cc=0 in VMPSH. Return to 
caller. 

DMKHDRRV 

Entry to return a virtual page used as a 
buffer. Determine if UDBFBLOK contains a 
virtual buffer page pointer (UDBFVADD) . If 
not, exit with CC=1 set in the VMPSW. If a 
buffer exists, check to see if it is 
resident; if it does, clear it to zeros. 

DMKPAGT 

Return the real page to the system. 

DHKRGTVR 

Return the virtual page to the system 

DMKDDRRV 

Set cc=0 and return to caller 



DMKUDRBV 

Entry from DMKDIRCT or DMKCPINT to build page 

buffers fdr each UDIRBLOK. 
DMKFREE 

Get storage for the virtual buffer page list 
DMKUDR, GETVPAGE 

Call DMKPGTVG and DMKRPAGT to get the virtual 

and real buffer Save the virtual buffer 

address in the page list. 
DMKUDR, FRETLIST 

Encountered I/O error, free the virtual 



buffer page list, post fatal message, set 
cc=3 and return to caller. 

DM K DDR, EHDLIST 

Swap the new virtual buffer page list with 
the old list. Anchor the new list to 
DMKSISPL. 

DMKUDR, FRETLIST 

If there was a previous buffer page list, 
free it. Save the start of the user 
directory pointer in DMKSYSUD, and return to 
caller with a CC=0 in the VMPSW. 



SAVE THE 3704/3705 CONTROL PROGRAM IMAGE PROCESS 



DMKSNCP 

Entry from DMKHVC and DIAGNOSE code 50. Per 
the system VMELOK, locate the DMKRNTBL. The 
CCPARM virtual address is contained in R1 of 
the DIAGNOSE instruction. 

DMKSNC, NAMECHK 

Match via search CCPARM; CCPNAME with 
DMKRNTBL entries. 

DMKSNC, SIZECHK 

Verify DASD space requirements for 3704/3705 
control program and resource data. The volume 
required to save (NCPVOL) as indicated in the 
NCPTBL entry must be: 

available and mounted on the system, on a 
CP-owned and supported paging device. 

DMKSNC, SVHESDAT 

Save resource data on the NCPVOL device. 
CCPARMs supplies the starting address and 
size parameters for this write operation. 

DMKSNC/ SVNCPIM 

Save 3704/3705 control program image 
NCPVOL device. CCPARMS also provides 
parameters for this similar operation. 

DMKSSCr SAVEFINI 

Store cc=0 on no errors and return 
caller. 



on 
the 



to 



SPOOL FILE CHECKPOINT AND RECOVERY 



Initialization 



DMKCKSIN 

Entry from CP initializer, DMKCPI to 
initialize the checkpoint cylinders. Per 
DMKSYSCH, get a virtual page for the 
checkpoint cylinder and set up the device 
code in the system residence device. In 
addition set up local data areas such as 
pages per cylinder and checkpoint cylinders. 

DMKCKS, CKSINJ 

Loop through each SFBLOK in the system and 
checkpoint it in a slot on the checkpoint 
cylinder. Then loop through each remaining 
slot and mark it empty. 

DMKCKS, CKSINS 

Place the map delimiter of the last non-empty 
slot in the map. 

DMKPTRDL 

Unlock the map page. 

DMKCKS, CKSINS 

Return to caller. 
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fimaslc CheckjBoint of Spool Files _and Spool 
Devices 



DMKCKSPL 

Entry from any routine that adds, deletes, 

changes, the status of closed spool files. 

Lock the routine, or waits until it becones 

unlocked. Bring the map page into storage 

and set up the device code of the system 

residence volume. 
DMKCKS, LOOPS Hfi 

If the change is applicable to a SHQBLOK 

(hold queue block) make appropriate change on 

the checkpoint cylinder. 
DMKCKS, CKSPLJ 

If the change is applicable to a SFBLOK, 

either add, change, or delete it on the 

checkpoint cylinder. 
DMKCKS, CKSPL5 

If the change affects a 

RDEVBLOK, (for example, a 

command issued) mark the 

checkpoint cylinder. 
DMKCKS, CKSEXIT 

Unlock the routine. Unlock the page map and 

exit to caller. 



spooling device 

START or DRAIN 

change on the 



Becontruction of Checkpointed Closed Spool Files 

DMKCKSWM 

Entry via DMKCPI during VM/370 



reinitialization process whenever the records 
for closed spool data need to be 
reconstructed. Get a virtual page for the map 
of the checkpoint cylinder and set up the 
device code of the system residence volume. 
In addition, set up local data areas. 

DMKCKS, CKSHM2B 

For slots having real device entries, set or 
reset the RDEVDISA and RDEVDRAN and move in 
the checkpointed device classes into 
RVDEVCLAS. 

DMKCKS, CKSWM2G 

For slots containing spool hold queue block, 
chain this to the SHQ chain. 

DMKCKS, CKSWM3 

Get storage for SFBLOK space and set flags 
depending on its last checkpoint activity. 

DMKCKS, CKSHM4 

If the file SFBLOK was active, chain it to 
the appropriate printer, reader, or punch 
chain. 

DMKCKS, CKSHMS 

Allocate the DASD buffers of the spool file 
by reading each buffer to determine the next 
one and then allocate this page. 

DMKCKS, CKSWM6E 

For the dump spool file, 
allocated sequentially from 
the end. 

DMKCKS, CKSHM9 

Set up the map delimiter 
non-empty slot; then set up 
identity (spoolid) higher 
numbers. Return to DHKHRM. 



the buffers are 
the beginning to 



for the end of 

a new spool file 

than existing 
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8SCS PBOGRAB ORGANIZiTION f anctionally. Figure 56 shows all of the RSCS 

coaponents at an overview level. Figure 57 
through 61 show the parts of the individual 

In this section. Figures 56 through 61 show how coaponents. 

the HSCS routines interact with each other 




AXS Task (Entry Point DMTAXS) 



OPENIN 
OPENOUT 
CLOSEIN 
CLOSEOUT 



:> 



$PRTN1 



$TPGET 



$TPPUT 



BSC 
~J Line 



^ 



BSC 
Line 



Supervisor Routines 



Figure 56. Overview of HSCS Program Organization 
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DMTVEC 




Fixed 
Storage 
Values 










DMTMAP 




Variable 

Storage 

Work Area 
















DMTQRQ 




Reserve or 

Release 

Supervisor 

Queue Elements 










DMTPST 




Signal 

Completion of 

an Event in 

the System 









External (Console) 
Interrupt 



I/O Interrupt 




DMTSTO 

Reserve 

Main 

Storage 



C 



DMTWAT 



Suspend 

Dispatching 

for an 

Executing Task 



DMTAKE 



Accept and 

Respond to GIVE 

Requests; Calls 

DIVTTQRQ 



DIVITASK 



Initiate, Term- 
inate and Query 
Tasks; Calls 
DiyiTQRQ 



DMTASY 



Initiate and 
Terminate 
Asynchronous 
Exits; Calls 
DMTGRQ 




DMTGIV 



Present GIVE 

Requests; 
Calls DMTGRQ 
and DMTPST 



DMTIOMRQ 



Request I/O 

Service; Calls 

DMTQRQ and 

DMTPST 



DMTSIG 



Asynchronously 
ALERT Another 
Task; Calls 
DMTPST 



Figure 57. Program Organization for the Multitasking Supervisor 
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REX Task 
DMTCRE 



AXS Task 



DMTAXS 




Create System 

Service and 

Line Driver 

Tasks. 



c 



DMTMGX 



Process Messages: 

• Build the 

Final Message 

Elennent. 
•Transmit File 

Message 



<? 



DMTREX 



» 



DMTCMX 



Process Commands: 

• Execute DMTCMX 
Commands 

• Pass Command 
Elements to 
AXS and Line 
Drivers for 
Execution. 



C: 



• Handle all REX 
Requests 

• Handle Program 
Check Interrupts 

• Handle Console 
I/O 

• Terminate System 
Service and Line 
Driver Tasks 



N 



Line Driver Tasks 



DMTNPT 



^ BSC Lii 



DMTSML 



,>X"bSC Lii 




Supervisor Routines 



Figure 58. Program Organization for REX System Service Tasks 
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AXS Task (Module DMTAXS) 




C=^ 











DMTMSG 












DMTMGX 








DMTREX 












DMTCRE 












DMTCMX 











Line Driver 
Tasl<s 



BSC 
' Line 



BSC 
Line 



Supervisor Routines 



Figure 59. Program Organization for the AXS System Service Task 
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DMTCMX 






DMTMGX 








DMTCRE 










DMTAXS 






i ^ 






^ 



$PRTN1 
RJE: 

Process Print 
File Records 
and Send TInem 
to VIVl/370. 



$URTN1 

RJE: 
Process 
Punch File 
Records and 
Send Them to 
VM/370. 



HOST: 
Process Job 
File Records 
and Send Them 
to VM/370. 



C=r 



SCRTNI 



HOST and RJE: 
Scan RSCS 
Control 
Records and 
Perform 
Control 
Functions, 



SWRTNI 



RJE: 

Send Messages 

to RSCS Operator 

Console 

HOST: 

Pass Commands ds 

to DMTCMX 



Receive Data 
from BSC Line 
via COMSUP; 
Allocate Tanks 
to Input Processors 



/ 



COMSUP 

Control Communi- 
cations on the BSC 
Line; Send and 
■N] Receive: 

Transmission 
Acknowledgement 
> • Data Streams 

-7T 



-V 



BSC 
Line 



\ 



Control Input/ 
Output Processors 
by Means of 
the Commutator 
Table and Task 
Control Tables 



$RRTN1 




HOST and RJE: 
Receive 
Records from 
VM/370 Spool 
System and 
Transmit them 
Via STPPUT 












CMDPROC 




Execute Local 
Commands 
Passed by 
DMTCMX; Pass 
Messages and 
Commands to 
Remote Stations. 







^ 



Receive Tanks 
from Output 
Processors for 
Transmission; 
Send Buffers 
to BSC Line 
via COMSUP 



Supervisor Routines 



Figure 60. Program Organization for the SHL Line Driver Task 
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^ 



Deblock the 
Buffer from 
the BSC Line; 
Write Data 
to VI\/l/370 
Spool System. 



Get a Block 
of Data from 
the VM/370 
Spool System. 



^ 



Process a 
Command 
Received 
Over the 
BSC Line. 



Obtain Data 
Buffers from 
the BSC Line 
and Verify 
the BSC 
Control 
Characters. 



Build a 

Buffer for 

the Appropriate 

Hardware 

Device. 




Supervisor Routines 



Figure 61. Program Organization for the NPT Line Driver Task 
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SECTIOH 3. DIRECTORIES 



"Section 3. Directories" contains the cross-references for locating modules and labels 
within three VM/370 components. Section 3 also contains module descriptions for these 
components. 

• CMS MODULE ENTRY POINT DIRECTORY 

Use this directory when you want to find the entry point and its function for any 
given module. 

• CMS MODULE-TO-LABEL CROSS REFERENCE 

Use this directory when you want to know, for any given module, the names of any 
external references it may make to data areas, registers, or entry points in other 
modules. 

• CMS LABEL-TO-MODULE CROSS REFERENCE 

Use this directory when you want to know which modules refer to any given label. This 
directory also, by means of the count field, indicates the number of times that the 
label was referenced. 

• CP MODULE ENTRY POINT DIRECTORY 

Use this directory when you want to find the entry point and its function for any 
given module. 

• CP MODULE-TO-LABEL CROSS REFERENCE 

Use this directory when you want to know, for any given module, the names of any 
external references it may make to data areas, registers, or entry points in other 
modules. 

• CP LABEL-TO-MODULE CROSS REFERENCE 

Use this directory when you want to know which modules refer to any given label. This 
directory also, by means of the count field, indicates the number of times that the 
label was referenced. 

• RSCS MODULE DIRECTORY 

Use this directory to determine what modules are branched to, from any given module, 
and the labels where the branchs occur, 

• RSCS MODULE ENTRY POINT DIRECTORY 

Use this directory when you when to find the entry point and its function for any 
given module. 

• RSCS MODULE-TO-LABEL CROSS REFERENCE 

Use this directory when you want to know, for any given module, the names of any 
external references it may make to data areas, registers, or entry points in other 
modules. 

• RSCS LABEL-TO-MODULE CROSS REFERENCE 

Use this directory when you want to know which modules refer to any given label. This 
directory also, by means of the count field, indicates the number of times that the 
label was referenced. 
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Hodule 
Name 



DMSABN 



DMSACC 



DMSACF 



DHSACH 



DMSALO 



DHSAHS 



DHSABD 



to 



Entry 
Points 



DMSABN 

DHSABNKX 
DDSABNGO 
DISSABNSV 
DHSABHET 
ACCESS 

READFST 

BEADHFD 
EELOFD 

DHSAHS 
DMSABD 



Function 



Intercepts an abnornal termination (ABEND) and provides 

recovery from the ABEND. Entered by a DMKABN 

TYPCALL=BALE macro call. 

Entered by a KXCHK macro to halt execution after HX has 

been entered after signaling attention. 

Entered by any routine that sets up ABNPSli and ABNBEGS 

in the work area beforehand. 

Entered as the result of a DHSABN TYPCALL=SVC macro 

call. 

Beturns entry point from DEBUG. 

Accesses data in the ADT and related information (such 
as AFT's and chain links) in virtual storage. 

Beads all file status table blocks into storage for a 
read/write disk. Reads in file management tables for a 
read - only disk. For an 0/S disk, control returns to 
to the caller after a successful return from DHSACM. 

Beads the ADT, QMSK, QQHSK, and first chain link into 
virtual storage from the master file directory on disk. 

For a specified disk, releases all tables kept in free 
storage and clears appropriate information in the active 
disk table (ADT) . 

Provides an interface to DOS Access Method Utility 
programs (IDCAMS) . Provided for support of CMS/VSAM. 

Provides storage for the ASM3705 assembler auxiliary 
directory. DMSARD contains no executable code. It must 
be loaded with DHSABX and the GENDIBT command must then 
be issued to fill in the auxiliary directory entries. 
GENMOD must then be issued to create the ASSEMBLE 
module. 
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1 Module 
i Name 


Entry 
Points 


Function 


1 DHSABE 


DMSARE 


Releases storage used for tables pertaining to a given 
disk when that disk is no longer needed. 


1 DHSABN 


DHSABN 
ASHHAND 


This is the ASM3705 command processor. It provides the 
interface between user and the 370x Assembler. 
This is the SYSDT2 processing routine called from 
DMSSOB and used during the assembly whenever any I/O 
activity pertains to the SYSDT2 file. 


1 DHSABX 
1 DMSASD 


DMSARX 
DMSASD 


Provide an interface for the ASH3705 command to the 
3705 assembler program. 

Provides storage for the assembler auxiliary directory. 
DMSASD contains no executable code. It must be loaded 
with DMSASM and the GENDIRT command must then be issued 
to fill in the auxiliary directory entries. The GENMOD 
command must then be issued to create the assemble 
module. 


1 DHSASH 


DBSASM 
ASMPROC 


Processes the ASSEMBLE command. Provides the interface 
between the user and the system assembler. 
This is the SYS0T1 processing routine (called from 
DMSSOB) . 


1 DMSASN 


DMSASN 


Associates logical units with a physical hardware 
device. (Interface for the ASSGN command used by 
CHS/DOS and CHS/VSAM.) 


1 DHSAUD 


DMSADD 
DMSAUDDP 


Beserves space on disk for writing a copy of disk and 
and file management tables on disk and then updates the 
master file directory. 

Closes all CMS files, thereby updating the master file 
Directory for any disks that had an output file open. 


i DMSBAB 


DMSBAB 


Give control to an abnormal termination routine once 
linkage to such a routine has been established by STXIT 
AB macro. 
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Hodule 
Name 


Entry 
Points 


Function | 


DHSBOP 


DMSBOP 


Opens CHS/DOS files associated with the following DTF | 
(Define The File) tables: DTFCH, DTFCD, DTFPR, DTFHT, | 
DTFDI, DTFCP, DTFSD. Once the files are opened and | 
initialized, I/O operations can be performed using the | 
file. 1 


DMSBRD 


DHSBRD 
(RDBDF) 


Reads one or more successive items from a specified | 
file. 1 


DHSBSC 


BASIC 


Processes the BASIC command. The BASIC command invokes | 
the CALL-OS BASIC language processor to compile and | 
execute the specified file of BASIC source code. | 


DMSBTB 


DHSBTB 


This is the CHS batch bootstrap routine. It loads the | 
batch processor routine (DHSBTP) and user exit routine | 
(if they exist) into free storage. ( 


DMSBTP 


DHSBTP 
DHSBTPAB 


Hain entry; reads from the virtual card reader each | 
time CHS tries to execute a console read. | 
Entry point for abnormal conditions during user job: | 




DHSBTPLH 


• Job exectuion ABEND (from DHSABN) | 

• Job limit exceeded (from DHSITE, DHSCIO, DHSPIO) | 

• Disabled CHS command (from the command) | 
Hon-executable user job limit table referenced by | 
DHSITE, DHSPIO, and DHSCIO. | 


DMSBWR 


DHSBHR 


Writes one or more successive items into a specified | 
disk file. | 


DMSCAT 


DHSCAT 


Stacks a line of console input that DHSCRD reads later | 
when it is called. | 


DMSCIO 


DHSCIOR 
DBSCICP 
DHSCIOSI 


Reads one card record. | 
Punches one card record. | 
Punch caller's buffer. | 
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I Module I Entry 
I Name \ Points 



DHSCIT 



DMSCLS 



DMSCMP 
DMSCPF 
DBSCPY 
DBSCED 

DHSC«R 
DMSCST 

DMSDBD 

DMSDEG 

DMSDIO 



DMSCIT 



DMSCITA 
DBSCITB 
DMSCITDB 

DHSCLS 



CCHPABE 
DMSCPF 
DMSCPY 
DMSCBD 

DMSCH8 
DMSCHT 

DMSDBD 



DMSDBG 
DMSDBGP 
DMSDBG 
DMSDIOR 

DMSDIOS 



Function 



Processes the interruptions for all CMS terminal I/O 
operations and starts the next I/O operation upon 
completion of the current I/O operation. 
Processes terminal interruptions. 
Starts next terminal I/O operation. 
Frees I/O buffers from stacks. 

Closes CMS/EOS files associated with the following DTF 
(Define The File) tables: DMTCN, DTFCD, DTFPH, DTFMT, 
DTFDI, DTFCP, and DTFSD. For reader, printer, or punch 
files, a CP CLOSE command is issued. For disk files, 
DMSFHS is called to close the file. For a disk work 
file, DMSEBS is called to erase the file, unless 
DELETFL=NO is specified. 

Compares the records contained in two disk files. 

Passes a command line to CP for execution. 

Processes the COPYFILE command to copy disk files. 

Beads an input line and makes it available to the 
caller. 

Writes an output line to the console. 

Causes the calling program to wait until all terminal 
I/O operations have been completed. 

Enables a user to dump his virtual storage from within 
an executing program. 

Enables the user to debug his program from the terminal. 

Entry point for program interruptions. 

Entry point for all other interruptions. 

Beads one or more 800-byte records (blocks) from disk, 

or reads one 200— byte record (sub-block) from disk. 

Writes one or more 800-byte records (blocks) on disk, 

or writes one 200-byte record (subblock) on disk. 



Module 
Name 



DMSDLB 






DMSDLK 

DBKDMP 

DMSDOS 

DMSDSK 
DHSDSL 

DHSDSV 
DMSEDC 

DMSEDF 

DHSEDI 



Entry 
Points 



DMSDLB 



DMSDLK 

DMKDMP 

DMSDOS 

DMSDSK 
DMSDSL 

DMSDSV 
DMSEDC 

DMSEDF 

DMSEDI 



Function 



Interface for the DOS DIBL command; allows the user to 
specify I/O devices extents, and certain file attributes 
for use by a program at execution time. DLBL can also 
be used to modify or delete previously defined disk 
file descriptions. 

Interface for the DOS user command. Link-edit the 
relocatable output of the language processors. Once 
link— edited, these core image phases are added to the 
end of the specified DOSLIB. 

Simulates the DOS/VS $$BDOMP and $$BPDCMP functions. 
For both functions, a CP DUMP command is issued, direct- 
ing the dump to an offline printer. 

Provides DOS SVC support. Interprets DOS SVC codes and 
passes control to appropriate routines for execution 
(for example, OPEN, CLOSE, FETCH, EXCP) . 

Dumps a disk file to cards or loads files from card to 
disk. 

Provides capability to delete members (phases) of a 
DOSLIB library; also, to compress a DOSLIB library; 
also, to list the members (phases) of a DOSLIB library. 

Lists the directories of DCS private or system packs. 

Arranges compound (overstruck) characters into an 
ordered form and disregards tab characters as special 
characters. 

Provides the Editor with the proper settings (CASE, TAB, 
FORMAT, SERIAL, etc.) by filetype. Contains non- 
executable code for reference by DMSEDI. 

Modifies the contents of an existing file or creates a 
new file for editing. 
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1 Module 


Entry 




1 Name 


Points 


Function 


1 DMSEEX 1 


DMSEDX 


Performs initialization for the CMS Editor. 


1 DBSERR 


DMSERR 


Builds a message to be written at the virtual console 
by DMSCHR. 


I DMSEHS 


DBSERS 


Deletes a file or related group of files from 
read/write disks. 


1 DMSEXC 


DHSEXC 


Bootstrap loader for disk version of EXEC. 


1 DMSEXT 


DBSEXT 


Processes the EXEC command. 


1 DMSFCH 


DMSFCH 


Bring a specified phase into storage from a system or 
private core image library or from a CMS DOSLIB 
library. DMSFCH is invoked via SVC 1, 2, or 4 or via 
the FETCH command. 


1 DMSFET 


DMSFET 


Provides an interface for the FETCH command; also, 
provides the capability to start execution of a 
specified phase. 


1 DMSFLD 


DMSFLD 


Interprets OS JCL DD parameters for use by CMS. 


1 DMSFNC 


DMSFNC 


Nucleus resident command name table. 




DMSFNCSV 


Standard SVC table. 


1 DMSFSS 


DBSFMSA 


Closes one or more input or output disk files. 




DBSFHSE 


Closes a particular file without updating the directory 
or removing it from the active file table. 




DBSFKST 


Temporarily closes all output files for a given disk. 


1 DMSFOR 


DMSFOR 


Physically initializes a disk space for the CMS data 
management routines. For an existing disk, any 
information on the disk may be destroyed. The label 
may be changed and the number of cylinders allowed may 
be changed. 
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Module 
Name 



DMSFEE 






DMSGIO 
DMSGLB 

DMSGHD 
DHSGBN 

DMSHDI 



Entry 
Points 



DBSFBEB 
DHSFBEES 

DMSFBETS 

DMSFREEX 
DMSFRETX 
DMSFBES 

DHSGIO 

DMSGLB 

DMSGHD 
DHSGBII 



DMSHDI 
(HMDIHT) 



Function 



Called as a result of the DMSFBEE and DMSFRET macro 
calls. Allocates or releases a block of storage 
depending upon the code in HOCON location CODE203. 
Called as a result of the SVCFBEE macro call. The size 
of the block is loaded from the PLIST and a DMSFBEE 
macro is executed. Opon return, the address of the 
allocated block is stored into the PLIST. 
Called as a result of the SVCFBET macro call. The size 
and address of the block to be released are loaded from 
the PLIST and a DMSFBET macro is executed. 
Called as a result of a BALB to the address in the 
HUCCN location AFREE. Executes the DMSFBEE macro. 
Called as a result of a BALB to the address in the 
NDCCN location AFBET. Executes the DMSFBET macro. 
Called as a result of executing the DMSFBES macro. 
DMSFBES processes the following service routines: 
CKOFF, INIT1, INIT2, CHECKS, DBEC, and CALOC. 
Creates the DIAGNOSE and CCWs for an I/O operation to a 
display terminal from a virtual machine. 

Defines the macro libraries to be searched during 
assembler processing. Defines text libraries to be 
searched by the loader for any unresolved external 
references. 

Generates auxiliary system status table. 

Edits STAGE1 output {STAGE2 input), builds 3705 
assembler files, link-edits text files and an EXEC 
macro file. 

Sets the CMS interruption handling functions to 
transfer control to a given location for an I/O device 
other than those normally handled by CMS, or clears 
previously initialized I/O interruption handling. 
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Module 


Entry 




Naae 


Points 


Function 


DMSBDS 


DMSHDS 


Initializes the SVCINT SVC interruption handler to 
transfer control to a given location for a specific 
SVC number (other than 202) or to clear such previous 
handling. 


DBSIBA 


DBSIHA 


Handles either user-defined synonyms or abbreviations 
or system-defined synonyms for command names. 


DMSINDEX 


DBSINDEX 


Index of CBS listings in the microfiche deck. 


DBSINI 


DflSIHIR 


Reads a nucleus into main storage. 




DBSINIW 


Writes a nucleus onto a DASD device. 


DBSIMH 


DHSIHM 
(GETCLK) 
(CMSTIBER) 


Obtains the time from the CP timer. 


DBSINS 


DBSIHS 


Controls initialization of the CBS nucleus. 


DBSIHS 


DBSIMS 


Controls initialization of the CBS nucleus. 


DBSIBT 


DBSIMT 


Reads CBS commands from the terminal and executes them. 
Entry is from DBSINS. 




DBSIHTAB 


Entry from DBSABH. 




SUBSET 


CBS subset entry. 


DMSIOB 


DBSIOW, 


Places the virtual CPU in the wait state until the com- 




WAIT, 


pletion of an I/O operation on one or more devices. 




DBSIOHR, 






HAITRTH 




DBSITE 


DBSITE, 
EXTINT, 
DBSITET, 
TRAP, 


Processes external interruptions. 


DBSITI 


DBSITI, 


This module is entered when an I/O operation causes the 




lOIHT, 


I/O new PSH to be loaded. This module handles all I/O 
interruptions, passes control to the interruption pro- 
cessing routine, and returns control to the interrupted 
program. 



Module 
Ha me 



DMSITP 



DHSITS 



DMSLAD 



DMSLAF 
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DMSLBH 



Entry 
Points 



DHSITP 

DMSITS 
DMSITSI 

DMSITSCR 

DMSITSOR 

DMSITSK 

DHSITSIS 

DMSITSR 



DHSIAD, 

ADTLKP 

DMSLADN, 

ADTNXT, 

DHSIADR 

DMSIADAD 



DHSLAF, 

ACTLKP 

DBSLAFHX, 

ACTNXT, 

DHSLAFFE 

ACTFREE 



DHSLAFFT 

ACTFRET 

DHSIBH 



Function 



Processes program interruptions and processes SPIE 
exits. 

Avoids CP overhead due to SVC call. 

Address pointed to by the CHS SVC new PSW. This point 

is entered whenever an SVC interruption occurs. 

Return point to which a program called by a CHS SVC 

returns when it is finished processing. 

Return point to which a program called by an OS SVC 

returns when it is finished processing. 

Called by an SVC by the DMSKEY macro. 

Called by an SVC from the BHSEXS macro. 

This is the DHSITS recovery and reinitialization 

routine, called by DHSAEN. DHSABN is the ABEND recovery 

routine. 

Finds the active disk table block whose mode matches 

the one supplied by the caller. 

Finds the first or the next ADT block in the active 

disk table. 

Finds the read or write disk according to input 

parameters. 

Modifies the file status table chain to include an 

auxiliary directory, or clears the auxiliary directory 

from the chain. 

Finds the active file table block whose filename, file- 
type, and filemode match the one supplied by the caller. 
Finds the next or first AFT block in the active file 
table. 

Finds an empty block in the active file table or adds a 
new block from free storage to the active file table, 
if necessary, and places a file status entry (if given) 
into the AFT block. 

Removes an AFT block from the active file table and re- 
turns it to free storage if necessary. 

Generates a macro library, adds macros to an existing 
library, and lists the dictionary of an existing macro 
library. 
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Module 
Name 



DMSLBT 



DMSLER 



DMSLDS 
DHSLfS 
DHSLGT 

DMSLIB 

DHSLIO 

DMSLKD 
DHSLLU 



Entry 
Points 



DBSLBT, 
IXTLIB, 



DMSLDRA 

DHSIDBB 

DMSLDRC 
DMSLDRD 

DMSLDS 

DMSLFS, 
TYPSBCH 

DMSIGTA 

DMSLGTB 

DMSLIB 

DHSLIO 

DMSLKD 
DMSLLU 



Function 



Creates a text library, adds text files to an existing 
text library, creates a disk file that lists the 
control section and entry point names in a text 
library or types, at the terminal, the control section 
and entry point names in a text library. 

Begins execution of a group of programs loaded into 

real storage. Definition of all undefined programs is 

established at location zero. Entered from the START 

command or internally from DMSLDRB LDT routine if START 

is specified. 

Processes TEXT files that may contain the following 

cards: SLC, ICS, ESD, TXT, REP, RLD, END, LDT, LIBRARY, 

and ENTRY. Entered from DHSLDP when the load function 

is requested. 

Does the processing required by various loader routines 

when an invalid card is detected in a text file. 

Does the processing required when a fatal I/O error 

is detected in a text file. 

Lists information about specified data sets residing on 
an OS disk. Processes the LISTDS command. 

Finds a specified 40-byte EST entry within the EST 
blocks for read— only or read/write disks. 

Entered from DHSLDRB if not a dynamic load. Frees all 
the TXTLIB blocks on the TXTLIB chain. 

Reads TXTLIB directories into a chain of free storage 
directory blocks. Entered from DMSLDRB. 

Searches TEXT libraries for undefined symbols and 
closes the libraries. 

Creates the load map on disk and types it at the 

terminal. Performs disk and typewriter output for 

DMSLDR. 

Provides an interface between CMS and the ¥S1 linkage 

editor. 

Lists the assignments of logical units. 






r- - - - 

1 Module 


Entry 


~ — - — — ■ — - - — 1 


1 Nane 


Points 


Function | 


1 DHSLOA 


DMSLOA 


Processes the LOAD and INCLUDE commands to invoke the | 
relocating loader. | 


1 DHSLSB 


DHSISBA 


Bexadecimal to binary conversion routine. | 




DHSLSBB 


Adds a symbol to the string of locations waiting for | 
an undefined symbol to be defined. | 




DMSLBC 


Removes the undefined bit from the BEFTBL entry and | 
replaces the ADCON with the relocated value. | 




DMSLBD 


Processes LDR options. | 


1 DHSLST 


DBSLSTA 


Processes the LISTFILE command. Prints information | 
about the specified files. | 


1 DMSLSY 


DMSLSY 


Generates a unigue character string of the form Z000001 | 
for private code symbols. I 


1 DHSHDP 


DBSBSP 


Types the load map associated with the specified file | 
on the terminal. | 


1 DHSHOD 


DHSHOD 


Processes the GENMOD command to create a file that is a | 
core image copy; processes the LOADMOD command to load | 
a file that is in core image form. | 


1 DMSMVE 


DMSM?E 


Transfers data between two specified OS ddnames, the | 
ddnames may specify any devices or disk files supported | 
by the CMS system. | 


1 DMSNCP 


DMSNCP 


Reads a 3705 control program module (Emulator Program | 
of Network Control Program) in OS load module format | 
and writes a page-format core image copy on a VM/370 | 
system volume. | 


1 DHSNOC 


DMSNOC 


Contains CSECTS for nucleus work areas and permanent | 
storage. I 




NOCON 


Nucleus constant area. | 




SYSBEF 


Nucleus address table. | 




DEVTAB 


Device table. | 




ADTSECT 


Active disk table. | 




AFTSECT 


Active file table. | 




EXTSECT 


External interruption storage. | 




lOSECT 


I/O interruption storage. | 
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Module 
Name 



DMSNUC 
(cont .) 



DHSOLD 



DHSOEL 



DHSOPT 



DHS0R1 



DMS0R2 



DMS0B3 



Entry 
Points 



PGHSECT 

SVCSECT 

DIOSECT 

FVS 

OPSECT 

CVTSECT 

DBGSECT 

TSOBLKS 



DMSOLD 
DMSIDHC 

DHSLDBD 

DMSCPL 



DHSOPT 



DHS0B1 



DMS0R2 



DMS0K3 



Function 



Program Interruption storage. 

SVC interruption storage. 

Disk I/O storage. 

File system storage. 

Parameter lists. 

Simulated OS CVT. 

Debug storage. 

TSO control blocks. 

Performs initialization and processing for each loading 

operation by processing text files that contain the 

following cards: SLC, ICS, ESD, TXT, BEP, BLD, END, 

LDT, LIBRABY, and ENTBY. 

Entered from DMSSLN when load requested. 

Entered when an invalid card is detected in a text 

file. 

Entered when a fatal error occurs during loading. 

Beads the appropriate system directory records and 
headers and determines if the specified libraries con- 
tain any active members. Beturns the disk address of 
the specified system library and indicates whether or 
not there are active members to be accessed on the disk. 

Sets DOS options in the System Communications Region as 
specified by the OPTION command. 

Relocates all DFT (Define The File) Table address 
constants to executable storage addresses. (Called by 
$$BOPENB via SVC 2.) 

Belocates all DTF (Define The File) Table address 
constants to executable storage addresses. (Called by 
DMS0B1.) 

Relocates all DTF (Define The File) Table address 
constants to executable storage addresses. (Called by 
DMS0B2.) 



en 



Module 
Name 


1 Entry 
Points 


Function | 


DMSOVR 


DMSOVR 


Analyzes the SVCTRACE comaand parameter list and | 
loads the DMSOVS tracing routine. | 


DBSOVS 


1 DHSCVS 


Provides trace information requested by the SVCTRACE | 
command. | 


DMSPIO 


DMSPIO 

DMSPIOCC 

DMSPIOSI 


Prints one line. | 
Puts CCSs and data into the caller's buffer. | 
Prints the caller's buffer, issues an SIO to the | 
virtual printer, and analyzes the resulting status. | 


DMSPNT 


DMSPNT 


Places the address of a file status table entry in the | 
active file table (if necessary) , and sets the read | 
pointer or write pointer for that file to a given item | 
number within the file. | 


DMSPRT 
DMSPR? 


CMSPRT 
DMSPRV 


Prints CMS files. | 
Copies procedures from the DOS/VS system procedure | 
library to a specified output device. | 


DMSPOM 


DHSPUN 


Punches CMS files to the virtual card punch. | 


DHSQRY 


DHSQRY 


Processes the QUERY command. Displays at the user's | 
terminal, the status of various CMS functions and | 
tables. 1 


DMSRDC 


READCABD 


Reads cards and assigns the indicated filename. | 


DMSRNE 


DMSRNE 


Provides an interface for the CHS Editor REMDM subcom- | 
mand, which renumbers files with filetypes of VSEASIC | 
and FREEFOBT. | 


DMSRBM 


DMSRHM 


Processes the BENAHE command. Changes the fileid of | 
the specified file. | 


EMSROS 


DMSROS 
ROSACC 

DMSROS+4 
BOSSTT 


Accesses OS disks. | 
Verifies the existence of OS disks. | 
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1 Module 


Entry 




1 NaiB€ 


Points 


Function 


1 DMSROS 1 


DHSROS+8 


Reads OS disks. 


1 (cont.) 


ROSRPS 






DBSROS+12 


Finds a member in an OS PDS. 




ROSFIND 






DMSROS+16 


Performs NOTE, POINT, and BSP functions. 




ROSNTPTB 




1 DBSRHV 


DMSBRV 


Provides the capability to copy (to an output device) 
modules residing on DOS system or private relocatable 
libraries. 


1 DMSSAB 


DMSSAB 


Processes OS ABEND macros. 


1 DMSSBD 


DMSSBD 


Accesses data set records directly by item number. It 
converts record identifications given by OS BDAM macros 
into item numbers and uses these item numbers to access 
records. 


1 DHSSBS 




Processes OS BSAM READ and WRITE macros. 




DMSSBSRT 


Entry for error return from call to DMSSBD. 


1 DMSSCN 


DMSSCN 


Transforms the input line from a series of arguments to 
a series of 8-byte parameters. 


1 DMSSCB 


DMSSCR 


Loads display buffers and issues a macro resulting in a 
CP DIAGNOSE to write to the display terminal. 


1 DHSSCT 


DMSSCTMP 


Processes OS POINT, NOTE, CHECK, and FIND (type C) 
macros. 




DMSSCTCK 


Processes OS CHECK macro. 




DHSSCTCE 


Handles QSAM I/O errors for DMSSQS and PDS and keys 
errors for EMSSOP. 


1 DHSSEB 


DMSSEB 


Calls device I/O routines to do I/O and sets up ECB 
and lOB return codes. 


1 DMSSEG 


DMSSEG 


Contains a table of VCCNS for CMS saved segment 
entries. 


1 DHSSET 


DM S SET 


Processes the SET command. 



Hodule 
Maae 



DHSSLN 

DMSSHH 

DMSSOP 
DHSSQS 

DMSSBT 

DMSSBV 

DHSSSK 
DHSSTG 



DMSSTT 



DMSSVN 
DMSSVT 



Entry 
Points 



DHSSLN 

DHSSHH 

DMSSOP 
DMSSQS 

DHSSBT 

DMSSRV 

DHSSSK 



DMSSTGSB 
DMSSTGST 
DBSSTGCL 
DMSSTGSf 
DHSSTG AT 

DHSSTT 



DHSSVN 
DHSSVT 



Function 



Handles OS contents manageient requests issued under 
CHS (LIHK, LOAD, XCTL, DELETE, ATTACH, EXIT). 

Processes OS FREEHAIN and GETHAIN oacros and CHS calls 
DHSSHHSB and DHSSHNST. 

Processes OS OPEN and CLOSE macros. 

Analyzes record formats and sets up the buffers 
for GET, PUT, and PDTX requests. 

Arranges records within a file in descending sequential 
order. 

Provides capability to copy books from a system or 
private source statement library to a specified output 
device. 

Sets storage protect key for a specified saved system. 

Processes CHS calls to DHSSTGST and DHSSTGSB (STRINIT) 

and storage service routines. 

STRINIT. 

OS exit reset routine. 

Service routine to change nucleus variables. 

Initializes storage and sets up an anchor table. 

Locates the file status table entry for a given file 
and, if found, provides the caller with the address of 
the entry. 

Processes the OS WAIT and POST macros. 

Processes OS macros: XDAP, TIHE, .SPIE, RESTORE, BLDL, 

FIND, STOW, DEVTYPE, TRKBAL, WTO, WTOR , EXTRACT, 

IDENTIFY, CHAP, TTIHER, STIHER, DEQ, SNAP, ENQ, 

FREEDBDF,»STAE, DETACH, CHKPT, RDJFCB, SYNAD , BACKSPACE, 

and«STAX. 
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1 Module 
1 Nane 


Entry 
Points 


Function 


1 DHSSYN 1 


SYNONYM 


Processes the SYNONYM coaaand. Sets up user-defined 
coaaand naaes and abbreviations for CMS coaaands. 


1 DBSTIO 


DMSTIO 


Beads or writes a tape record or controls tape 
positioning. 


1 DHSTMA 


DMSTMA 


Reads an lEHMOVE unloaded PES froa tape and places it 
in a CMS MACLIB. 


1 DBSTED 


DHSTPD 


Beads a tape consisting of card iaage aeabers of a PDS 
and creates CMS disk files for each aeaber of the data 
set. The PDS option allows reading unblocked tapes 
produced by the OS lEBPTPCH utility or blocked tapes 
produced by the OS lEHMOVE utility. The UPDATE option 
provides the "./ ADD" function to blocked or unblocked 
tapes produced by the lEBDEDTE utility. 


1 DHSTPE 


DMSTPE 


Processes the TAPE coaaand to perfora certain tape 
functions, such as: duap a CMS file, load a CMS file, 
set tape aode, scan, skip, rewind, run, FSF, FSB, BSF, 
BSB, EBG, and HTM. 


1 DBSTCQ 


DMSTQQ 
DMSTQQX 


Allocates a 200-byte first chain link (FCL) to a 
calling prograa. 

Makes a 200-byte disk area no longer needed by one 
prograa available for allocation to another prograa. 


1 DHSTBK 


DMSTRKA 
DMKSTBKX 


Allocates an 800-byte disk area to a calling prograa. 
Makes an 800-byte disk area that is no longer needed by 
one prograa available for allocation to another. 


1 DHSTYP 


TYPE 


Processes the TYPE coaaand. Types all or a specified 
part of a given file on the user's console. 


1 DHSUFD 


DMSOPD 


Processes the UPDATE coaaand. Updates source files 
according to specifications in update files. Multiple 
updates can be aade, according to specifications in 
control files that designate the update files. 



Module 
Name 


Entry 
Points 


Function | 


DMSVAN 
DBSVAS 


DMSVAN 
DHSVAS 


Contains table of Access Bethod Services nonshared | 
(nonreentrant) modules. | 
Contains a table of Access Bethod Services shared | 
(reentrant) modules. j 


DMSVIB 


DHSVIB 


Loads the CBS/VSAB saved system and pass control to the | 
CBS/VSAM interface routine, DBSVIP. | 


DMSVIP 


DMSVIP 


Finds the CBS/DOS discontiguous shared segment (DCSS) ; | 
issues all necessary DOS ASSGN statements for OS user; | 
maps all OS VSAM macro requests to DOS specifications; | 
equivalents, where necessary; traps all transfers of | 
control between VSAB and the OS user and sets the | 
appropriate operating environment flags. | 


DBSVPD 


DBSVPD 


Beads DOS, VSAB, and Access Bethod Services modules | 
from a DOS PTF tape and writes the modules to the CBS | 
user's A-disk. | 


DMSVSB 


DBSVSB 


Besets any flags or fields set by VSAB processing; | 
purges the VSAM discontiguous shared segment. | 


DBSXCP 


DBSXCP 


Simulates the DOS EXCP function (DOS SVC 0) in the | 
CBS/DOS environment. EXCP (Execute Channel Program) | 
requests initiation of an I/O operation to a specific | 
logical unit. | 


DMSZAP 


DKSZAP 


Processes the ZAP command. Provides a facility to | 
maintain CBS LOADLIB members as written by the CBS | 
command LKED. | 


DMSZAT 


DKSZAT 


Defines 8K-bytes of transient area. | 


DHSZIT 


DBSZIT 


Defines the end of the CBS nucleus. | 


DHSZNB 


DBSZHB 


Defines the end of NDCON (DBSNDC) . | 


DMSZOS 


DBSZOS 


Defines the start of the user area. | 
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Dodule External Beferences (Labels and Hodales) 



DHSABN ABATIBND 


ABNBIT 


ABNEBLST 


ABHPAS13 


ABHPSH 


ABHBEGS 


ABHBB 


ABWSECT 


ADTFDA 


ADTFFSTF 


ADTFLG1 


ADTFLG2 


ADTFHIH 


ADTFQQF 


ADTFBOS 


ADTHBCT 


ADTH 


ADTHFDA 


ADTHFDH 


ADTPQH3 


ADTSECT 


AFVS 


AIHTBTBL 


A 10 SECT 


AOPSECT 


AOOTBTBL 


ASDBPST 


ASOBSECT 


ASOBSTAT 


AOSABBV 


AOSBABEA 


ADSBILSI 


ADSBITBL 


BATFLAGS 


BATLOAD 


BATBOH 


CHHDLIHE 


COHBDCHT 


COHBDCOD 


COHBEAD 


COBBSAVE 


DBGABN 


DBGFLAGS 


DHSABN 


DHSCAT 


DHSCITDB 


DHSCBD 


DHSCWT 


DHSDBG 


DHSEXCAB 


DHSIHTAB 


DHSITSB 


DHSLADAD 


DMSLADB 


EGPBS 


FCBFIBST 


FCBHOH 


FBEELOiE 


FVSECT 


lOHTABL 


lOSECT 


IPLPSW 


KXFLAG 


KXHAHT 


LDHSBOS 


LOC 


HACDIfiC 


HISFLAGS 


HOPAGBEL 


HBHBET 


HOCOH 


HDHFIHBD 


OLDPSH 


OPSECT 


OPTFLAGS 


SAD TEST 


OSFST 


OSFSTLTH 


OSFSTHXT 


F6HHFSH 


PGHOPSH 


BELPAGES 


BO 


B1 


B12 


B13 


B1U 


B15 


B3 


B4 


B5 


B6 


B7 


B8 


SSAVE 


SOBFIAG 


SOBSECT 


OFDBDSY 














DHSACC ADTDTA 


ADTFALOF 


ADTFDA 


ADTFDOS 


ADTFFSTF 


ADTFFSTV 


ADTFLG1 


ADTFLG2 


ADTFLG3 


ADTFHIH 


ADTFBO 


ADTFBOS 


ADTFBW 


ADTFSTC 


ADTHBCT 


ADTLHBA 


ADTH 


ADTHFDH 


ADTHSK 


ADTHX 


ADTHDH 


ADTPQH2 


ADTPQH3 


ADTBES 


ADTSECT 


ADTOSED 


ADT1ST 


AFIHIS 


AF?S 


COBBSAVE 


DTAD 


FVSECT 


PW4 


lADT 


HISFLAGS 


HOCOH 


BO 


B1 


RIO 


R11 


B12 


B13 


B14 


B15 


B2 


B3 


B4 


B5 


B6 


B7 


B8 


R9 


DFDBDSY 


IBBIT 
























DMSACF ADTADD 


ADTCEST 


ADTCHEA 


ADTFALHH 


ADTFALTT 


ADTFALOF 


ADTFDA 


ADTFFSTF 


ADTFLG1 


ADTFLG2 


ADTFLG3 


ADTFHDBO 


ADTFBO 


ADTFfiOS 


ADTFBW 


ADTFSTC 


ADTFTYP 


ADTHBCT 


ADTLHBA 


ADTH 


ADTHFDA 


ADTHFDH 


ADTPQH2 


ADTBES 


ADTSECT 


AFVS 


ABOIK 


ATTPSBCH 


DSKADB 


ESKLOC 


DSKIST 


EBBIT 


BBBC0D1 


FSTIC 


FSTBP 


FSTSECT 


FSTT 


FSTWP 


FVSECT 


Fi4 


F65535 


JSBO 


JSB1 


HOCOH 


BEGSAVO 


BEGSAV1 


BRCHT 


BO 


B1 


B10 


B11 


B12 


B13 


B14 


B15 


B2 


B3 


B4 


B5 


B6 


B7 


B8 


B9 


DFDBDSY 




DMSACB ADIOSECT 


ADMSBOS 


ADTADD 


ADTCTl 


ADTDTA 


ADTFLG1 


ADTFLG2 


ADTFLG3 


ADTFHFD 


ADTFQQF 


ADTFBO 


ADTFBH 


ADTHBCT 


ADTID 


ADTHFDH 


ADTHSK 


ADTHX 


ADTHDH 


ADTPQH1 


ADTPQH2 


ADTPQH3 


ADTQQH 


ADTBES 


ADTBOX 


ADTSECT 


ADTOSED 


AFVS 


ABDTK 


BATFLAGS 


BATLOAD 


CDHSBOS 


DIOSECT 


DSKADB 


DSKLOC 


DSKLST 


DTAD 


DTADT 


EBBCODO 


FED 


FFE 


FFF 


FVSDSKA 


F?SECT 


FVSFSTIC 


FVSFSTIL 


F800 


JSBO 


LDHSBOS 


LOCCHT 


HOCOH 


OSADTVTA 


BEGSAVO 


RWHFD 


BO 


R1 


BIO 


B11 


612 


B13 


B14 


B15 


B2 


B3 


R4 


R5 


R6 


B7 


B8 


B9 


SIGHAL 


SBTCH 


TBEHT 


OFDBOST 


DPBIT 










EHSALD ADMSROS 


ADTFDA 


ADTFFSTF 


ADTFLG1 


ADTF1G2 


ADTFLG3 


ADTFHIH 


ADTFQQF 


ADTFBO 


ADTFBOS 


ADTFBB 


ADTFSTC 


ADTFTYP 


ADTID 


ADTH 


ADTHFDH 


ADTHSK 


AETHX 


ADTPQH1 


ADTPQH3 


ADTQQH 


ADTBES 


ADTBOX 


ADTSECT 


AFVS 


CDHSROS 


FCBDSHD 


FCBFIBST 


FCBHEXT 


PCBOSFST 


FCBSECT 


FLGSAVE 


FVSECT 


LDHSBOS 


LOC 


HOCOH 


OSADTFST 


OSFST 


OSFSTLTH 


OSFSTHXT 


BEGSAVO 


BO 


B1 


BIO 


B11 


fi12 


B13 


B14 


B15 


B2 


fi3 


R4 


R5 


B6 


B7 


B8 


B9 


STATEFST 
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Module External Beferences (Labels and Modules) 



EHSAHS 



EMSARE 



EHSABN 



DHSABX 



DHSASH 



DHSASH 



EHSADD 



DHSBAB 



ADEVTAB ADTM 
DOSDSME BOSDDM 
FSTM FSTH 
R11 R12 
SYSHAHES TBSIZE 

ADTDTA ADTFLG1 
NOCOB BO 
R8 B9 

ADTFLG1 ADTFRH 
FCBCLOSE FCBDE 
FSTH FSTSECT 
R12 B13 



ADTSECT AEBASE ASCABM ASTATE ASTATEB ATABEHD BGCOM CHSAHS COHNAHE BOSBD 

DOSEXTSO EOSEXTTB DOSSEXT DOSSECT DOSVOLNO DOSVOLTB DOSYSXXX DTAD DTAS FSTFV 

FSTSECT LTK LDBPT HISFLAGS NDCON PIBPT PDBPT REIPAGES BO R1 

R13 R14 R15 82 B3 B4 R5 B6 R7 fi8 



ADTFLG2 
B1 



ADTH 

FCBDEV 

lOBCSH 

Bia 



ADTFLG3 
BIO 



ADTHX 
FCBFOBH 
lOBIN 
E15 



ADTFBO 
B12 



ADTFBOS 
B14 



ADTSECT ACPSECT 

FCBIBIT FCBIOSS 

lOBICFLG BISFLAGS 

R2 B3 



AADTIKS ADTFLG1 ADTFBW ADTH AETHX ADTSECT 

FCBCLOSE FCBDD FCBDEV FCBDSK FCBDSHAH FCBFOBH 

FCBTAP FBEELOiE FSTFV FSTIL FSTL FSTH 

OPSECT OSIOTYPE OSSFLAGS RELPAGES BO HI 

R3 m E5 B6 R7 R8 

AADTLKa ADTFLG1 ADTFRi ADTH AETHX ADTSECT 

FCBCLOSE FCBDD FCBDEV FCBDSK FCBDSNAH FCBFOBH 

FCBTAP FBEELOHE FSTFV FSTIL FSTL FSTH 

OPSECT OSIOTYPE OSSFLAGS SEEPAGES RO Bl 

R3 BU B5 E6 R7 B8 



ADEVTAE 

DTADT 

R4 

ADTADD 
AFVS 
FVSECT 
R14 

BGCOH 

R14 

SVEBOO 



ADTDTA ADTFDOS ADTFLG1 

NUCON PDBPT RO 

B5 B6 R7 

ADTDTA ADTFDA ADTFLG3 

ATRKLKP ATBKLKPX AHRTK 

F800 NOCON REGSAVO 

B15 R2 R3 



IJBABTAB HDCON 
R15 R2 
SVEB0 1 SVER09 



AETFLG2 

R1 

R8 



ADTFRO 

BIO 

R9 



ADTHBCT ADTLAST 

DSKAER DSKLOC 

RWCNT RHFSTEG 

RU B5 



ADTFBl 
R15 



ADTFSTC 
B2 



ADTH 
R3 



ADTSECT AFINIS 
R4 R5 



AUPDISK 
R6 



DOSDEV 
FSTIL 
BIO 
R9 



DTAD 
R7 



ASTBINIT BATFLAGS BATBON COMPSWT FCBBDFF FCBBYTE FCBCATHL 

FCBITEH FCBPBOC FCBPEOCC FCEFBOCO FCBBFAD FCBSFCT FSTL 

NOCON OSSFLAGS BELPAGES RO Rl RIO R11 

R4 R5 B6 B7 B8 R9 



CHHDLIHE COHPSBT 

FCBINIT FCBIOSH 

FSTSECT lOBCSH 

E10 R11 
R9 

CHHDLIHE COHPSHT 

FCBINIT FCBIOSW 

FSTSECT lOBCSH 

BIO R11 
R9 



ADTFROS 

R11 

TAPEl 



ADTFRi 

H12 

lAPEt; 



ADTHFBA ADTHFDN 

DSKLST DTADT 

RIHFD RO 

R6 B7 



PCPTB 


PIBAEE 


PIBPT 


PIBSAVE 


PIK 


R3 


B4 


B5 


B6 


B8 


SYSCOH 











DEVICE 
FCBITEH 
ICBIN 
R12 



DEVICE 
FCBITEH 
ICBIN 
B12 



ADTSECT 
R13 



ADTHSK 
FFD 
Bl 
B8 

RO 
R9 



DHSARD FCBBDFF FCBBYTE FCBCATHL 

FCBPROCC FCBRDE FCBREAD FCBSECT 

lOBIOFLG HAIHBIGB HISFLAGS HDCON 

R13 R11 R15 R2 



DHSASD FCBBDFF FCBBYTE FCBCATHL 

FCBPROCC FCBRDR FCBREAD FCBSECT 

lOBIOFLG HAIHBIGB HISFLAGS NUCON 

R13 R14 R15 R2 



ASYSREF 
R14 



BGCOH 
R15 



DEVTAB 
R2 



DTAD 
R3 



ADTHOH ADTPQH1 

FFE FFF 

RIO Ell 

R9 UFDBUSY 



ADTPQH2 ADTSECT 

FINISLST FVSDSKA 

R12 R13 
DPBIT 



Rl 
SVEAEA 



RIO 
SVEPSH 



R12 
SVIPSW2 



R13 
SVEROF 
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Hodule External References (Labels and Hodules) 



DflSBOP 



ACBDDHH iCBEBFLG iCEIH 



ICBIHPLG ACBBACBI iCBOLIGH ACBODT ACBSTSKP ADTFDOS ADTFLG1 ADTF1G2 



ADTFBO 



ADTFROS ADTFRi ADTSECT AERASE 



ASTATE 



DOSDSMD DOSDOM DOSEXT 

DOSYSXXX FSTIC FSTM 

OSFSTXTH PIBPT PDBADR 

R11 R12 Bia 

SISNAHES VHSIZE 



DOSEXTCT DOSFORH DOSIHIT 
FSTSECT IJBFLG01 IKQACB 
PDBCDD PDBDEVT PDBPT 
R15 B2 B3 



ASISBEF EGCOM 



CHSVSAH DOSBLKSZ DOSBDFF 



DOSHEXT DOSOP DOSOSFST DOSSECT DOSSYS 

LDBPT HICLPT HDCOB OSFST OSFSTFM 

PDBTAPM1 PDBTAPM2 P0BTAP7 RMSROPEN BO 

B4 B5 B6 B7 B8 



ADTFLG3 ADTFHFD 
DOSDD DOSDE? 
DOSDCAT DOSDCHAM 
OSFSTRFM OSFSTXNO 
B1 RIO 
B9 SISCOM 



DMSBRD AACTFBEE AACTLKP AFTADT AFTCLA AFTCLB AFTCLD AFTCLH AFTDBA AFTDBD 

AFTFLG AFTFST AFIFV AFTIC AFTID AFTIL AFTIH AFTBD AFTBP 

DISK$SEG DHSLFS FSTFV FSTIC FSTBP FSTSECT HDCON BEGSA¥3 RWFSTBG 

R12 B13 Bit B15 B2 B3 Ba 85 B6 
STATERO VMSIZE 



AFTDBN AFTFBA 

AFTSECT AFTWBT 

RO B1 

B7 B8 



AFTFCL AFTFCLA 

ABETK AOSBABEA 

BIO B11 

B9 STATEFST 
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H 
(D 
O 
ft 
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(D 
CO 



ro 



DHSBSC 


AADTIKH 


ADTFLG1 


ADTFRW 


ADTM 


ADTHX 


ADTSECT 


ASTBIHIT 


CDBBSAVE 


EGPRS 


FREELORE 


FSTFV 


FSTIL 


FSTL 




FSTM 


FSTSECT 


HAINHIGH 


HISFLAGS 


NDCCH 


OLDPSW 


OVIHD 


BELPAGES 


BO 


R1 


BIO 


R11 


B12 




B13 


B14 


B15 


R2 


R3 


B4 


B5 


R6 


B7 


B8 


B9 


SSAVE 




DMSBTB 


ABATABBD 


ABATLIMT 


ABATPBOC 


AFVS 


ALDRTBLS 


ADSRABEA 


BATDCHS 


BATFLAGS 


BATFLAG2 


BATLOAD 


BATHOEX 


BATBOH 


BATDSEX 




FVSECT 


FVSFSTIC 


FVSFSTIL 


LOCCNT 


NDCOH 


BO 


B1 


B12 


B14 


R15 


B2 


B3 


B4 




R5 


RB 


TBEHT 






















EHSBTP 


ABNBIT 


ADBSCBD 


AFVS 


ASCANN 


BATCPEX 


BATDCBS 


BATFLAGS 


BATFLAG2 


BATHOVE 


BATSOEX 


BATBERB 


BATSTOP 


BATTEBH 




BATDSEX 


BATXCPD 


BATXLIH 


BATXPRT 


CHSSFG 


FVSECT 


IPLADDB 


NOCON 


NDHFINBD 


RO 


B1 


BIO 


B11 




R12 


B13 


B14 


B15 


R2 


R3 


B4 


B5 


R6 


R7 


B8 


B9 


SYSHAME 




SYSHAMES 


DFDBDSY 
























DUSBNR 


AACTFBEE 


AACTFBET 


AACTLKP 


ADTDTA 


AETFLG1 


ADTFLG3 


ADTFRB 


ADTFSTC 


ADTHX 


ADTBACW 


ADTSECT 


AFTADT 


AFTCLA 




AFTCLB 


AFTCLD 


AFTCLD X 


AFTCLN 


AFTCLX 


AFTD 


AFTDBA 


AFTDBC 


AFTDBD 


AFTDBN 


AFTFBA 


AFTFCL 


AFTFCLA 




AFTFCLX 


AFTFLG 


AFTFLG2 


AFTFST 


AFTFDLD 


AFTFV 


AFTIC 


AFTID 


AFTIL 


AFTIN 


AFTH 


AFTN 


AFTNEi 




AFTOLDCL 


AFTBD 


AFTBP 


AFTSECT 


AFTiP 


AFTWRT 


AFVS 


AQQTBK 


AQQTRKX 


ABDTK 


ATFIHIS 


ATRKLKP 


ATBKLKPX 




ADPDISK 


AiRTK 


DHSLAD 


DHSLFSW 


FSTFV 


FSTIL 


FSTSECT 


FSTWP 


FVSECT 


NDCOH 


BEGSAV3 


RWFSTBG 


BO 




fil 


RIO 


B11 


B12 


R13 


BUI 


R15 


B2 


B3 


B4 


B5 


B6 


B7 




B8 


R9 


DFDBDSY 


VMSIZE 


BBBIT 
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Module External References (Labels and Modules) 



DMSCAT 



DMSCIO 



DKSCIT 



EMSCLS 

EHSCMP 
DBSCPF 

EHSCPY 

EMSCED 

DMSCRB 

DMSCST 
DHSDBD 



CHHDIIST FSTFIHBD MSGFLAGS NOTYPING HDCON HOHFINRD BO 
BU 

AB4TABND ABATLIHT BATFLAGS BATLSECT BATBCEX BATPDNC 
BO B1 BIO B11 R12 R13 
B7 B8 



BATPOSL 
RIU 



B1 



BATBON 
B15 



BATXLIM 
B2 



BATXPDH 
R3 



CAW 
B4 



CSH 
R5 



HDCON 
B6 



AFVS AIOSECT ASVCSECT ATTH 

DBGEXEC DBGEXINT DBGFLAGS DE 

NDHFIHBD HOBPHDHB OSSFLAGS CVSHO 

R14 B15 B2 H3 



BATF1AG2 BATSTOP 
FSTFIHBD FVSECT 
OVSOH OVSSO 
R4 R5 



TAIEBSAV TAXEADDB TAXEEXIT TAXEEXTS TAXEFBEQ TAXEICL 
TSOFIAGS OE HAIT HAITSAVE 



CAH 

IGOPSH 

OVSTAT 

R6 

TAXEIOiS TAXELNK TAXERTNA TAXESTAT TAXETAIE TAXEISOF TSOATCNL 



CE CBSTAXE CONCCMS COHSTACK CSi CDBBIOOP 

KXFIAG KXflAHT LSTFINRD MSGFLAGS HOTIPING HDCON 

PEHDREAD PENDHRIT RO Bl B12 B13 

R7 R8 R9 SVCSECT TAIEIAD TAIEHSGL 



AEBASE AFIHIS ASTSREF BGCOM DOSED DOSDSHAM DOSHEXT DOSSECT DOSYSXXX LDEPT 
PDBADB PDBCDD PDBDEVT PDBPT PDBTAPMl RO Bl BIO B11 R12 
R2 B3 R4 R5 R6 R7 R8 R9 



ADIH 

ABATPROC 
R15 

ADTCHBA 
FSTSECT 

ABATPROC 

FVSECT 

RO 

R9 

AFVS 

HOMPNDHR 

B2 

AFVS 
R12 

ADEVTAE 
DEVTAB 



ADTSECT AFIHIS 



BALBSAVE 
R2 

ADTFLG1 
FSTYR 

AFVS 
KXFLAG 
Bl 
TSOATCNL 

AOPSECT 

OPSECT 

B3 

AOPSECT 
B14 

ABGS 

LASTLIHE 

R15 



BATCPEX 
R3 

ADTFRS 
MISFLAGS 

AINTRTBL 
KXWSVC 
R11 
TSOFLAGS 

AOOTHTBL 
PEHDREAD 
B4 

FVSECT 
R15 

CAH 

LIHE 

E2 



ARDBDF 

BATFLAGS 
B4 



ADTM 
HDCOH 

AOPSECT 
LSTFIHBD 
R12 
WAITLST 

COHSTACK 
PEHDHBIT 
B5 

KXFLAG 
B9 

CCWPBIHT 

LIHE1 

B3 



HDCCH 



BATLOAD BATBOH 
R5 H6 



ADTSECT FSTD 
BELPAGES 



BATOSEX CMHDLIHE HDCOH 
R7 H8 



FSTFACT FSTFB 



FSTFV 



RO 



FSTIC 



HICLPT 
R13 



R1 



FSTIL 



HDCOH 
BU 



B12 



FSTH 



PIBPT 
B15 



R14 



FSTH 



BATBDH 



BATFLAGS BATLOAD 

MISFLAGS MSGFLAGS HOTYPIHG HDCOH 

R13 R1U R15 H2 



COHIHBLK CCHIHBDF CSS DMSCAT 
HDMFIHRD NDMPHDHR OPSECT 
R3 m B5 



DMSCITB FSTFINHD 
PEHDREAD QSHITCH 
R6 R8 



CSi DMSCITA DMSCITB FVSECT KXFLAG KXHSVC 
REDEBBID BO HI RIO R11 R12 
R6 R7 RB HAITLST 



MSGFLAGS HOTYPIHG HDCOH 
B13 B14 B15 



KXHSVC HDCOH 
HAITLST 



HDMPHDHR OPSECT PEHDREAD RO 



R1 



RIO 



B11 



CPDLOG DBDDMSG DBDEXIT DBGFLAGS DBGODT DEGBECDB DBGSECT DBGSiTCH DEC 
LIHE1A LIHE1B LIHEIC HDCOH PBIHTER1 RO Bl BIO B11 
R4 R5 R6 R7 R8 R9 SAVEl 
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Module External References (Labels and Modules) 



DHSDBG ABNESH 


ABHREGS 


ABWSECT 


ADMSCRD 


AIOSZCT 


AKILLEX 


AOPSECT 


ARGMAX 


ARGS 


ABGSAV 


ARGSCT 


BALRSAVE 


BEGAT 


BITS 


BRKPNTBL 


CAW 


COHHXT 


CONSR 


CONSRL 


CSi 


CDRRSAVE 


DBGABN 


DBGEXEC 


BBGEXIHT 


DBGFLAGS 


DBGODT 


DBGPGMCK 


DBGRECDR 


DBGSAV1 


BBGSAV2 


DEGSECT 


DBGSET 


DBGSHTCH 


DEC 


DECDEC 


DMPTITLE 


DMSABNRT 


DMSABW 


DMSCWH 


DMSCHT 


DMSDBD 


D MS I OUR 


DMSITP 


DOMPLIST 


EXAMLC 


EXAHLG 


EXTOPSW 


FIRSTDMP 


FPRLOG 


FO 


F6 


GPRLOG 


HEX 


HEXHEX 


INPDT 


IHPUTSIZ 


INPDT1 


ICOPSW 


IPLPSW 


JFLAGS 


LASTDMP 


LOWSAVE 


MVCNT 


MVCNT2 


NOCON 


OPSECT 


ORG 


0DTPT1 


PGMOPSW 


PRFPOFF 


PROTFLAG 


RETSAV 


HSTSPSW 


RO 


R1 


BIO 


R13 


Ria 


R15 


R2 


R3 


R4 


R5 


R6 


R7 


R8 


R9 


SAVE1 


SAVE2 


SSAVE 


STOPAT 


SYMTABIE 


SYMTBG 


TPFOSR 


TSYM 


TYPFLAG 


VHSIZE 


WAITLIST 


lAITRD 


WAITSAVE 


WTRDCHT 


XPSW 






EMSDIO ADIOSECT 


ADTDTA 


ADTFLG1 


ADTFRO 


ADTFRi 


ADTSECT 


AFVS 


AHOCEHD 


CAW 


CCWX 


CCW1 


CCW1A 


CCW2 


CSH 


DE¥TYP 


DIAGNDM 


BIAGRET 


DIOBIT 


DIOFLAG 


DIOFREE 


DIOSECT 


DODBLE 


DTAD 


DTADT 


ERRCODE 


FREERO 


FVSECT 


lOCOMH 


lOOLD 


lOOPSW 


LASTCYL 


LASTHED 


HDCON 


QQDSK1 


QQDSK2 


QQTRK 


RWCCW 


RO 


R1 


RIO 


R11 


R12 


R13 


R14 


R15 


R2 


R4 


R5 


R6 


R7 


R8 


R9 


SAVEADT 


SEEKADR 


SEHCCW 


SENSB 


TOOBIG 


DFDBDSY 


HRTKF 


XRSAVE 












EMSDLB ADTFDOS 


ADTFLG2 


ADTFROS 


ADTSECT 


ASYSREF 


EGCOM 


CDBRSAVE 


DOSBDFSP 


D CSC BID 


DOSDD 


BOSDDCAT 


DOSDEV 


DOSDSK 


DOSDSME 


BOSDSNAM 


DOSBSTYP 


BOSDDM 


DOSEND 


DOSENSIZ 


DOSEXTNO 


DOSEXTTB 


DOSINIT 


DOSJCAT 


DOSNEXT 


DOSOSDSN 


DOSOSFi 


DOSPERM 


DOSSECT 


DOSDCAT 


DOSOCNAM 


DOSVOLNO 


DOS VOL TB 


DOSYSXXX 


EGPRO 


LUBPT 


NICLPT 


NDCON 


POEPT 


RO 


R1 


RIO 


R11 


R12 


R13 


B14 


R15 


R2 


R3 


R4 


R5 


R6 


R7 



R8 



R9 



SSAVE 



EMSDLK AADTLKP AADTLKW ADTFLG1 ADTFRW ADTM 

CSW DOSDD DOSDEV EOSDSK DOSOP 

FSCBITNO FSTFB FSTFRW FSTFRWX FSTFV 

OSFSTDSK OSFSTXTN PDEADR PDBCDD PDBEEVT 



ADTSECT AERASE AFINIS ARDBOF ASTATE 

DOSOSFST DOSSECT FREELOWE FSCBBUFF FSCBD 

FSTIC FSTIL FSTM FSTSECT JCBDATE 
PDBPT SYSLIHE 



AHRBUF EGCOM COMNAME 
FSCBFM FSCBFN FSCBFV 
LABLEN NDCON OSFST 



DHSDMP 



ASYSBEF 
R7 



BGCOM 



EOCADR 



NOCON 



PPEND 



BO 



R1 



R12 



R2 



R3 



R4 



R5 



R6 



DMSDOS 



ACMSRET ANCHENDA ANCHENTP ANCHINST ANCBLDPT ANCHLENG ANCHPHLN ANCHPHNM ANCHSECT ANCHSTSW AOSREI 



ARFLG 



ASYSREF 






EMSDSK 



DMSDSl 



BGCOM 

FCHTAB 

NOTEXT 

RO 

R7 



CMSVSAM 

FREELOW] 

NOCON 

R1 

B8 



ABATABND ADTFTYP 

BATFIAG2 BATRDN 

F65535 F800 

R7 R8 

ADTFIGI ADTFRW 

FCBSECT FSTL 

R2 R3 



COMNAME 


CDRRSAVE 


DACTIVE 


DIRC 


DIRLL 


DIBN 


DIRNAME 


DIRTT 


EMSFCH 


EMSXCP 


FCBLENG 


IJBABTAE 


IJECCWT 


IJBFTTAB 


INTINFO 


JCSW2 


JCSW4 


JOBDATE 


LTK 


MAINHIGH 


MAINLIST 


MAINSTRT 


N0CRSV3 


PCPTR 


PIBAER 


PIBFLG 


PIBPT 


PIE SAVE 


PIB2PTR 


PIK 


PNOTFND 


PPBEG 


PPEND 


RIO 


R11 


R12 


B13 


R14 


R15 


R2 


R3 


R4 


R5 


R6 


R9 


SVEARA 


SVEPSW 


SVEPSW2 


SVEROF 


SVEROO 


SVER09 


SYSCOM 


SYSNAMES 


VMSIZE 




ADTSECT 


AERASE 


AFINIS 


AFVS 


ARDBOF 


ASTATE 


ATYPSRCH 


ADPDISK 


AWRBOF 


EATDCMS 


BATFLAGS 


FINISLST 


FSTDEC 


FSTFV 


FSTIC 


FSTIL 


FSTM 


FSTN 


FSTSECT 


FSTT 


FVSECT 


FVSFSTM 


NOCON 


RO 


R1 


R13 


R14 


R15 


R2 


R3 


B4 


R5 


R6 


R9 


STATER1 


DFDBDSY 


DPBIT 


WRBIT 














ADTM 


ADTSECT 


AERASE 


ASTATE 


DA 


DIRNAME 


DIRR 


DIRTT 


FCBI0SW2 


FCEIT7.M 


FCBMVPDS 


FSTSECT 


FXD 


NOCON 


PC 


PS 


HO 


R1 


RIO 


R12 


R14 


R15 


Rtt 


H5 


R8 
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DHSDSf 


BGCOB 


COMHAHE 


DOSDD 


EOSSECT 


FBEELOIE 


HOCOH 


POBADR 


PDBCOU 


POBPT 












DBSEDC 


DOALNOS 


EDCB 


BO 


B1 


BIO 


B13 


R14 


R15 


B2 


E3 


BH 


R5 


R6 


< 

3 




B7 


B8 


B9 


SATEAB 




















o 


DHSEDI 


ADBVTAE 


AEBASE 


AEITEMD 


AFIHIS 


APSTFHBD 


AIHCOBE 


ALCHAR1 


ALCHAB2 


ALTLIST 


ABDBDF 


AREA 


ATTH 


ATTHLEH 




AOTOCNT 


ADTOCUBB 


ADTOBEG 


ARBBDF 


BLOC 


BYTE 


CABEIHCB 


CABDHO 


CASEREAD 


CASESR 


CHHGCNT 


CHHGFLAG 


CHNGHSG 


•• 




CHMGHOH 


CHODE 


COHSOLE 


COBITBH 


CODHT 


CEBIT 


DECIMAL 


DEVTAB 


DITCHT 


DMSSCR 


EDCB 


EDCT 


EDLIN 


m 




EDBET 


ENDBLOC 


ENDTABS 


FILEHS 


FLAG 


FLAG2 


FMODE 


FHAHE 


FETR 


FBEELEH 


FSIZE 


FTYPE 


FV 


i< 




GETFIAG 


BALF 


IHCBHO 


INTLD 


lOID 


lOLIST 


lOMODE 


ITEM 


JAB 


LINE 


LMCDRR 


LHINCR 


LHSTABT 






MSGFIAGS 


HBRHODE 


MERMAIiE 


HEWTTPE 


HOTIPIHG 


HOCOH 


PADBDF 


PADCHAB 


PTR1 


PTa2 


PTH3 


RANGE 


REGSAV 


CD 




BEGSAVX 


REPCHT 


BPLIST 


BO 


B1 


BIO 


B13 


BU 


R15 


R2 


R3 


R4 


R5 


B 




B6 


B7 


B8 


B9 


SAVCHT 


SAVCRD 


SCRFLGS 


SCRFLG2 


SEQHAME 


SEBSAV 


SEBTSEQ 


SERTSR 


SIGNAL 


tr* 




SPABES 


STACKAT 


STACKATL 


STBTHO 


TABLIH 


TABS 


TEMPTAB 


TIH 


TOOT 


TRDNCOL 


T7EBC0L1 


TVERC0L2 


TRITCe 


O 




TIPFIG 


VBBC0L1 


VBBC012 


VEBLEH 


XABEA 


XXXCRD 


XYCHT 


XYFLAG 


YAREA 


Z0HE1 


Z0HE2 








CHSEDX 


ADETTAB 


AEDLIH 


AEXTEHD 


AFINIS 


AFLAGLCC 


AFSTFHBD 


ALIHELOC 


ALTMODE 


AHOHLOC 


ABDBDF 


AST ATE 


ASTATER 


BLAHK 1 


p) 




BLAIiK2 


BLA1K3 


BLOC 


CAHCCH 


CABEIHCB 


CASESR 


CHHGMSG 


CMSSEG 


CONSOLE 


COBITEM 


DETTAB 


EDCB 


EDCBEND 


» 




EDCBLTB 


EDLIH 


SDBET 


EDSOBK 


EHDBLOC 


EHDTABS 


FLAG 


FLAGLOC 


FLAG2 


FMODE 


FHAHE 


FREELEH 


FSTD 


Oi 




FSTFINBD 


FSTFMODB 


FSTBECCT 


FSTBECFB 


FTIPE 


FV 


IHVLD 


lOAE 


lOID 


lOLIST 


lOMODE 


ITEH 


JAR 


•T3 




LIBS 


IIHELOC 


LHSTABT 


LOCCHT 


HAIHAE 


HOCOH 


HDHLOC 


PADBDF 


PADCHAB 


PTR1 


PTB2 


PTE3 


RECS 


1") 

o 




REPCNT 


BO 


B1 


BIO 


B12 


B13 


B14 


B15 


R2 


R3 


B4 


R5 


B6 


tr 




B7 


B8 


B9 


SCBBDFAD 


SEQHAHE 


SPARES 


SOBACT 


S DBF LAG 


SYSHAHES 


TABS 


TIH 


TRDHCOL 


TRITCH 


M 

B 
O 




VEBC0L1 


VEBC0L2 


TEBLBB 


Z0NE1 


ZCHE2 


















DHSEBB 


ABA!IABHD 


BAIFLAGS 


6 AT BOH 


CALLEE 


CAR 


COHCCRS 


CDBRSAVE 


DHSCRB 


DMSCRT 


DMSERT 


EBBL 


ERDSECT 


ERF1BF 




EBF1BD 


EBF1SBN 


EBF1SB1 


EBF1TX 


EBF2CH 


EBF2DI 


ERF2DT 


ERF2PR 


EfiP2SI 


ERLET 


EBHESS 


EBHOM 


ERPAS13 






EBPBFA 


EBPCS 


EBPFl 


ESPF2 


EBFHOB 


EHPLET 


EBFHDH 


E8PSBA 


EBPTXA 


ERSAVE 


EBSBD 


ERSBF 


EBSBL 




EBSECT 


EfiSFA 


EBSFL 


EBSFLST 


EBSSZ 


ERTEXT 


ERTPL 


EHTPLA 


EBTPLL 


EHTSIZE 


IBT1 


EBT2 


NOCON 


a 




OLDPSS 


SSAVE 
























S 
P> 


DMSEBS 


AACTFEET 


AACTLKP 


AACTIXT 


ADTADD 


AETCFST 


ADTCHBA 


ADTFLG1 


ADTFRO 


ADTFBH 


ADTFSTC 


ADTHBCT 


ADTLFST 


ADTLHBA 


<+ 




ADTH 


ADTBES 


ADTSECT 


AFTADT 


AFTDBC 


AFTFCL 


AFTFLG 


AFTPFST 


AFTSECT 


AFVS 


AQQTBKX 


ABDTK 


ASTATER 


o 




ATFIHIS 


ATBKLKPX 


ADPDISK 


EHSLAD 


DHSLADR 


DHSLFSR 


DSKADB 


DSKLOC 


DSKLST 


ERBIT 


ERRC0D1 


ERSFLAG 


FSTBKRD 


s 




FSTDBC 


FSTFCL 


FSTFIDP 


FSTH 


FSTH 


FSTSECT 


FSTT 


F¥SECT 


FVSEBASO 


FVSERAS1 


FVSEBAS2 


HOCOH 


REGSAV 1 


o 




BO 


B1 


BIO 


B11 


B12 


B13 


R1U 


R15 


B2 


B3 


R4 


R5 


R6 






B7 


B8 


B9 


SIGNAL 


STATEFST 


STATER 1 


DFDBOSY 
















CHSEXC 


ADTH 


ADTSECT 


AEXEC 


AFIHIS 


AF¥S 


AOPSECT 


CMSSE6 


EHSLFS 


EXADD 


EXECFLAG 


EXECRDH 


EXLE?EL 


EXHOM 






FIIEBDFF 


FILEBITE 


FILEMODl 


ISTD 


FSTLBECL 


HISFLAGS 


HOCOH 


OPSECT 


PLIST 


RO 


HI 


RIO 


R11 






S12 


B13 


Bia 


B15 


B2 


R3 


R4 


B5 


B6 


R7 


R8 


R9 


SYSHAMES 
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EMSEXT ADTFEOS ADTFLG2 ADTFHFD ADTFROS ADTM 

CHHDIIST CDHBEATE COHBTIME EXADD EXLEVEL 

OSSFLAGS PBEVCHND PREVEXEC RO R1 
R7 B8 R9 



ADTSECT AFINIS AGETCLK AOPSECT APOINT ARDBOF 
FSTFINRD LASTCHHD LASTEXEC HSGFLAGS NOTIPIHG NDCON 
R10 R1U H15 R2 R3 B4 



ASCAHO ASTATE 
OPSECT OSRESET 
H5 R6 



DHSFCH ASTATE ASYSHEF ADSRAR] 

FCBSECT FREELOiE HIPHAS 

POBPT BO R1 

R6 R7 B8 

EHSFET ALDRTBLS AOSBAREA BGCOH 

LASTIOC lOCCHT HOTEXT 

R5 R6 R7 



BGCOH 


COHNAHE 


CSW 


FCBDD 


FCBDEV 


FCBDSK 


FCBBSHAM 


FCBIHIT 


FCBOP 


FCBOSFST 


HIPBOG 


IHADEB 


LOG 


LDBPT 


HDCON 


OSFST 


OSFSTDSK 


OSFSTXTH 


PO 


PS 


RIO 
R9 


R11 


R12 


R13 


R14 


E15 


R2 


R3 


R4 


R5 


COHNAHE 


DACTIVE 


DIRH 


DIRSAHE 


FCHAPHNH 


FCHLENG 


FCHOPT 


FCHTAB 


HIPHAS 


IJBFTTAB 


HO CON 


PNOTFHB 


RO 


R1 


B12 


R14 


R15 


B2 


R3 


R4 


STRTADDR 


SYSCCM 


TBEUT 

















DUSFLD ABATABHD ASTATE BATDCHS BATFLAGS BATFLAG2 BATROH CDRRSAVE EGPRO FCBBLKSZ FCBCASE FCBCATHL FCBCON FCBDD 
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DHSGHD 



CHSGBN 



EHSEDI 



DHSHDS 



DBSIHA 



EMSINI 
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DMSITE 



EMSITI 



&BATABND 

CSH 

FVS 

PENDBEAD 
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ABNFSN 

lONTABL 
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DBGEXEC 
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BO 
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FO 

B1 

TIMCCH 

ABISECT 

lOOPSH 

B13 
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EXSAVE 
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FBEELOHE 
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TBLBEF 



APBILB 

CRDPTR 

ENTNABE 

LDRST 

NDBBYTE 

BESET 

B4 

TEBPST 



APSV 

DBSLGTA 

ESD1ST 

LOCCNT 

NXTSYB 

RETBEG 

B5 

TBPLOC 



ARDBDF 



ASCANN ASTATE 



DBSLGTB DBSLIB 



AUSRAREA AHBBDF 



BATFLAGS BATLOAD BRAD 



DBSLSBA DBSLSBB DBSLSBC DBSLSBD DBSLSY 



DYLD 



ESIDTB FINIS FLAGS 
LCCCT LDNDEF BEBBODND 
OSRESET OSSFLAGS ODTEDF 



RLDCONST RO 



B6 
TXTDIBC 



R7 
HORKFILE 



B1 
B8 



FLAG1 

OOTPDT 

BIO 

B9 



FLAG2 



FBEELOWE FSTXTADR GPRSAV 



PARBLIST PLISTSAV PREXIST PRHOLD 
R11 B12 R13 R14 
SAV67 SPEC STRTADDR SYSDTl 






EBSOPL 

DHSOPT 
EBS0R1 
EBS0R2 
DBS0E3 
DBSO?R 



ASYSBEF BGCOB 



R3 

BGCOB 

NDCON 

R1 

R1 



B4 

JCSW3 

BO 

R12 

B12 



DOSDD 
B5 



JCSW4 
R1 



B14 



ADBSOVS ASVCSECT DBSOVS 
0VF1PA 0VF2CB 0VF2NR 
R14 B15 R3 



DOSNEXT 
B6 



NDCON 
B12 



DOSSECT 
E7 



BO 
B15 



DOSSYS 
B8 



R1 

B2 



LDBPT 
B9 



BIO 
R5 



NDCON 

B11 

B6 



BO 



B12 



B1 



B14 



B12 



B15 



B15 



B2 



B2 



S0B1 



LENOVS 


NDCON 


OVAPF 


OVBPF 


0VF1F 


0VF1FS 


0VF1GA 


0VF1GE 


0VF1GS 


0VF10N 


0VF20S 


0VF2WA 


OVSECT 


OVSHO 


OVSON 


OVSSO 


OVSTAT 


BO 


B1 


B12 


E4 


R5 


B6 


B7 


B8 


SVCSECT 
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n 

3e 




EMSOVS 


AS¥CSECT 


CDBRSAVE 


EFPBS 


EGPBS 


EGPRO 


EGPR15 


NDCOS 


OVAPF 


OVBPF 


0VF10N 


CVS AFT 


OVSBO 


OVSON 


m 

at 






OVSSO 


OVSTAT 


BFPBS 


BGPBS 


RGPB8 


BO 


B1 


R12 


R13 


Ria 


R15 


R3 


R4 


o 
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B5 


B6 


B7 


B8 


SSAVE 


SVCODNT 


SVCSECT 


IPFSVO 


TYPFLAG 


VBSIZE 


X COD NT 


XGPRO 


XGPBl 


(3 


OK 




XGPB15 






























DHSPIO 


&BATAEHD 


ABATIIMT 


BATFLAGS 


BATLSECT 


BATNOEX 


BATPRTC 


BATPBTL 


BATRDN 


BATXLIM 


BATXPRT 


CAR 


CSW 


NDCON 


1 


o 




R1 


BIO 


fill 


B12 


B13 


Ria 


B15 


E2 


R3 


R4 


B5 


B6 


R7 
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R8 


H9 
























fa 




DBSPHT 


AACTFBEE 


AACTIKP 


AFTIC 


AFTBP 


AFTSECT 


AFTUP 


DMSLFS 


F65535 


NOCON 


REGSAV3 


BO 


R1 


R11 








RIU 


B15 


R2 


BH 


R5 


B6 
















M 


B 
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DHSPRT 


ADBSPIOC 


AFIBIS 


ARDEDF 


ASTATE 


INSTALID 


NDCON 


BO 


B1 


RIO 


R11 


R12 


R13 


B14 
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en 




R15 


82 


R3 


B4 


R5 


B6 


R7 


B8 


R9 










o 


EHSPBV 


AEBASS 


AFINIS 


ASYSREF 


AHBBOF 


BGCCH 


LDBPT 


NOCOH 


PDBADB 


POBCOD 


PDBPT 


RO 


Bl 


RIO 


w 


p> 




B12 


Bit 


R15 


B2 


B3 




















9 
01 


EHSPON 


ADTID 


ADTSECT 


AFIBIS 


ARDBDF 


ASTATE 


FVSFSTAB 


NDCON 


BO 


B1 


RIO 


K11 


B12 


R13 




•O 




B14 


B15 


R2 


B3 


B4 


R5 


R6 


B7 


B8 


R9 


STATEFST 
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cr 


DHSQBY 


ADTCIl 


ADTDTA 


ADTFDOS 


ADTFLG1 


ADTFLG2 


ADTFLG3 


ADTFRO 


ADTFBOS 


ADTFRH 


ADTFSTC 


ADTID 


ADTB 


ADTHX 




ADTNOH 


ADTSECT 


AEXTSECT 


AFVS 


AIFTBTBL 


ALDBTBLS 


AOUTBTBL 


ASYSBEF 


ADSABRV 


CBSSEG 


DTAD 


DTADT 


EXTSECT 




a 




FCBDD 


FCBDEV 


FCEDSHAH 


FCBDSTYP 


FCBFIBST 


FCBNDB 


FCBSECT 


FCBTAPID 


FVSECT 


BACIIBI 


BISFLAGS 


BSGFLAGS 


NOABBREV 






NOIMPCP 


NOIHPEX 


NOPAGREL 


NORDYTIH 


NOSTDSYH 


BDCON 


OPTPLAGS 


PBFPOFF 


PROTFLAG 


REDEBRID 


RO 


R1 


RIO 








B11 


B12 


B13 


B14 


R15 


B2 


B3 


B4 


R5 


R6 


R7 


R8 


R9 






SISNAHES 


TIMCCi 


TIMCHAB 


TXTLIBS 
























EHSBDC 


ABATABND 


AEBASE 


AFINIS 


ASCANN 


ASTATEH 


ARBBOF 


BATDCHS 


BATFLAGS 


BATFLAG2 


BATRDN 


NDCON 


BO 


R1 








RIO 


B11 


B1U 


R15 


B2 


B3 


R4 


R5 


R6 


B7 


B8 


E9 
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EHSBNE 


AEBASE 


AFIIIS 


ABDBOP 


A«BBOF 
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R13 
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B15 


R2 




O 

9 

C 




R3 
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DHSBSH 


AACTIKP 


ADTCHBA 


ADTFLG1 


ADTFRO 


AETFRi 


ADTFTYP 


ADTH 


ADTSECT 
















ATYPSBCH 


ADPDISK 


ERBIT 


ERRC0D1 


ERSFLAG 


FSTH 


FSTN 


FSTSECT 


FSTT 


FVSECT 


EVSERASO 


F¥SEBAS1 


FVSEBAS2 








HOCOH 


BEGSAV1 


BO 


B1 


RIO 


B11 


R12 


R13 


R14 


R15 


R2 


E3 


R4 






R5 


B6 


B7 


B8 


R9 


STATEFST 


DFDBOSY 

















EflSROS ADTCYL ADTDTA ADTFDOS ADTF1G1 ADTFLG2 ADTFLG3 ADTFROS ADTB ADTSECT CSW DTAD FCBBLKSZ FCBDSBD 

FCBDSHAB FCBDSTYP FCBFIBST FCBI0SW2 FCBLRECL FCBBVPDS FCBNEXT FCBOP FCBOSDSN FCBOSFST FCBPROC FCBRECFB FCBSECT 

FILEBDFF FILEBYTE FILENABE FILEBEAD LOC NDCON OPSECT OSADTDSK OSADTFST OSADTVTA OSADTVTB OSEST OSFSTALT 

OSFSTBIK CSFSTCHB OSFSTDEK OSFSTDSK OSFSTDSN OSFSTEND 0SFSTEX4 OSFSTFLG OSFSTFB OSFSTFVF OSFSTLRL OSFSTLTH OSFSTBVL 

OSFSTHTE OSFSTNXT OSFSTEFB OSFSTRSW OSFSTTRK OSFSTTYP OSFSTDBY OSFSTXHO OSFSTXTH PO PS RO R1 

RIO fill R12 R14 R15 B2 R3 R4 R5 R6 R7 R8 R9 
DND VAB 



Hodale External Beferences (Labels and Modules) 



EHSBRV AEEASE AFIHIS ASTATE ASYSHEF ASBBOF 

NDCOH CSPST OSPSTDSK OSFSTXTN PDBPT 

H3 m E5 B6 B7 

EMSSAB APGBSECT CDBRSAVE DEBDCBAD FCBDD FCBFIBSl 

fil BIO B11 B12 B13 

R8 B9 SCBPTB SCBSAV12 SCBiCBK 



BGCOH 


DOSDD 


DOSDEV 


DCSDSK 


DOSCP 


DOSOSFST 


DOSSICT 


BO 


HI 


BIO 


B11 


B12 


H1U 


B15 


B8 


B9 












FCBSECT 


LINKLAST 


LOG 


HDCON 


P6H0PSW 


PGMSECT 


BETBYBI' 


B1U 


R15 


B2 


B3 


BU 


R5 


B6 


STAEBIT 


STAIBIT 













LOBPT 
R2 



R7 



EHSSBD DA DATAEND DECAREA DECKYADR DECLHGTH DECBECPT DECSDECB DECTYPE DHSSBS DBSSBSRT FCBBYTE FCBITEH FCBKEYS 

FCBOP FCBSECT FCEXTEHT IHADECB lOBIH lOBIOFLG KEYCHHG KEYCODT KEYLBGTH KEYHAME KEYOP KEYSECT KEYTBLAD 

KEYTBLHO OPSECT PS RO R1 BIO R11 H12 R14 R15 R2 R3 R4 

R5 R6 R7 R8 B9 TBLLHGTH VAR 



EflSSBS AOPSECT DA 

FCBCODT FCBDEV 
FCBXTENT IHADEB 
PREVIOUS PS 
R6 B8 



DECABEA DECDCBAD DECIOBPT DECLHGTB DECSDECB DECTYPE DHSSBD DHSSEB FCBBDFF 

FCEDSHE FCBDSNAH FCBIHIT FCBITEM FCBHODE FCBOP FCBOS FCBPDS FCBREAD 

IHADECB lOBBCSW lOBBECBP lOBBFLG lOBIN lOBIOFLG lOBODT HDCCF OPSECT 

RO R1 R11 B12 R13 R14 R15 R2 R3 

TAPEDEV TAPELIST TAPEMASK TAPEOPER DHD 7AR 



FCBBYTE FCBCATHL 
FCBSECT FCBTAP 
OSIOTYPE PO 
R4 R5 



EflSSCH 



BALRSAVE CMHDLIST NDCON 
R7 R8 



RO 



R1 



B12 



R14 



H15 



R2 



R3 



B4 



R5 



R6 



EHSSCR BOFFLOC DECLTH 

HOLDFLAG ITEH 

R2 R3 

TABIIH TBDHCOL 



DHSGIO 


EDCB 


EDBSK 


FLAG 


FLAGLOC 


FLAG2 


FHODE 


FHAHE 


LIHELOC 


HO BLOC 


PTR1 


PTR2 


RO 


R1 


R11 


R12 


R4 


R5 


R6 


B7 


R9 


SAVCHT 


SAVEAB 


SCLHO 


TWITCH 


OTILFLAG 


VERCCL1 


7EELEN 











FTYPE FV 
R13 R14 
SCBBDFAD SCBFLGS 



GIOPLIST 

R15 

SCRFLG2 



DflSSCT ADBSBOS AOPSECT CBSOP 

FCBIOSH FCBITEB FCBOP 

lOBCSS lOBIOFLG lOEOOT 

Bit R15 R2 



DA DECECBAD DECIOBPT DECSDECB FCBCATBL FCBCLOSE FCBCOOT FCBDEV FCBDSNAfl FCBINIT 

FCBOS FCBOSFST FCBPDS FCBE13 FCBSECT FCBTAP FIIEHABE IHADEB IHADECB lOBBFLG 

BACDIBC BACLIBL NDCOH OPSECT PS BO B1 R11 R12 R13 

R3 Ra R5 R6 R7 R8 R9 SAVEB14 



EBSSEB 






DBSSEG 



ADBSROS AOPSECT BLK 

FCBCASE FCBCOOT FCBDEV 

FCBPROC FCBPRPD FCBBEAD 

lOBIOFLG HOCOH OPSECT 

R13 R14 R15 



CBHDLIHE COHRDCNT COHHDCOD COHREAD CONHRBDF CONWBCNT CONWRCOD CONWRITE FCBBOFF FCBBYTE 

FCBDSBD FCBDSTYP FCBIHIT FCBIO FCBIOSS FCBITEB FCBHCDE FCBOP FCEOPCB FCBOS 

FCBBECL FCBR13 FCBSECT FCBTAPID FXD IHADECB lOBBCSW lOBBECBC lOEBECBP lOBIN 

PBIHTLST PS POHCHLST RDBDFF RDCCW RDCODNT READLST RO Rl R11 

R2 R3 R8 SAVER14 TAPEBDFF TAPECODT TAPEDEV TAPELIST TAPEBASK TAPEOPER 



TAPESIZE TSOATCNL TSOFLAGS DSD 



DBSEDC 
DBSSCT 



DflSEBI 
DHSSEB 



DHSEXT 
DBSSLH 



DBSGIO 
DBSSBM 



VAR 



DBSLGT 
DBSSCP 



DBSLIB 
DHSSQS 



DMSLSB 
DBSSVN 



DflSLSY 
DBSSVT 



DHSOLD DHSSAB 



DBSSBD 



DBSSES DflSSCH 
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ADTH 


ADTSECT 
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BATHOS 


BGCOM 


CBSDOS 


CBSSEG 


CMSVSAM 


CPOLOG 


EXTSECT 


Oi 


LTK 


LUBPT 


HAINHIGH 


HISFLAGS 


HSGFLAGS 


NOABBEEV 


NOIHPCP 




HDCON 


HUH 


OPTFIAGS 


PIBPT 


PPEND 


PRFPOFF 


PHOTFLAG 


(0 


R12 


H14 


E15 


R2 


B3 


BU 


R5 


1 

<+ 
o 


SYSNAHES 


SYSSEF 


TIMCCB 


TIMCHAR 


TIMER 


TIHINIT 


TSOBLKS 
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EMSSET ABATABND ADE¥TAB ADHSFRT ADTDTA ADTFEOS ABTFLG2 ADTH 

ASTATE ASYSREP BATDCHS BATFLAGS BATFLAG2 BATHOEX 

FRDSECT FREELOBE FREELOil JCSH3 JCSWU LOCCNT 

NOIHPEX HOPAGREL MOBDYHSG HORDYTIH NOVHREAD HDCKEY 

PDBPT BEDERRID RO R1 RIO Ell 

R6 E7 R8 B9 SOBI SYSCODE 

OPSI OPTHID DPTSWS DSERCODE OSERKEY VHSIZE 

EHSSLN ADTRANS AFINIS AFVS ALDRTBLS AIIASEST AFGHSECT ARDBOF ASTATE ASVCSECT AUSRAREA COHPSUT CDRRSAVE DHSOLD 

DHSSHNSB DOBCOM DYLD EYLIBO DYHBBHH DYHAEHD FREELOSE FRSTLOC FVSECT F65535 LASTLMOD LASTTMOD LDRFLAGS 

LINKLAST LIHKSTRT LOCCNT HODLIST NDCOH OSBESET OSSFLAGS PGHSECT PBFTSYS PSFUSYS PBOTFLAG SCBPTE STRTADDR 

SDBACT SUBFLAG SVCSECT TBEHT 

DHSSHH ATSOCPPI AOSRAREA BAIRSAVE BGCOM CODE203 COHPSHT CDRRSAVE EGPRl EGPR15 EOCADR FHEELCWE LOCCNT HAINHIGH 

HAINLIST HAINSTRT HISFLAGS NOCON OSSFLAGS OSSHND PPEND BELPAGES BO Rl BlO B12 E13 

R14 B15 R2 E3 E4 B6 R7 B8 B9 SSAVE 



DHSSOP AACTIKF 


ACBSCVT 


ADTFLG1 


ADTFRO 


ADTNACH 


ADTSECT 


AERASE 


AFINIS 


AFTADT 


AFTFST 


AFTIC 


AFTIH 


AFTPFST 


AFTSECT 


AOPSECT 


AOSRET 


ASTATE 


AOPDISK 


BLK 


CMSCVT 


CMSNAHE 


CHSOP 


CDRRSAVE 


DA 


DEBDCBAD 


DEBDEBID 


DEBOFLGS 


DEBOFATB 


DHSSBS 


BHSSCTCE 


DHSSCTCK 


DHSSCTNP 


DHSSQSGT 


DMSSQSPT 


DHSSQSDP 


FCBELKSZ 


FCBBDFF 


FCBBYTE 


FCECASE 


FCBCATHL 


FCBCLEAV 


FCBCLOSE 


FCBCON 


FCBCCOT 


FCBDCBCT 


FCBDD 


FCBDEV 


FCBDSK 


FCBDSMD 


FCBDSHAH 


FCBDSTYP 


FCBFIHST 


FCBFOEB 


FCBIHIT 


FCBIOSH 


FCBI0SH2 


FCBITEH 


FCBKEYS 


FCBLRECL 


FCBHEHBR 


FCBHODE 


FCBBVPDS 


FCBOP 


FCEOS 


FCBOSFST 


FCBPDS 


FCBPROC 


FCBPROCC 


FCBPEOCO 


FCBBDB 


FCBBECFH 


FCBBECL 


FCBSECT 


FILEBYTE 


FILEMODE 


FILENAME 


FILEBEAD 


FILETYPE 


FXD 


F6 


IBADEB 


lOBDCBPT 


lOBEND 


lOBIOFLG 


lOBFXTAD 


lOBSTABT 


JFCBIND2 


JFCEHASK 


JFCDSORG 


JFCKEYLE 


JFCLIMCT 


JFCOPTCD 


LOC 


HACDIRC 


HACLIBL 


NOCCH 


OPSECT 


OSFST 


OSFSTBLK 


OSFSTCHR 


OSFSTLBL 


OSFSTBFH 


OSIOTYPE 


PLIST 


PO 


PREVIODS 


PS 


QS 


BO 


Rl 


RIO 


B11 


R12 


R13 


B14 


B15 


R2 


R3 


RU 


R5 


E6 


R7 


B8 


B9 


SAVER1 


SAVEB15 


TAPEDEV 


TAPELIST 


TAPEHASK 


TAPEOPEB 


UND 


VAR 

























DMSSQS AOPSECT BLK DEBTCEAE EHSSCTCE DHSSCTCK DHSSEB FCBBDFF FCBBYTE FCBCLOSE FCBCOUT FCBDEV FCBDSMD FCBINIT 

FCBIORD FCBIOSW FCBIOiR FCBITEH FCBOP FCBPVMB FCEREAD FCBSECT FXD IHABEB lOBECB lOEECBPT lOBIN 

lOBIOFLG ICBODT lOBSTART lOBDPD LOC NOCON OPSECT OSIOTYPE PREVIOUS PS RO Rl ElO 

Ell B12 E13 B14 B15 R2 B3 R4 R5 H6 B7 ONE VAR 



EHSSRT 


ASCANO 
R3 


ASTRINIT 
B4 


FEEELOBE 
B5 


HAINHIGH 
R6 


HISFLAGS 


NOCON 


BELPAGES 


BO 


EMSSRV 


AERASE 


AFINIS 


ASTATE 


ASYSREF 


ABEBUF 


BGCOH 


DOSDD 


DO 




NUCON 


OSFST 


OSFSTESK 


OSFSTXTN 


PUBPT 


BO 


B1 


Ell 




Rl 


B5 


B9 












EMSSSK 


NUCON 
VHSIZE 


BO 


B1 


R12 


B14 


H15 


B2 


B3 



El 



E12 



R14 



E15 



E2 



DOSDEV DOSDSK DOSOP DOSOSFST BOSSECT LUBPT 
B12 R14 R15 E2 R3 
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EHSSTG 



AEXTSECT &LDRTBLS ANCHENDA ANCHSECT AHCHSIZ APGHSECT ASTATEXT ATSOCPPl ADSBAEEA BA1BSA7E BGCOB 



CODE203 COMPSRT 



COBESIZE CDBfiSAVE DHSLGTA EHSSMHCF DBSSBBCN DBSSfll 

EOCADB EXTSECT FBEELOWE IJBBOX LIHKLAST LINKSTBT LOCCNT 

NOCON OLDPSi OPTNBYTE OSSFLAGS OSSBMD PDSSECT 

B12 B13 B14 B15 B2 B3 

SCBHOBK SSAVE STIBEXIT SISCOB TAXEADDB DSAVEPTB 



ADTFBO ADTFBOS ADTFBW 
DBSLADW DBSLFS DBSLFSW 
FVSFSTAD FVSFSTDT FVSFSTB 
B13 fi14 B15 



DBSSTT 


AACTIKP 


ADTFLG1 


ADTFLG2 




AFTSECT 


AFTWBT 


DBSLAD 




PSTFBWX 


FSTB 


FSTSECT 




R1 


BIO 


B12 




STATEBO 






DBSSVM 


AEXTSECT 


AOPSECT 


COHBDBO 



DBSSBHTS 


DYLD 


DYLIBO 


LOCCNT 


BACDIRC 


BACLIBL 


PGBSECT 


PICADDB 


PPEND 


B4 


B5 


B6 


ADTB 


ADTflX 


ADTSECT 


FSTFAP 


FSTFAB 


FSTFAW 


FVSFSTN 


NDCON 


OSFST 


B2 


B3 


B4 



DYBBBNB EGPB12 EGPB14 EGPB15 

BAIHBIGH BAIHLIST MAIHSTBT BISFLAGS 

BELPAGES BO B1 BIO 

B7 B8 B9 SCBPT8 



AFTADT AFTFLG 
FSTFB FSTFBO 
OSFSTFLG OSFSTFB 
B5 B6 



AFTFST AFTBD 

FSTFBOX FSTFBW 

REGSAV3 BO 

B9 STATEFST 



)HBDCNT COHBEAD COHSTACK COHWBBDF CONWBCNT CONWBITE CDERSAVE EXTSECT FCBSECT FSTFINRD 

LOC LSTFINBD NDCON NOBFINRD NDBEHDWR OPSECT OSSFLAGS PENDREAD PEHDWEIT PS BO R1 RIO 

R12 B13 Bit B15 R2 H3 R4 B5 B6 B8 STIBEXIT TIBCHAB TIBEB 
TIBINIT TSOATCNL TSOFLAGS 



to 



EBSSVT 


ADMPEXEC 


ADMSBOS 


AERASE 


AEXTSECT 


AOPSECT 


APGBSECT 


APIE 


ARBBDF 


ASTATE 


ATFINIS 


ADPBISK 


AWBBDF 


CHNGBYTE 




CBNDLINE 


CBSNABE 


CBSOP 


»CBSTAXE 


COHRBCNT 


CONREAB 


COHWRBDF 


CONWRCNT 


CONWBITE 


COBESIZE 


CORRBATE 


CDBRSAVE 


BATAENB 




DECSBECB 


DIAGTIME 


DIRNABE 


DIBPTR 


BBSLGT 


BBSLSB 


BBSSAB 


BBSSBBFR 


DBSSBS 


BBSSCT 


BBSSLH 


EBSSLN3 


BBSSLN42 




DBSSLN6 


BBSSLH7 


DBSSLN8 


EBSSLN9 


BBSSBN 


BBSSBN10 


BBSSBN4 


BBSSBN5 


BBSSOP 


BBSS0P19 


BBSSOP20 


BflSS0P22 


BflSSOP23 




DBSSQS 


DBSS?N 


BBSSVH1 


BBSSyH2 


BBSSVN93 


BBSSVH94 


DOSBB 


DOSNEXT 


BOSSECT 


BDBELIST 


EXTSECT 


FCBBDFF 


FCBBYTE 




FCBCATBL 


FCBCOUT 


FCBDD 


FCBBEV 


FCBBSK 


FCBBSNAB 


FCBDSTYP 


FCBFIBST 


FCBFORB 


FCBINIT 


FCBI0SW2 


FCBITEB 


FCBKEYS 




FCBflVPDS 


FCBOF 


FCBOS 


FCBOSFST 


FCBPES 


FCBSECT 


FCBTAB 


FCBXTENT 


FILEBDFF 


PILEBYTE 


FILECODT 


FILEITEB 


FILEfiOBS 




FILES ABE 


FILET YPE 


IHADEB 


IHADECB 


IHAJFCB 


lOBIN 


lOBIOFLG 


JFCBBASK 


JFCLRECL 


KEYCHNG 


KEYCODT 


KEYFORB 


KEYLNGTH 




KE7NABE 


KEYOP 


KEYSECT 


KEYTABLE 


KEYTBLAD 


KEYTBLNO 


KEYTYPE 


LIHKSTRT 


LOC 


LOWSAVE 


BACBIRC 


BACLIBL 


NEWBLKS 




NDCON 


OPSECT 


OSIOTYPE 


OSRESET 


OSSFLAGS 


PBSBLKSI 


PBSBIB 


PBSSECT 
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DBSITS 


DBSLDB 






IRKLSAVE 


oooooa 


DBSTQQ 












S 


TRHCODE 


000001 


DHSFRE 












IRUBCOI 


000015 


DBSEDI 


DBSEEX 


DHSSCR 








O 

D 


TSOATCNL 


000018 


DBSCIT 


DflSCRD 


DHSITE 


DHSITI 


DHSITS 


DBSSEB DBSSVN 


ISOBLKS 


000001 


DBSSET 
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TSOFLAGS 


000019 


DBSCIT 


DHSCRD 


DHSITE 


DHSITI 


DHSITS 


EBSSEB DBSSVN 


ISYM 


000005 


DBSDBG 












H' 


TVERC0L1 


000002 


DBSEDI 












(D 


IVERCGI2 


000001 


DHSEDI 














THITCH 


000087 


DBSEDI 


DHSEDX 


DBSSCR 










IXTDIRC 


000008 


DHSGLB 


DHSLDR 


DBSLGT 


DBSLIE 


DBSOLD 






TXTLIBS 


000004 


DHSGLB 


DBSLGT 


DHSLIB 


DBSCBY 








lYPE 


000092 


DBSLGT 


DHSLIE 


DHSLIO 


EHSLOA 


DHSLSB 






TYPEAC 


000001 


DHSLIO 














TYPFLAG 


000034 


DBSDBG 


DHSITE 


DBSITS 


DHSLDR 


DHSOVS 





DHSBOD 



DBSOLD 



DHSSLN 
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label 



Count 



fief erences 



TYPFLG 
IIP LI H 
TYPLIST 

DFDBDSY 

DND 

DNP&CK 

DPBIT 

DP SI 

OPTHID 

DPTSHS 

DSiBCOEE 

DSAVEPIB 

USAVESZ 

DSEBCODE 

DSEBKEY 

DTIIFIAG 

VAB 

VEBC011 

VEBC0L2 

VEBLES 

¥I1SIZE 

VSTBANGE 

SAIT 

WAITLIST 

UAITLST 

HAITBD 

SAITSAVE 

HOBKFILE 

HBBIT 

HfiCODNT 

iBDATA 

HBITE 

fifilTEl 

HRTKF 

iTRDCMT 

XABEA 

XCOUNT 

XGPBO 

XGPB1 

XGPR15 

XPSH 



OOOOOU 
OOOOUO 
000007 
000001 
000030 

000017 
000010 
000005 
000004 
000002 
000002 
000002 
000023 
000002 
000004 
000010 
000017 
000027 
000006 
000003 
000006 
000037 

000001 
000028 
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000004 
000006 
000005 
000008 
000001 
000022 
000028 
000007 
000003 
000002 
000001 
000001 
000002 
000001 
000002 
000013 



DHSEDI 
DMSLIO 
DHSITE 
DMSCIT 
DHSABN 
DBSITI 
DMSEOS 
DHSLIO 
DHSACH 
DBS SET 
DMSSET 
DHSSET 
DMSFBE 
DHSITS 
DHSITS 
DMSFBE 
DBSFRE 
DHSSCB 
DHSBOS 
DBSEDI 
DMSEDI 
DHSEDI 
DHSAHS 
DMSSET 
DMSITI 
DMSCIT 
DMSDBG 
DMSCBD 
DHSDBG 
DMSCIT 
DM SOLD 
DMSACC 
DHSGIO 
DMSIHI 
DMSINI 
DMSINI 
DMSDIO 
DMSDBG 
DMSEDI 
DHSOVS 
DMSOVS 
DMSOVS 
DMSOVS 
DMSDBG 



DMSACC 
DMSITP 
DMSSBS 



DMSACF 
DMSITS 
DMSSEB 



DMSACM 
DHSBNM 
DMSSCP 



DMSAOD 
DMSTPE 
DMSSQS 



DMSBTP 



DHSBWB 



DMSDIO 



DMSDSK 



DMSEBS DMSFNS DMSITE 



DMSAUD DMSDSK 



DHSSTG 

DMSSET 
DMSSET 

DMSSBD DMSSBS 

DMSEDX DMSSCB 

DMSEDX 

DMSEDX DHSSCB 

DMSBOP DHSBBD 

DMSSSK DMSSVT 

DHSIBI DMSIHS 

DMSSVT 

DHSCHB DHSCWT 

DHSDBG DMSIOW 

DHSBWB DHSDSK 



DMSSEB DHSSOP DHSSQS DHSSVT 



DHSBWB 
DHSVIB 



DMSITI 



DMSTPE 



DMSDBG DMSDOS 



DHSFBE 



DHSHDI DHSHDS 



DMSINS 



DMSIDB 



DHSOVS 



DMSITE 
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XRSAVE 


000003 


DMSDIO 






XXXCHD 


000043 


DHSEDI 




< 


XYCNT 


000008 


DHSEDI 
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XYFIAG 


000003 


DHSIDI 






YABEi 


000001 


DMSEDI 
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YDISK 


000002 


DHSIMI 
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YYBDD 


000003 


DMSINS 






Z0HE1 


000011 


DBSEDI 


DHSEBX 
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Z0NE2 


000016 


DHSEDI 


DHSEDX 
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Hodule 
Name 



DHKACO 



DHKBLD 



DMKBOX 



Entry 
Points 



DHKACON 

DHKACODV 

DBKACOFF 

DHKACOFU 
DMKACOQO 

DMKACOTM 
DHKBLDEC 

DMKBLDBL 
DBKEIDBT 

DMKBLDVH 



DHKBOXBX 



Attributes, Function 



Pageable. 

Provides additional accounting 
function at logon time (for in- 
stallation use) . 

Builds an account card buffer for 
a VDEVBLOK. 

Creates account card buffer for a 
VMBIOK. 

Punches queued up accounting cards. 
Queues up account card buffers for 
output on a real device. 
Creates a connect and usage tiae 
message for a user. 

Pageable. 

Allocates storage for a virtual 
ECBIOK and the two TEQBLOKs re- 
quired for a virtual machine with 
the ECHODE option, and initializes 
these blocks. 

Beleases real segment, page, and 
swap tables to free storage. 
Creates and initializes segment, 
page, and swap tables as a func- 
tion of virtual storage size, 
which is part of the process of 
building a user's virtual machine. 
Creates and partially initializes 
a THBLOK for a virtual machine, 
identified by its terminal real 
device block. 

Pageable. 

Provides the VII/370 or user logo 
(header) for printed output. 
Logc for initial screen display 
and header separator for printer 
spool files. 



Module 
Name 



DBKBOX 
DHKBSC 



DHKCCH 



DMKCCH 



Entry 
Points 



DMKBOXHR 



DHKESCEB 



DRKCCHIS 

DHKCCHNT 
DHKCCHRT 

DHKCCWSB 



Attributes, Function 



Installation header reference. 

Resident. 

Bisync line error processing. 
Examines the error condition 
resulting from a unit check or 
channel error that occurred while 
executing a CP generated bisync 
line channel program. If the er- 
ror is uncorrectable, DHKHSH is 
called to notify the operator. 
After return from DHKHSH, the or- 
iginal channel program is termi- 
nated and the fatal flag is set in 
the lOELOK. If the error is cor- 
rectable, the channel program is 
re-executed up to a maximum of 
seven retries. 

Resident. 

Operates with the I/O interrupt 
handler to schedule a device de- 
pendent error recovery procedure 
when a channel data check, control 
check, or interface control check 
is detected. 

Entry from DHKIOS when a channel 
check occurs when storing a CSS 
after a SIO. 

Entry from DHKIOINT when a channel 
check occurs on an I/O interrupt. 
Entry from DHKIOE to allow error 
messages to be printed. 

Resident. 

Invokes an internal subroutine 

(CNTRLSUB) to obtain control bytes 

(seek data) . 
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Module 
Name 



DHKCCH 
(cont.) 



DMKCDB 



DHKCDS 



EHKCFC 



Entry 
Points 



DMKCCHTC 



DMKCCHTR 



DHKCDEDC 
DHKCDBDI 



DHKCDBDH 



DHKCDBDU 



DMKCDSCP 
DMKCDSTO 



DHKCFCBD 
DHKCFCSL 
DKKCFCBE 



Attributes, Function 



Searches previous (external) RCS 
chains and resolves the address of 
the ECH task if found. 
Takes the list of virtual CCHs as- 
sociated with the user's SIO and 
translates it into a real CCH list. 

Pageable. 

Processes DISPLAY, DCP, DOMP, and 
DHCP connands. 

Executes the DISPLAY coBBand to 
display real storage locations. 
Displays virtual storage 
locations, storage keys, general 
registers, floating-point regis- 
ters, PSD, CAH, and CSi at the 
terminal. 

Dunps the contents of the speci- 
fied real storage locations en the 
virtual printer spool file. 
Dumps the contents of the speci- 
fied virtual storage locations, 
registers, PSW, and storage keys 
on the virtual printer spool file. 

Pageable. 

Processes STOBE and STCP coinands. 

Stores data into real storage 

(STCP coamand) . 

Stores data into virtual storage 

(STCBE command} . 

Pageable. 

Gets the address of the routine 
that processes the CP console 
function that was reguested. 
Processes a CP console function. 
Processes the SLEEP command. 
Processes the BEGIN command. 







DHKCFC 
(cont.) 



DBKCFD 



DHKCFG 



DHKCFM 



DBKCFCQU 
DBKCFCBQ 



OHKCFDAD 
DHKCFDLO 



DHKCFGSV 



DHKCFHAT 
DMKCFHBK 



DHKCFHEN 



Processes the QDEHY command. 
Presents an attention interruption 
to the virtual machine to simulate 
a real request key interruption. 

Pageable. 

Processes LOCATE and ADSTOP 

commands. 

Stops virtual machine at specified 

address (AESTOP command) . 

Displays address of real device 

blocks, or VHBLOK and/or virtual 

device blocks (LOCATE command) . 

Pageable. 

Saves a system's virtual storage 
space, including registers and PSH 
as they currently exist, in page 
form, on a DASD device. The name 
of the system and the DASD loca- 
tion at which it is to be saved is 
defined in CMKSTS. 
Resident. 

Processes the SLEEP, BEGIN, QDEHY, 
and REQUEST commands. Also pro- 
cesses DIAGNOSE code 8. Its scans 
the command line and goes to the 
required module. 

Posts an attention interrupt pend- 
ing for the virtual machine. 
Puts the terminal in console func- 
tion (CP) mode (ATTN key pressed 
twice) . Scans the command line 
and goes to the command handling 
routine. 

Entered when DIAGNOSE code 8 is 
executed. Scans the command line 
and goes to the command handling 
routine. 
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Module 
Name 



DMKCFP 



DBKCFS 



DBKCPT 



DBKCKP 



Entry 
Points 



DBKCFPII 
DHKCFPIP 
DHKCFPHD 
DHKCFPBB 

DMKCFPBI 
DBKCFSET 
DHKCFTRH 

DHKCKPT 



Attributes, Function 



Pageable. 

Simulates the operator's console 
for the virtual machine. 
Entry from DBKLOG to process IPL 
command (logon) . 

Entry from DHKCFM to process IPL 
command. 

Handles virtual device reset for 
other CP routines. 
Handles system resets for ether CP 
routines. Besets the virtual ma- 
chine. 

Releases an lOBLOK when called by 
DHKHLD. 



Pageable. 

Processes the CP SET command. 

Entry point for SET command 

cesser. 



pro- 



Pageable. 

Processes user's terminal options. 
Entry point for the TEHBIHAL com- 
mand processor. 

Pageable. 

Saves pertinent data when a check 
point occurs. 

Retrieves accounting data from the 
VBBLOK, TDFVELOK, and unpunched 
accounting cards. It retrieves 
accounting information for dedi- 
cated devices, saves the system 
log messages, and saves all con- 
trol blocks for spool files. The 
data is written on the SYSiABB cy- 
linder of the IPL pack. 

DBKCKP is loaded and executed by 
DBKDHP or initial program load. 



Bodule 
Name 



DBKCKS 



DBKCBS 



DBKCFB 



Entry 
Points 



DBKCKSPL 



DBKCKSIN 



DBKCKSWB 



DBKCNSED 

DBKCMSEN 
DBKCHSIC 

DBKCHSIH 
DBKCPBEX 



Attributes, Function 



Pageable. 

Performs checkpoint processing. 
Performs a checkpoint on any al- 
terations in the spool file set up 
to allow the recovery routine to 
get them if warm start fails. 
Initializes the check point cylin- 
der after a successful warm start 
from the standard recovery pro- 
cedure or after a cold start. 
Becovers previously checkpointed 
spool file information. This in- 
formation includes all open print 
or punch files in existence at the 
time the system went down or was 
shutdown. All open spool files 
are put in user hold status. 

Besident . 

Beal console terminal manager. 
Edits the input line for the fol- 
lowing characters: escape, line 
end, line delete, and character 
delete. 

Enables or disables a low-speed 
terminal line. 

Entered from DBKQCH to initialize 
read and write CCHs for the 
COS TASK built by DBKQCN. 
Interruption return point and 
handler for terminal I/O. 

Pageable. 

Simulates the operator's console 
for the virtual machine. 
Processes the EXTEBHAL command to 
present an external interruption 
to the virtual machine. 
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Module 
Name 



DMKCIB 
(cont .) 



DHKCFE 



DBKCEI 



DHKCES 



DMKCPV 



Entry 
Points 



DHKCFEHB 



DHKCPBHS 



DHKCPBRH 



DHKCPBET 



DHKCPBSE 



DHKCPIEH 



DHKCPIHT 



DHKCPSSH 

DMKCPSH 

DHKCPSBY 



DMKCPVAA 



Attributes, Function 



Processes the NOTRBADY conBand to 
cause the virtual device to appear 
not ready. 

Processes the RESET comnand to 
reset all pending interrupts from 
the specified device. 
Processes the REWIND coiaand to 
issue a rewind to the real tape 
device. 

Processes the READY coiraand to 
simulate a device end interrupt to 
the specified device. 
Processes the SYSTEH command to 
simulate system reset and PSW re- 
start to allow clearing of storage. 

Resident. 

Contains data constants that de- 
fine the end of the CP nucleus. 

Pageable. 

Prepares VM/370 for operation. 
Enables the operator's console, 
initializes the TOD clock and di- 
rectory, allows operator logon, 
prepares for warm start, and com- 
pletes initialization. 
Initializes and prepares CP for 
operation. 

Pageable. 

Processes the SHOTDOHN, HALT, and 

VARY commands. 

Processes the SHDTDOWH command. 

Processes the HALT command. 

Processes the VARY command. 

Pageable. 

Punches user accounting records. 



Module 
Name 



DMKCPV 
(cont.) 



DMKCQG 



DMKCQP 



DMKCQR 



Entry 
Points 



DHKCPVAC 

DBKCPVAE 
DBKCPVDS 

DMKCPVEN 

DMKCPVLK 

DBKCPVUL 



DMKCQGEN 



DMKCQPRV 



DBKCQREY 



Attributes, Function 



Processes the ACNT command to 
create accounting records for 
logged on users. Also, resets 
accumulated accounting information. 
Enables system low-speed lines for 
system restart. 

Processes the DISABLE command to 
disable an active line after the 
current user is finished with it. 
Processes the ENABLE command to 
enable the system's low-speed 
lines for system log on. 
Processes the LOCK command to lock 
specified pages of a user's vir- 
tual storage space into, real main 
storage. 

Processes the UNLOCK command to 
unlock pages that were locked by 
operator command (LOCK) . 

Pageable. 

Processes the class G and class D 

QUERY commands. 

Entry to QUERY command processor 

for class G users. 

Pageable. 

Processes the class B and class G 

QUERY command. 

Entry to QUERY command processor 

for class E and G users. 

Pageable. 

Processes the QUERY command. 
Main entry point. Contains a 
branch table to get to the rou- 
tine that processes the operand 
specified in the QUERY command; 
the operand can be one of the fol- 
lowing: FILES, TIME, SET, LCGMSG, 
NAMES, USERS, DUMP, PAGING, HOLD, 
PRIORITY, TERMINAL, PF, SASSIST. 
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Entry 




1 Name 


Points 


Attributes, Function 


1 DMKCQR 


DMKCQRFI 


Retrieves the number of reader. 


1 (cont.) 




punch, and print files. 


1 DBKCSC 




Pageable. 

Processes real spooling commands 

for real unit record devices. 




DBKCSOBS 


Processes the BACKSPACE command. 




DHKCSODR 


Processes the DRAIN command. 




DMKCSOFL 


Processes the FLOSH command. 




DHKCSOLD 


Processes the LOADBDF command 
(real DCS or FCB buffer) . 




DMKCSORP 


Processes the REPEAT command. 




DBKCSCSD 


Starts entry point for warm start. 




DMKCSOSP 


Processes the SPACE command. 




DBKCSOST 


Processes the START command by de- 
vice type. 




DBKCSCVL 


Processes the LOADVFCB (load vir- 
tual forms control buffer) command. 


1 DMKCSP 




Pageable. 

Processes class D and G spooling 

commands. 




DBKCSPCL 


Processes the CLOSE command. 




DMKGSPFR 


Processes the FREE command. 




DBKCSEHL 


Processes the HOLD command. 




DMKCSPSP 


Processes the SPOOL command. 


1 DMKCST 




Pageable. 

Processes class G commands. 




DMKCSTAG 


Entry point to process the TAG 
command. 


1 DBKCSO 




Pageable. 

Processes the class D and G spool- 
ing commands. 




DMKCSOCH 


Processes the CHANGE command. 




DBKCSUCR 


Processes the ORDER command. 




DBKCSUPO 


Processes the PURGE command. 


1 


DMKCSUTR 


Processes the TRANSFER command. 



Hodule 
Name 



DBKCVT 



DBKDAS 



DBKDDH 



Entry 
Points 



DMKCVTBD 

DBKCVT BH 

DBKCVTDB 
DMKCVTDT 

DBKCVTFP 
DBKCVTHB 

DHKDASER 
DMKDASRD 
DHKDASSD 



Attributes, Function 



Resident. 

Processes the conversion routines. 
Converts a word of binary data 
into a doublevord of decimal di- 
gits. 

Converts a word of binary data 
into a doubleword of hexadecimal 
data. 

Converts a decimal field into a 
fullword of binary data. 
Converts data and time to EBCDIC 
and inserts it into a specified 
location. 

Converts a floating-point double- 
word into 17 bytes of decimal data. 
Converts the designated hexadeci- 
mal field into a binary fullword. 

Resident . 

DASD error retry program. 

Retries the failing DASD channel 

program. 

Processes unsolicited device end 

interruptions . 

Collects DASD sense data. 

Residency not applicable. 
This is the BASE dump restore pro- 
gram. It saves data from a direct 
access volume onto a tape or tapes. 
It returns data to DASD from tape 
that has been placed on the tape 
by this program. It copies data 
from one device to another of the 
same type. It prints a transla- 
tion of each record specified en 
the SISPRINT device. Prints a 
translation of each record speci- 
fied on the console. 

Initial program loaded or run 
under CBS if en a CBS disk. 
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Hodule 
Maae 



DMKDEH 
(cont.) 



DNKDEF 



DHKDGD 



DUKDIA 



Entry 
Points 



DHKDOBEP 
DHKDDBED 

DHKDEFIN 

DMKDGDDK 

DHKDIACP 
DHKDIADB 

DHKDIAL 

DHKDIASH 



Attributes, Function 



DASD duip restore program entry 

point . 

End-of-load aodule for CMS. 

Pageable. 

Processes the DEFINE comnand to 
define a virtual device or storage. 
Processes the DEFINE conaand to 
alter the virtual aachine's confi- 
guration or storage size. 

Besident . 

Processes siaple disk I/O. 
Performs simple disk I/C of a 
standardized format with a minimum 
of ecu chain manipulation and 
interruption handling. 

Pageable. 

CODPLE command processor. Esta- 
blishes a virtual connection be- 
tween two channel— to-channel adap- 
ters on a single virtual machine. 
Beleases a terminal line that has 
been in use by the virtual machine 
via the DIAL command. The line is 
detached from the virtual machine 
and made available for normal log 
on to VH/370. 

Processes the DIAL command. At- 
taches a user's terminal as a de- 
dicated device to an existing vir- 
tual 270X terminal line in the 
virtual machine addressed by the 
command line. 

Simulates sense data and status 
for virtual I/O to a simulated I/O 
device (27C2 line or CTCA) that 
that has not yet been activated 
through either the console func- 
tion DIAL for 2702 lines, or the 
console function CODPLE for vir- 
tual CTCAs. 



Module 
Name 



DHKDIB 



DHKDHP 



DHKDBD 



DMKDSP 



Entry 
Points 



DHKDIBCT 



DHKDIBED 



DHKDHPDK 
DHKEHPBS 



DHKDBDDD 
DBKDBDEB 



DMKDBDHP 



DHKDBDSY 



Attributes, Function 



Pageable or standalone. 
Initial program loaded or run un- 
der CMS if en a CMS disk. 
Builds a user directory on a sys- 
tem owned volume using pre— alloca- 
ted cylinders. 
End of load module for CMS. 

Besident . 

Writes a dump of main storage, 

control registers, floating-point 

registers, general registers, and 

clocks to a specified device. 

Writes the dump on the specified 

device. 

Initial program loads the system 

over again. 

Pageable. 

Process spocl files 

Delete system dump spool file. 

Manipulates input spool files via 

a DIAGNOSE code X'0014' issued by 

the virtual machine. 

Beads a system dump spool file via 

a DIAGNOSE code X«003U' issued by 

the virtual machine. 

Beads the system symbol table 

CSECT via a DIAGNOSE code X'0038« 

issued by the virtual machine. 

Besident. 

Entered after each interruption 
handler is finished processing and 
after each stacked CPEXBLCK, I/O 
request, and external interruption 
has been serviced. It updates the 
CPU times charged to the user that 
has received service, updates all 
virtual timers, and reflects any 
pending interruptions for which 
the user is enabled. After the 
user's status has been updated, 
the highest priority runable user 
is dispatched . 
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Module 
Name 



DHKDSP 
(cont.) 



DHKEDH 



DMKEEH 



to 



Entry 
Points 



DHKDSPA 

DHKDSEB 

DHKDSPCH 
DMKDSPQS 
DHKDSPEQ 
DHKDSPHP 



DMKEDM 



DHKEDH 



attributes. Function 



iBBediate redispatch path for vir- 
tual aachines. The only status 
update that occurs is for virtual 
timers. 

Process new virtual PSl and dis- 
patch. Entered if the virtual PSW 
has been entered outside of DHKDSP. 
Hain entry point. Updates timers 
and dispatch user. 
Nonexecutable; dispatched user's 
maximum time slice. 
Queues anchor for lOBlCKs and 
CPEXBLOKs. 

Number of dynamically assignable 
page frames now available in the 
system. 

Buns in a virtual machine under 
CHS control. 

Reads the CP dump from the CHS 
file and edits and prints the fol- 
lowing in a readable format: 

• PSWs 

• General registers and control 
registers 

• CSW and CAW 

• load map 

• Heal device blocks and associa- 
ted control blocks - RHCBLOK, 
RCDBLOK, RDEVBLOK, lOBLCK, BES- 
PLCTL, SPBLOK, lOERBLOK, ALOC- 
BLOC, RECBLOK 

• SFBIOK chains for reader, prin- 
ter, and punch files 

• Core table 

• Each user's virtual device 
blocks and eissociated control 
blocks - VHBLOK, VCHBLCK, 
VCOBLOK, VDEYBLOK, VSPLCTL, 
SFBLOK, VCONCTL 



Hodule 
Name 



DHKEEH 
(cont.) 



DHKEIG 



DHKEHA 



DHKEHA 



Entry 
Points 



DHKEDB 
(cont.) 



DHKEHA 



DHKEHA 



Attributes, Function 



• Each user's segment page and 
swap tables. 

Prints a hex dump of storage sup- 
pressing print lines that are dup- 
licates of the preceding lines. 
Operator options allow: 

• Print suppression of a for- 
matted dump 

• Print suppression of a hex dump 

• Erasing the CHS dump file 

• Printing a load map 

• Printing the dump at the user's 
console. 

The default of the options is a 
formatted hex dump printed on de- 
vice OOE. 

Pageable. 

Analyses the 2880 channel logout 
and sets appropriate bits in the 
ECSB field according to the 
results of this analysis. It moves 
the channel logout to the channel 
check record. 

Pageable. 

Contains the framework of the com- 
mon error messages that are gener- 
ated at various places within CP . 
Hodule DHKEBH references DHKEHA to 
write error messages that reguire 
variable data to be inserted into 
them. 

This module contains no execu- 
table code and contains all error 
messages from to 225. 
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Module 
Name 



DMKEBB 



DHKEEB 



DHKFCB 



DHKFHT 



Entry 
Points 



Attributes, Function 



Pageable. 

DHKEBB I Contains the framework for the 
coBBon error messages that are 
generated at various places within 
CP. The module DHKERH references 
DBKEMB to write error messages 
that reguire variable data to be 
written into them. 

This module contains no execut- 
able code and contains error mes- 
sages 256 and up. 

Pageable. 
DBKEBBSG | This is the message writer. Lo- 
cates the reguested message and 
inserts the module ID, message 
number, and data. It also prints 
the message. 

Pageable. 
DBKFCB I Contains the forms control load 
buffer images that the LOADBDF 
command uses to load the forms 
control buffer in the 3811 control 
unit for the 3211 printer. 

The LOACVFCB command also uses 
DBKFCB to lead the forms control 
buffer in the virtual 3211 printer. 

Standalone program. Initial pro- 
gram loaded or run under CMS if 
on a CBS disk. 



Module 
Same 



DBKFBT 
(cont .) 



DHKFBE 



DMKGIO 



Entry 
Points 



DBKFBT 



DBKFBEE 
DBKFBEBS 



DBKFBET 
DMKFSETB 



DBKGIOEX 



Attributes, Function 



Adapts parameters from the console 
or IP! device (card reader) and 
performs partial or complete for- 
matting, allocating, and labeling 
of 23ia, 2319, 3330, 33a0, 3350 
and 2305 EASB devices. The FORMAT 
program also write- checks the sur- 
faces. Bad surfaces are flagged 
to prevent their use. No alterna- 
tive tracks are assigned. OS la- 
bels are written to be compatible 
with OS, but labels indicate to OS 
that no space is left on the DASD 
device. All input parameters are 
verified for correctness. 

Besident . 

Free storage manager. 

Gets space from free storage. 

Beturns subpools to free storage 

chain. 

Beturns space to free storage. 

Returns space to free storage; 

does not release pages. 

Pageable. 

Initializes supervisor operations 
for tape, unit record, and 
nonstandard disk I/O operations. 
Checks device validity and ini- 
tializes I/O operations on tape, 
unit record, and nonstandard disk 
I/O programs per supervisor call. 
This module presents resultant 
condition code and CSH (if warran- 
ted) to the user. 
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nodule 
Nan€ 



DMK6BF 



DMKHVC 



DMKHVD 



DHKIOC 



DHKICE 



Entry 
Points 



DHKGBFIN 



DHKGBFEH 
DHKGEFIC 



DHFHVCiL 



DHKHVDAL 



DHKIOCVT 



Attributes, Function 



Resident. 

Supports local 3270 and 3066 devi- 
ces. CHKGBF processes interrup- 
tions and CCWs for the devices. 
The processing includes sessage 
handling and screen manageaent. 
Handles the interruption via an 
lOBLOK. 

Enables or disables the device. 
Starts a CONTASK from DBKQCF. 

Besident . 

Perforis services for the virtual 
machine as reguested via the 
DIAGHOSE instruction. The specific 
service performed depends on the 
code in the DIAGNOSE instruction. 
Pageable. 

Performs services for virtual ma- 
chines as reguested by the 
DIAGHOSE instruciton. 

Converts TB/370 device type to 
OS/¥S device type. 

Besident. 

This is the error recording module. 
It receives all requests for error 
recording and passes control to 
the proper pageable routine after 
checking if a recording is in pro- 
gress. If a previous request for 
error recording is in progress, 
the current request is queued on 
the appropriate queue for recor- 
ding at a later time. It makes a 
check to determine if the re- 
cording cylinder is full. DHKIOE 
also interfaces with the. pageable 
module that initializes and erases 
the error recording cylinders. 



Module 
Name 



DHKICE 
(cont .) 



DHKIOF 



Entry 
Points 



DKKIOECC 

DMKIOECH 

DHKIOECJ 

DKKIOEFL 

DHKIOEFH 

DHKIOEBC 
DHKIOEHH 

DMKIOEHV 

DHKIOEOB 

DHKIOEQQ 



DMKIOEBC 
DHKIOEBN 



DMKIOERB 



DHKIOESD 
DHKIOESB 



DHKIOEST 
DHKIOEVR 



DHKI0FC1 



Attributes, Function 



Entry for a channel error condi- 
tion occurring on a SIO in DHKIOS 
with a response condition code of 
one. 

Entry for a stacked channel re- 
cording request from the channel 
check handler. 

Entry for a stacked channel check 
recording reguest from ERP. 
Entry point to locate the star- 
ting page record for recording. 
Entry to clear and format the re- 
cording area on disk. 
Entry for machine check recording. 
Entry for a stacked machine check 
request. 

.Entry for a stacked environmental 
recording request. 
Entry for a stacked outboard error 
recording request. 
Calls to initiate error recording 
via DHKIOF (no DBKIOE function 
performed) . 

Entry for a stacked erase request. 
Processes a 3704/3705 and remote 
3270 request. 

Schedules recording for unit 
check, channel data check, and 
hardware environmental counts. 
Becords 3330 data. 
Schedules statistical data record- 
ing. 

Schedules the update of a statis- 
tical data request. 
Processes an SVC 76 request. 

Pageable. 

Becords system and I/O errors on 
the system disk in predefined er- 
ror recording cylinders. 
Becords channel check error from 
SIO in DHKIOS when CC=1. 
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Nodule 
Name 



DMKIOF 
(cont.) 



DMKICG 



DHKICS 



Entry 
Points 



DMKIOFIH 



DMKIOFOB 
DBKI0FH1 
DHKIOFST 
DHKIOFVfi 



DMKI0GF1 
DMKI0GF2 



DHKIOSHA 

DMKIOSIS 
DHKIOSQR 

DMKIOSQT 

DHKIOSRW 



attributes. Function 



Initializes pointers to available 
recording pages at IPL and after 
an erase has been completed. 
Records OBR and MDR records. 
Records machine checks. 
Updates statistical data counters. 
Records errors when requested by 
SVC 76. 

Pageable. 

Called at initialization to locate 
the error recording device, locate 
the last outboard error record and 
system recordings made on the cyl- 
inders, and set the in-storage 
pointers to the correct values. 
Initialization for RMS functions 
is performed after firsr making a 
test to determine if CP is running 
under CP. RMS functions are not 
activated for a virtual CP envi- 
ronment. This module also erases 
the recording areas. 
Contains all function of DHKIOS 
except erase. 

Erases either the machine check 
handler or channel check handler 
recording cylinder, or the out- 
board recording cylinder; either 
separately or combined. 
Resident. 

Schedules requests for virtual ma- 
chine and program I/O operations, 
and services all I/O interruptions. 
Halts an active device and drains 
all interruptions. 
Processes an I/O interruption. 
Schedules CP generated I/C opera- 
tion. 

Schedules a virtual machine I/O 
operation. 

Processes the lOBLOK used for 
REHIHD. 



nodule 
Name 

DHKISH 



DMKLEOO 



DHKICC 



DMKLNK 



DBKLOG 



DMKHCC 



Entry 
Points 



DHKISMTR 



LDRGEH 



DHKLOCK 



DMKLOCKD 
DMKIOCKQ 
DHKLOCKT 



DMKEPSHD 



DHKINKIH 
DHKINKSB 



DHKLOGON 
DUKIOGCP 
DHKLOGA 



DHKHCCCL 



Attributes, Function 



Pageable. 
Finds and 
string. 



modifies an ISAM CCR 



Loader - utility program. 
Loads assembled program modules 
into storage at locations other 
than those assigned by the assem- 
bler. It completes linkage among 
the modules and transfers control 
to one of the loaded modules for 
execution. 

Resident. 

Allows a system resource to be 

marked in use or not available by 

a unique 8-character name. 

Dequeues a locked name. 

Queues or locks a name. 

Tests to determine if a name is 

locked. 

Pageable. 

Prompts the user to enter a pass- 
word, types masking characters if 
appropriate, reads the password 
from the terminal, and checks it 
for a match. 

Links to a virtual DASD device be- 
cause of an issued LINK command. 
LINK subroutines. 
Pageable. 

Logs on a user or operator. 
Logs on a user. 
Logs on the operator. 
Processes the AOTOLOG command. 

Pageable. 

Processes the HOHITOR START or the 

MONITOR STOP command. 
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Module 
Dame 



DHKMCH 



DHKMID 



DMKHCH 



DMKHSG 



DMKMSH 



Entry 
points 



DHKUCHIli 
DMKHCHBS 



DHKKIDHT 



DHKHOHIO 
DHKBCBBI 
DHKHCSSH 
DHKEOKTH 
DHKKOSTI 



DHKHSGEC 
DMKMSGHS 
DHKHSGHN 

DHKWSHB 



Attributes, Junction 



Resident. 

Processes a machine check inter- 
ruption. 

Enables or disables soft machine 
check recording. 

Pageable. 

Changes the date in the system low 
storage at midnight and resets the 
clock comparator for the next mid- 
night occurence. DHKMID also 
sends messages to all users about 
the date change. 

Pageable. 

Processes commands and reguests 
associated with the MONITCB, in- 
including HCNITOB CALL interrup- 
tions within CP. 

Processes tape interruptions re- 
turned by DMKIOS. 
Processes a MONITOR CALL program 
interruption. 

Routine to stop the MCHITOR com- 
mand. 

Routine to write MONITOR tape 
header records. 
Handle timer reguest interruptions. 



Pageable. 
Transmits 
users for 
commands, 
lines for 
number of t 
ECHO comman 
MESSAGE com 
WARNING com 
Resident. 
Allows syst 
the operato 
of error re 



essages to logged on 
he MESSAGE or WARNING 
Receives and retransmits 
he ECHO command for the 
imes specified, 
d processor, 
mand processor, 
mand processor. 

em communication with 
r for the enhancement 
covery procedures. 



Module 


1 Entry 




Name 


Points 


Attributes, Function | 


DMKNEH 




1 Pageable. | 




1 DMKNEMOP 


Gets a 5-byte mnemonic opcode for | 
1 a System/370 binary opcode. | 


DMKNES 




Pageable. | 
Processes NETWORK operands as | 
follows: 1 
POLLDLAY 1 
SHDTDOWN 1 
DISPLAY 1 
VARY 1 
TRACE 1 




DBKHESDS 


Processes the NETWORK DISPLAY | 
command. | 




DKKNESEP 


Processes the NETWORK VARY EP | 
command to switch an NCP communica-| 
tion line to IP mode. | 




DMKNESHD 


Processes the NETWORK SHUTDOWN | 
command. | 




DMKNESPL 


Processes the NETWORK POLLDLAY | 
command. | 




DMKNESTR 


Processes the NETWORK TRACE | 
command. | 




DMKNESHN 


Processes the NETWORK VARY NCP | 
command to switch an EP communica- | 
tion line to NCP mode. | 


DMKNET 




Pageable. | 
Decodes NETWORK command and enables | 
bisync lines. | 




DHKHETAE 


Enable bisync lines and remote | 
stations. | 




DBKHETHK | 


NETWORK command decoder. | 


DMKNLD 




Pageable. | 




DMKNLDMP 


Dumps the 3705 network control | 
program. | 




DMKNLDR 


Loads the 3705 network control | 
program. | 
These routines may be called by a | 
console command from EMKNIT or | 
or internally by DMKCPI (for LOAD) | 
or DMKHNH (for DUMP) . | 
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Module 
Naii€ 



DMKOPB 



DHKPAG 



DMKFEB 



DHKPGS 



DMKP6T 



Entry 
Points 



DHKCPBHT 



DMKPiGIO 



DHRPEBCH 
DHKPEBIL 
DHKPEBT 



DHKPGSPO 



DHKPGSPP 



DHKPGTCG 
DBKEGTPG 



Attributes, Function 



fiesident. 

Provides the necessary support for 
the VM/370 system console. Certain 
routines within the control progran 
can not call DHKQCN to issue writes 
to the systen console. This nodule 
deteraines the system's primary 
console and builds a channel 
program to handle the requested 
call. 

Besident . 

Constructs lOBLOKs and schedules 
the tasks that move virtual storage 
pages between auxiliary storage and 
main storage. It also calculates 
the total system paging load at 
user specified intervals. 

Pageable. 

Sets a return code of zero in B2. 

Resets the interruption. 

Besets program event recording. 

Pageable. 

Belease all the pages of a user's 

virtual storage - from the real 

storage and from auxiliary storage 

on the paging device. 

Releases a specified part of 

virtual storage. 

Resident. 

DASD storage management. 

Allocates contiguous space for a 

370V3705 dump. 

Allocates a page of DASD storage 

for either virtual storage paging 

or for spool file page buffers. 



1 Nodule 


Entry 




1 Name 


Points 


Attributes, Function 


1 DfJKPGT 


DHKEGTPB 


Releases EASD storage used for 


1 (cont.) 




virtual storage paging. 


1 

1 


DHKPGTSD 


Beleases one page of DASD storage 
used for spooling. 


1 

1 


DHKPGTSG 


Allocates a page of DASD storage 
for spooling. 


1 

1 


DMKPGTSR 


Beleases a group of DASD storage 
pages used for spooling. 


1 
1 


DMKPGTVG 


Allocates a page of virtual storage 
belonging to the CP paging VHBLOK. 


1 


DHKPGTVR 


Beleases a virtual storage page. 


1 DHKPBG 




Resident. 


1 

1 


DHKPBGIN 


Processes a hardware program 
interruption. 


1 


DMKPSGBF 


Reflects an SVC interruption to the 
virtual machine. 


1 


DHKPBGSM 


Simulates a virtual program 
interruption. 


1 DHKPRV 




Resident. 


1 


DMKPBVLG 


Simulates a privileged operation. 


1 

1 DMKPSA 




Resident. 


1 


DHKPSADD 


PSW restart processing. Forces an 
SVC type of dump. 


1 


DBKESAEX 


Processes external interruptions. 


1 


DHKPSAFP 


Checks for fetch protection 
violation per PSW key. 




DHKPSAID 


Gets virtual address for any 
instruction. 


1 


DHKPSABR 


Gets the virtual address for an BB 
instruction. 


1 


DMKPSARS 


Gets the virtual address for RS,SI, 
or SS instruction. 


1 


DHKPSARX 


Gets the virtual address for an BX 
instruction. 


1 


DBKPSASP 


Checks for a storage protection 
violation per the PSH key. 




DHKPSASV 


Processes SVC interruptions. 
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Hodule 
Name 



DHKPTH 



DHKQCH 



Entry 
Points 



DHKPSAFC 
DHKPSASC 



DHKPTB&H 



DMKPTRFS 
DBKETBFT 
DHKPTBLK 
DHKPTBPH 



DHKPTBDL 
DHKQCHCL 
DMKQCHET 

DHKQCNBD 
DMKQCHSY 

DHKCCSTO 



Attributes, Function 



Checks fetch protection per the 
CAW key. 

Checks storage protection per the 
CAH key. 

Resident. 

Manages the inventory of real 

systen pages, provides real storage 

space for CP functions and for 

pages of user and CP virtual 

storage. 

Translates user virtual storage 
address to a real storage 
address. 

Gets a page of real storage. 
Releases a page of real storage. 
Locks a page of real storage. 
Called to defer execution of 
system reset functions when user's 
virtual machine is in page wait. 
Unlocks a page of real storage. 
Resident. 

Clears COSTASK stack and returns 
all blocks to free storage. 
Processes completed CONTASKS for 
virtual console spooling, return 
or no return options, and returns 
the COHTASK blocks to free storage. 
Starts and gueues a console read 
request. 

Synchronizes virtual machine 
console activity with internal 
supervisor activity. This is used 
during a virtual system reset and 
during the logoff process. 
Disconnects a virtual machine 
and sets a TOD clock comparator 
request to logoff the virtual 
machine after a fifteen minute 
delay. 



Module 
Name 



DMKQCH 
(cont .) 

DHKR6A 



DMKRGB 



DMKRIO 



DHKRND 



Entry 
Points 



DBKQCBBT 



DHKR6AIN 



DHKRGB 



DBKBGBIC 
DMKRGBEN 



DHKRIO 



DHKBHD 



Attributes, Function 



Starts and gueues a console 
write request. 

Resident. 

This is the second— level inter- 
ruption handler for remote 3270 
stations. This module supports 
the 3270 remote display and prin- 
ter stations. It processes inter- 
ruptions and CCWs for the remote 
stations including message hand- 
ling and screen management. 

Resident. 

Supports the 3270 remote display 
and printer stations. It proces- 
ses interruptions and CCHs for the 
remote stations including message 
handling and screen management. 
Initializes and schedules COHTASKS. 
Enables and disables bisync lines 
and remote stations. 

Resident. 

Exists as a CSECT and defines the 
machine's configuration. A basic 
DMKRIO is shipped with VM/370. 
DMKBIO can be changed at system 
generation or whenever new ma- 
chines are added by using the ap- 
propriate macros. 

Residency not applicable. Invoked 
via the NCPDDMP command in CMS. 
This is the interface between the 
VM/370 dump spool file and the 
OS-SSP dump format program for 
printing and formatting dumps of 
the 3704 and 3705 communications 
controllers. 
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Hodule 
Nane 



DHKBBH 



DHKfiFA 



DMKRSE 



DMKRSP 



Entry 
points 



DUKRNHIC 



DHRBHHIN 



DHKRHHHD 



DHKBFiGT 
DMKRPAPT 



DHKRSERR 



DMKRSPER 
DHKBSPEX 



Attributes, Function 



Resident. 

Initializes and schedules the 

CONTASK fields that comprise the 

370U and 3705 Network Control Pro- 

graa transaission header. 

This is the secondary interruption 

handler for the 3704 and 3705 

coBBunication controllers; it is 

read when operating in HCP or PEP 

mode. 

Schedules control functions for 

the 3705 or 3704 Network Control 

PrograB. 

Resident. 

Virtual storage aapping. 

Page-in from DASD to user's 

virtual storage. 

Page-out to DASD froa user's 

virtual storage. 

Pageable. 

Real OR device I/O error handler. 

Retries and attempts to recover 

froB real unit record device I/O 

errors. 

Resident. 

Manages all spooling operations 
on the real system unit record 
devices including printing and 
punching user-created spool files 
and reading and gueueing reader 
files from the real card reader. 
Processes spooling errors (ERP) . 
Processes spooling operations. 
Entered via a GOTO when DBKDSPCH 
unstacks an lOBLOK with an 
interruption for the spooling unit 
record device. 



Module 
Name 



DMKRSP 



DMKSAV 



DMKSCH 



Entry 
points 



DHKBSPDR 



DMKSAVRS 
DMKSAVHC 



DHKSCHCP 
DMKSCHDL 
DMKSCHMD 

DHKSCHRT 

DMKSCBST 

DHKSCH80 

DMKSCHAE 



Attributes, Function 



Formats the active file message 
for real UB devices. 

Pageable. 

DMKSAVSC is entered via an IDT 
card from CHKLDR. DMKSAVRS is en- 
tered via a BALR from DMKCKP. 
DMKSAV saves and restores a page 
image count of the CP nucleus on 
the system residence disk. 
Restores a page image copy of the 
CP nucleus. 

Writes a page image copy of the CP 
nucleus. 

Resident. 

Maintains gueues of runable and 

eligible users, alters the 

dispatching status of users, and 

periodically recalculates the 

working set size and dispaching 

priority of users. DMKSCH 

contains the routines that maintain 

the system TOE clock comparator 

request queue and the code that 

monitors users with abnoraal 

execution. 

Interruption from real CPU timer. 

Alters a user's dispatching status. 

Interruption for the midnight 

date change. 

Resets a clock comparator 

interruption request. 

Establishes a clock comparator 

interruption request. 

Interruption for real timer at 

storage address 80. 

Processes interruption occurring 

when the favored execution 

measurement interval expires. 
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Module 
Nani€ 



DMKSCN 



DBKSCN 



Entry 
Points 



DHKSCNAO 

DBKSCNFD 
DMKSCNLI 



DHKSCNBD 



DHKSCHBN 
DBKSCIiBU 



DHKSCHVD 



DHKSCNVN 
DHKSCNVS 



DBKSCNVO 



Attributes, Function 



Resident. 
Scans module. 

Searches the chain of VMBLOKs for 
one whose userid Batches the one 
pointed to by register one. 
Finds the next field in an input 
message buffer. 

Searches the logged on virtual 
machines for any links to a 
specified minidisk. A link is any 
virtual device whose ADEVBLOK 
pointer and relocation factor 
match those specified. 
Computes a real device address 
(in CW form), from the RDEVADD, 
RCDADD, and HCHADD entries in the 
real device, control unit, and 
channel blocks. 
Returns the name of the real 
device to the caller in register 1. 
Returns the addresses of the real 
channel, control unit, and device 
blocks for a given real device 
to the caller. 

Computes a full virtual device 
address (in cuu form) , plus the 
addresses of the virtual channel 
and control unit blocks from a 
specific virtual device block. 
Returns the name of the virtual 
device to the caller in register 1. 
Searches all the real device 
blocks for a device whose volume 
serial number matches the one 
pointed to by register 1. 
Returns the addresses of the 
virtual channel, control unit, 
and device blocks for a given real 
device to the caller. 



nodule 
Name 



DMKSEP 



DHKSEV 



DBKSIX 



DBKSNC 



DBKSNT 



Entry 
points 



DMKSEPSP 



DBKSEVVO 



DBKSHCP 



DBKSNIBL 



Attributes, Function 



Pageable. 

Prints and punches the respective 

output separators on real spooling 

devices. 

Pageable but locked. 
Analyzes 2870 channel logout and 
sets appropriate bits in the ECSH 
field according to the results of 
analysis. It moves the channel 
logout to the check record. 
Pageable but locked. 
Analyzes 2860 channel logout and 
sets appropriate bits in the ECSW 
field according to the results of 
analysis. It moves the channel 
logout to the check record. 

Pageable. 

Save a page— form version of a 

370 4/3705 network control program. 

The name of the network control 

program and the DASD location at 

which it is to be saved is defined 

in the CP module DBKSTS. 

Pageable. 

This module is assembled by the 
installation system programmer. It 
describes the system to be saved 
via the SATESTS command and to be 
initial program loaded by name. 
Shared segments may be specified. 
These segments consist of all re- 
entrant code and no altering of 
this storage is allowed. There is 
no executable code in this module. 
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nodule 
Name 



DHKSPL 



DHKSSP 



DHKSTK 



DHKSYH 



Entry 
Points 



DHKSPLCB 
DHKSPICV 

DMKSPLDL 

DHKSPIOB 

DMKSPLO? 



DMKSSPOl 



DHKSTKCP 
DHKSTKIO 



DHKSYH 



Attributes, Function 



Pageable. 

Spool file Manager. 

Closes and queues a real reader 

spool file for virtual input. 

Closes and queues a virtual 

printer or punch spool file for 

processing. 

Deletes used files froa the 

system and de-allocates the DASD 

page space. 

Initializes control blocks and 

buffers for real input reader 

files. 

Initializes control blocks and 

buffers for virtual printer and 

punch output spool files. 

This module is found in the star- 
ter system only. 

It builds BCHBLOKs, BCDBLOKs, and 
BDEVBLORs necessary to configure a 
minimum CP system. From the starter 
system, a real CP system is figured 
based on the installation's BEAIIO 
deck. 

Entered as a result of an IPL 
operation. Constructs the I/O 
blocks and system modules for a 
minimum system configuration. 

Besident. 

Stacks I/O blocks. 
Stacks a CPIXBLOK. 
Stacks an lOBLOK. 

Pageable 

Provides a symbol table of all 

CSECTS and entry points. 



Module 
Ha me 



DBKSYS 



DHKTAP 



DHKTBL 



DHKTBH 



Entry 
Points 



DHKSYS 



DHKTAP 



DHKTAPEB 

DHKTBl 

DHKTBHZO 
DMKTBMZI 
DHKTBHHO 

DHKTBHHO 
DHKTBMNI 



Attributes, Function 



Besident. 

Exists as a CSECT that defines the 
system residence volume, paging 
space, operator ID, dump ID, sto- 
rage size, and time zone. 

Pageable. 

Examines the error condition 
resulting from a unit check while 
executing a CPP generated tape 
channel program. Positioning of 
the tape is required on read/write 
commands and the channel program 
is re-executed. If the error 
condition is uncorrectable, a call 
is issued to the message writer 
(DMKHSi) to notify the operator. 
Upon regaining control from DHKHSl, 
the original channel program may 
be re-executed or terminated. 
Betries the failing tape channel 
program, after a tape positioning 
command has been executed. 

Besident . 

Contains the terminal translate 
tables . 
Pageable. 

Contains terminal translate tables 
for APL. 

3270 APL compound write transla- 
tion. 

3270 API compound read transla- 
tion. 

EBCDIC to APL correspondence ter- 
minal code. 

APL correspondence terminal code 
to APL. 

EBCDIC to APL PTTC/EBCD terminal 
code. 

APL PTTC/EBCD terminal code to 
EBCDIC. 
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Module 


Entry 




Name 


Points 


Attributes, Function 


DHKTEK 




Pageable. 




DHKTDKGT 


Allocates cylinders of temporary 
disk space from owned volumes. 


' 


DHKTDKEL 


Releases temporary disk space to 
the pool of free space. 


DMKTBI 




Pageable. 

Displays data about use of and 

contention for major system 

resources. 




DHKTHIEB 


Processes IBDICATE command. 


DHKTMR 




Resident. 

Simulates the CPU timer and 
time— of— day clock comparator 
instructions for virtual System/ 
370 's operating in extended 
control mode. 




DHKTKfiCK 


Simulates virtual clock comparator 
interruptions. 




DKKTHBPT 


Calculates user's total virtual 
problem time. 




DBKTBBTN 


Simulates timer instruction. 




DMKTMEVT 


Simulates virtual CPO timer 
interruptions. 


DMKTBA 




Pageable. 

Processes the TRACE command line. 
Provides a virtual machine with the 
facility to track SVC instructions, 
program interruptions, external 
interruptions, successful searches, 
or all instructions with output on 
the printer, terminal, or both. 




DKKTBACE 


TRACE command processor. 
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Module 
Name 

DHKTRC 



DMKTBM 



DBKUCB 



Entry 
Points 



DMKTRCEX 
DHKTRCIO 
DMKTRCIT 

DHKTRCND 
DBKTRCFB 

DBKTBCPG 
DHKTRCPV 

DBKTRCSI 

DHKTSCSV 

DMKTRCSH 
DHKTRCHT 



DKKTBHID 



DBKUCB 



Attributes, Function 



Pageable. 

Processes the TRACE command 

functions. 

Traces external interruptions. 

Traces I/O interruptions. 

Sets the needed SVC B2 for 

instruction tracing. 

Ends tracing. 

Puts back user instructions 

altered by tracing. 

Traces program interruptions. 

Traces privileged instruction 

interruptions . 

Traces I/O operations (SIC, TIO, 

HIO, TCH) . 

Processes an SVC, Branch, or full 

instruction TRACE. 

Traces virtual and real CSWs. 

Serialization entry for I/O and 

CCH tracing. 

Pageable. 

Identifies a 2741 terminal as 
either a 27mp (PTTC/EBCD) or 
274 1C (correspondence from) the 
user command. It sets ADEVTYPE 
the RDEVBLCK to TYP274.1P or 
TYP2741C and sets flag RDEVIDNT on 
if the terminal was successfully 
identified. 

Pageable. 

Contains the OCE buffer load 

images used by the LOAD command to 

load the universal character set 

buffer in the 3811 control unit. 

This module contains no executable 

code. 
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Module 
Name 



DHKUCS 



DHKUDB 



DHKDHT 



Entry 
Points 



DHKDDBBT 

DflKDDfiDS 

DHKUDBFD 
DHKUDBFU 

DHKUDBBD 
DHKODBBV 

DMKDNTFB 
DHKONTIS 



DHKONTBN 



Attributes, Junction 



Pageable. 

Contains the DCS buffer load 

images that the LOAD command uses 

to load the universal character 

set buffer in the 2821 control 

unit. This module contains no 

executable code. 

Pageable. 

Allows the DMKDIBCT or DBKCPIHT 

programs to build a list of virtual 

page buffers; one for each ODIBBLOK 

page on disk. 

Allows the DHKDIRCT program to 

swap the active user directory to 

newly created user directory. 

Puts specified ODEVBLOK into the 

caller's buffer. 

Finds a given user ID in the user 

directory and moves the user's 

directory entry into the caller's 

buffer. 

Beads the next user directory into 

the caller's buffer. 

Beleases a virtual page used by 

the directory program as a buffer. 

Besident . 

Untranslates CCHs and CSNs. 

Releases pages and free storage 

used for the CCH chain. 

Finds the BCSTASKS that have been 

patched to handle OS ISAM 

self— modifying seguences and put 

them back the way DHKCCH had them 

to allow DHKDNTBN and DHKDBTFB to 

operate correctly. 

Translates a real CSB into a 

virtual CSi. 



Hodule 
Name 



DBKUMT 
(cont .) 



DHKUSO 



DBKVAT 



Entry 
Points 



DHKDNTBS 



DMKOSODS 

DMKOSOFF 
DBKOSCFL 
DMKUSQLG 
DBKOSOFfl 



DBKVATAB 

DBKVATBC 
DBKVATEX 

DMKVATLA 
DBKVATMD 



Attributes, Function 



Relocates sense byte information. 
For a 3330, 3310, 3350, or 2305, 
computes virtual cylinder member 
in bytes 5 and 6 of the sense byte 
data by unrelocating the real 
cylinder number given by the 
hardware. 

For a 2311 simulated on a 2314 
or 2319, computes the appropriate 
status for byte three of the sense 
data from the real sense data 
given by the hardware. 
Pageable. 

Processes user termination. 
Processes the DISCONN (disconnect) 
command. 

Logs off a user. 
Processes the FORCE command. 
Processes the LOGOFF command. 
Returns subpools from the free 
storage chain and removes spool 
file blocks and allocation blocks 
from the dynamic paging area. 

Resident. 

Storage management for EC mode 

virtual machine. 

Allocates, initializes and 

maintains shadow, segment, and 

page tables for virtual machines 

that can relocate. 

Returns active shadow tables to 

free storage. 

Services page or segment 

exceptions for virtual 

extended control machines. 

Virtual - virtual to virtual 

address translation. 

Allocates and initializes shadow 

tables. 
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Hodule 
Hane 



DHKViT 
(cont . ) 



DHKVCA 



Entry 
Points 



DHKVATPF 

DHKVATFX 

DHKVAIBN 
DHKVATSX 



DHKVCABD 



DHKVCABS 



DHKVCASH 



DMKVCAST 



DBKVCATS 



Attributes, Function 



Handles pseudo page fault 

interruption from a VS1 virtual 

aachine. 

Processes paging exceptions for 

a virtual nachine that perforns 

paging. 

Virtual (shadow) — virtual to 

real address translation. 

Processes segaent exception for a 

virtual machine that performs 

paging. 

Pageable. 

Simulates I/O for a virtual 
channel— to-channel adapter. 
Selectively resets a device for 
a virtual channel— to— channel 
adapter without decoupling the 
CTCA from the Y-side adapter. 
Does a final reset for a virtual 
channel-to— channel adapter and 
and disconnects the adapter from 
its coupled twin on the ¥-side 
virtual machine. 
Simulates the execution of a 
Halt I/O or Halt Device instruction 
for a virtual machine channel-to— 
channel adapter. 

Simulates the channel and device 
operations of the channel-to- 
channel adapter (CTCA) connected 
between two virtual machines under 
VM/370. 

Simulates the TEST I/O instruction 
for a virtual channel— to— channel 
adapter that has no interruptions 
pending. 



Hodule 


Entry 




Same 


1 Points 


1 Attributes, Function | 


DBKVCH 




Pageable. | 




DHKVCHDC 


Processes the ATTACH and DETACH | 
real devices and channels) command. | 


DBKVCH 




Besident . | 




DBKVCHEX 


Simulates all SIOs to a virtual | 
console. | 


DMKVDB 




Pageable. | 




DBKVDBAT 


Processes the ATTACH command to | 
a real device as a virtual device | 
to a user or dedicates all devices | 
on a particular channel to a | 
specific user. | 




DBKVDBDE 


Processes the DETACH command to | 
detach a real or virtual device | 
from a user or detaches a | 
previously-dedicated channel from | 
a user. | 


DBKVDB 




Pageable. | 




DHKVDBEL 


Beleases a virtual or real device | 
from a virtual user. | 


DBKVES 




Pageable. | 




DHKVDSAT 


Attaches a virtual device to a | 
user. 1 




DBKVDSDF 


Defines a new virtual device for | 
user. 1 




DBKVDSLK 


Links a virtual DASD device to | 
a user. | 


DHKVEB 




Pageable. | 
Processes error records from | 
virtual machine via SVC 76. | 




DHKVEBD 


Processes the SVC 76 from DOS or | 
DOS/VS. 1 




DBKVEBO 


Processes the SVC 76 from OS, VS/1,| 
VS/2, or VH/370. 1 
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Hodule 
Name 



DMKVIO 



DMKVBA 



Entry 
Points 



DHKVIOEX 
DBKVIOIN 



DEKVICBK 
DKKVICEC 



DKKVHACF 



DHKVBiPS 



DMKVHASH 



Attributes, Function 



Resident. 

Simulates the operation of 

privileged I/O instructions issued 

by the virtual machine and records 

and translates the interruptions 

and status associated with virtual 

I/O operations. 

Simulates a SIO, TIO, HIO, or TCH. 

Translate a virtual I/O 

interuption. 

Address of a table of interruption 

masks, indexable by device address. 

Processes interruptions for 

dedicated channels. 

Resident. 

Called by the command processors 
via an SVC if the command execu- 
tion is to change a shared page. 
The virtual machine is notified 
that the command has released the 
shared system. The user continues 
to run without a shared copy of 
the named system. 

Called by EMKPTH when the paging 
manager detects that a shared page 
has been changed. The current 
LASIDSER is the only virtual ma- 
chine that could have changed the 
page. The shared named system is 
loacated and made non-shared for 
the current RUNDSER. Any other 
shared systems that may exist for 
RUNDSER are left as a shared sys- 
tem. Other users of the shared 
system are unaffected by the vio- 
lation caused by RONUSER. 
Checks all shared pages associated 
with shared named systems and de- 
termines if they have been changed. 
If they were changed, the condi- 
tion code is made non— zero and re- 
gister 2 contains the real address 
of the page that was changed. 



Module 
Name 



DBKVBI 



DHKVSP 



DMKHRM 



Entry 
Points 



Attributes, Function 



Pageable — loaded into the user's 
virtual storage when invoked. 
Performs an IPL of a virtual 
machine. 
DMKVHIPL I Simulates a user's IPL seguence. 

Resident. 

Simulates all user SIOs to a 
virtual unit record device (real 
reader, punch, print, or psuedo 
timer) That is spooled rather 
than dedicated. It also handles 
control prcbram reguests to print 
on the user's virtual printer. 

DMKVSPCO I Stops processing the file 

currently in the spooled printer 
or punch and clears all pending 
status from the spooled printer 
or punch. 

DKKVSECP I Writes a print line to the console. 

DMKVSPCR I Stops processing the file currently 
in the spooled card reader and 
clears all pending status from the 
spooled card reader, 
status from the spooled printer 

DBKVSPEX I Simulates SIO to a spooled unit 
record device. 

DBKVSPRT I Puts a CP-generated line on the 
user's spooled printer. 

DBKVSETO I Checks if the virtual reader is 
empty. 

DBKVSPVP I Simulates SIO to a spooled virtual 
console. 

DBKVSEHA | Nonexecutable index work area for 
2311. 
Pageable. 

DHKHRHST | Warm start processing. Retrieves 

the system log messages, accounting 
cards, spool file blocks, and 
spooling allocation records from 
the warm start cylinder on the IPL 
pack. 
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Hodule External 


References (Labels and Modules) 


















DHKACO ACNTEACK 


ACSTBLOK 


ACHTCCH 


ACHTDATA 


ACNTNEXT 


ACBTSIZE 


ACORETBL 


ABIODV 


ABIOPD 


ABSPAC 


ASYSLC 


ASYSVM 


CC 


CLASDASD 


CPEXADD 


CPEXBLOK 


CPEXSIZE 


DE 


DEVCARD 


DFRET 


DMKCVTBH 


DMKDSPCH 


DHKEBMSG 


DMKFBEE 


DMKFBET 


DMKIOSQB 


DHKPTBIK 


DMKPTBDL 


DMKQCBWT 


DMKRSPEX 


DMKSTKCP 


DMKSTKIO 


DMKSYSCK 


DMKTMBPT 


F1 


F4 


F60 


F8 


lOBCAH 


lOBCP 


lOBCSW 


lOBFATAL 


lOBFLAG 


lOBIRA 


lOBLINK 


lOBLOK 


lOBMISC 


I0BMISC2 


lOBBADD 


lOBSIZE 


lOESPEC 


lOBSTAT 


lOBUSEB 


NORET 


PRIORITY 


PSA 


BDEVACHT 


RDEVBLOK 


RDEVBDSY 


RDEVCLAS 


RDEVDED 


RDEVDISA 


BDEVDRAN 


RDEVFLAG 


BDEVSPL 


RDEVSTAT 


BDEVTMAT 


REE7TYPI 


RO 


B1 


RIO 


H11 


B12 


R13 


R14 


B15 


R2 


B3 


R4 


R5 


R7 


B8 


B9 


SAVEABEA 


SAVEB11 


SAVEHBK2 


SAVEWBK3 


SAVEWRK6 


SAVEWRK7 


SAVERBK8 


SAVERBK9 


SILI 


SKIP 


SYSLOCS 


TYP25aOP 


USEBCARD 


VDEVBLOK 


VDEVFLAG 


VDEVBEAL 


VDEVTDSK 


VDEVTMAT 


VDEVTYPC 


VMBLOK 


VHIOCHT 


VHLOGOFF 


VMPGREAD 


VMRSTAT 


VMTIHEON 


VHTTIME 


VMVTIME 


ZEBOES 














DMKBLD aCOBETEl 


ASYSLC 


ASYSVM 


AVMREAL 


CLASSPEC 


CLASTERH 


CORCFLCK 


COBFLAG 


COBFPNT 


CORLCNT 


CORPGPHT 


COBSHPHT 


COBTABLE 


DELPAGES 


DELSEGS 


DMKCVTBH 


DMKERMSG 


DHKFREE 


DBKFRET 


DMKQCSiT 


DMKBIOBH 


DHKSCHCP 


DHKSCNRD 


DMKSYSLE 


DMKSYSLL 


DMKTHRCK 


ECBIOK 


EXTCCTBQ 


EXTCPTBQ 


EXTCRO 


EXTCR1U 


EXTCR15 


EXTCB2 


EXTSIZE 


FFS 


F1 


F15 


F16 


F4 


F4095 


F7 


F8 


KEEPSEGS 


MICBLOK 


MICRSEG 


NENPAGES 


NEiSEGS 


NICBLOK 


HICCIBM 


BICLLEH 


MICNAHE 


HICTERM 


NICTYPE 


NICOSEB 


NORET 


OLDVMSEG 


PAGCCBE 


PAGINVAL 


PAGSWP 


PAGTABLE 


PSA 


RDEVBLOK 


RDEVFLAG 


BDEVLLEN 


RDEVPSDP 


RDEVTYEC 


BDEVTYPE 


RDEVOSEB 


RO 


B1 


BIO 


R11 


B13 


R14 


R15 


B2 


B3 


m 


R5 


B6 


R7 


R8 


R9 


SAVEABEA 


SAVER1 


SAVER11 


SAVER2 


SAVER8 


SAVEBRK1 


SAVEWBK2 


SEGPAGE 


SEGPIEH 


SEGTABLE 


SHPFLAG 


SiPPAG 


SWPRECMP 


SWP TABLE 


SSPVM 


SYSLOCS 


TRQBIRA 


TBQBLOK 


TBQBSIZE 


TBQBDSEB 


TYPBSC 


TYP3705 


¥MAEX 


VMBLOK 


VHBSIZE 


VHCFWAIT 


VMCHTBL 


VMECEXT 


VMLOGOH 


VMMCODE 


VHHICBO 


VBMLEVEL 


VMMS60H 


VMMTEXT 


VHPAGES 


VMPST 


VMPST AT 


VMPSW 


VMQLEVEL 


VMREAL 


VMRSTAT 


VMSEG 


VMSEGDSP 


VHSIZE 


VMSTOB 


VMTEBM 


VHTLEHD 


VMTHODTQ 


VMTRMID 


VHTTIME 


VHDSEH 


VMVTIBM 


VMV370R 


VHIHGON 


VMSSPROJ 


VBALOC 


WAIT 


XPAGHOM 


ZEBOES 




EMKBSC BSCBLOK 


BSCREAD 


BSCRESP 


CC 


CCC 


CDC 


CHC 


DHKFREE 


DMKFBET 


DMKIOEST 


DHKHSHB 


F1 


F7 


F8 


IFCC 


lOECAW 


lOBERP 


lOBFATAL 


lOBFLAG 


lOBIOEB 


lOBLOK 


IC6BCAH 


lOBBCNT 


lOBBSTET 


lOBSTAT 


lOERBLOK 


lOERCAN 


lOERCSW 


lOERDATA 


lOERDH 


lOEBEXT 


I0EBFLG2 


I0EBFLG3 


I0ERIHD3 


lOEBINFO 


lOEBLOC 


lOEBMSW 


lOEBHUM 


lOEROVFL 


lOEBBEAD 


lOEBSIZE 


PBGC 


PBTC 


PSA 


RDEVBLOK 


BDEVBSC 


RDEVIOER 


RO 


B1 


RIO 


R13 


R2 


R3 


B4 


R5 


B6 


B7 


B8 


R9 


SAVEAREA 


SILI 


DC 


ZEBOES 






EHKCCB ALARM 


ABIOCD 


ARIODV 


CAR 


CCC 
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VBSEG 


TMSTHPI 


VMSTOR 


VBTLEVEL 


VBTON 


VBTRQBLK 


VBDPRIOH 


VBDSEB 


VBVCRO 


VBV370R 


VBHNGON 


XaOFFS 


ZEROES 




DHKCPT ASYSLC 


CLASGBAF 


CLASSPEC 


CLASTEBB 


DBKCVTBH 


DBKCVTDB 


DBKERBSG 


DBKSCHFD 


DBKSCHVD 


DBKSYSCD 


DBKSYSES 


DBKSYSLD 


DBKSYSLE 


F1 


F2 


F255 


Ft095 


NICAPL 


HICATOF 


NICBLOK 


SICFLAG 


HICLLEN 


NICPSDP 


KICSIZE 


NICTBCD 


PSA 


BDEVAPIP 


BDEVATOF 


BDEVBLOK 


RDEVFLAG 


RDEVLLEH 


BDEVNICL 


RDEVPSOP 


RDEVTFLG 


RDEVTBCD 


BDEVTYPC 


RDEVTYPE 


EO 


El 


BIO 


B11 


B13 


B14 


R15 


R2 


R3 


B4 


R5 


S6 


E7 


B8 


SAVEAREA 


SAVEIBK1 


SYSLOCS 


TYPBSC 


TYPTTY 


TYP3277 


VBBLOK 


VMDVSTRT 


VMBCPENV 


VBBLEVEL 


VBBSTBP 


VBTCDEL 


VBTEBB 


VBTESCP 


VBTLDEL 


VBTLEHD 


VBTBBID 


VBVTEBB 


XMOFFS 


ZEROES 
















EMKCKP ACNTBLOK 


ACNTCCB 


ACNTDATA 


ACNTHEXT 


ALARB 


ARIOCC 


ARIOCB 


ARIOCT 


ARIOCD 


ARICDV 


ABIOPB 


ARIOPD 


AEIOBD 


ARSPPB 


ASYSLC 


ASYSVB 


ATTH 


BDSY 


CAW 


CC 


CE 


CLASDASD 


CLASGRAF 


CLASSPEC 


CLASTAPE 


CLASTEBB 


CLASDBI 


CLASDBO 


CPCBEGO 


CPID 


CSH 


CUE 


CO 


C2 


C3 


DE 


DEVCABD 


DBKOPRHT 


DBKRSPAC 


DMKBSPCV 


DBKBSPDL 


DHKRSPHQ 


DHKRSPID 


DBKRSPPR 


DBKRSPPO 


DBKRSPRE 


DBKSAV 


DBKSAVRS 


DBKSYSCK 


DBKSYSDT 


DBKSYSLG 


DBKSYSOC 


DHKSYSCH 


DBKSYSBH 


DHKSYSTP 


DHKSYSHB 


DBKTBBPT 


FTR35BB 


IHTPR 


INTTIO 


ICNPSH 


lOOPSW 


IPLPSi 


HICBLOK 


HICDISA 


NICDISB 


HICENAB 


NICFLAG 


NICLGBP 


NICLISE 


NICSIZE 


SICSTAT 


NICTERB 


HICTYPE 


OWNDLIST 


OiNDRDEV 


PRNPSf) 


PEOPSW 


PSA 


BCHAED 


fiCHBLOK 


BCBCDTBL 


RCOAED 


RCOBLOK 


RCDCHA 


HCDDVTBL 


RCDPBIBE 


BCOSOB 


BCDTYPE 


RDBVACHT 


EDEVADD 


BDEVAIOB 


BDEVADTO 


BDEVBLOK 


RDEVCLAS 


RDEVCDA 


EDEVDED 


RDEVDISA 


BDEVDISB 


RDEVDRAN 


RDEVENAB 


RDEVFLAG 


RDEVFTR 


EDEVLCEP 


RDEVLICP 


BDEVBAX 


BDE7HDL 


BDE7HCP 


REEVNICL 


RDEVRECS 


RDEVSEP 


BDEVSPL 


RDEVSTAT 


BDEVTYPC 


RDEVTYPE 


RECBLOK 


EECCYL 


BECHAX 


BECPNT 


BECSIZE 


RECOSED 


RSPLCTL 


ESPSFBLK 


RO 


B1 


RIO 


R11 


R12 


R13 


Eia 


B15 


B2 


B3 


RU 


B5 


R6 


R7 


B8 


B9 


SFBCLAS 


SFBCOPY 


SFBDATE 


SFBDIST 


SFBFIBST 


SFBFLAG 


SFBFLAG 2 


SFBLAST 


SFBLOK 


SFBOBIG 


SFBPHT 


SFBPDRGE 


SFBRECER 


SFBBECS 


SFBSIZE 


SFBSTART 


SFBDSER 


SHQBSIZE 


SILI 


SKIP 


STARTIBE 


SYSLOCS 


TYPBSC 


TYPPRT 


TYPPOH 


TYP2305 


TYP231U 


TYP3210 


TYP3277 


TYP3284 


TIP3330 


TYP33U0 


TYP3350 


TYP3705 


OC 


DSEBCABD 


VCBBLOK 


VCBCOTBL 


VCDBLOK 


VCODVTBL 


VDEVBLOK 


VDEVCLAS 


VDEVCOPY 


VDEVDED 


VDE7EXTH 


VDEVFLAG 


VDEVSFLG 


VDEVSPL 


VDEVSTAT 


VDEVTDSK 


VDEVTYPC 


VDEVTYPE 


7DEVXFER 


VHBLOK 


VBCHSTRT 


VHCHTBL 


VHCDSTBT 


VBDIST 


VBDVSTBT 


VBLOGOH 


VBPNT 


VBESTAT 


VBDSEB 


VSPLCTL 


VSPSFBLK 


VSPXBLOK 


VSPXXDSB 
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nodule External Befereaces (Labels and Hodales) 






DMKCKS iCTSFB 


ADDSFB 


ARIOD? 


AHSPPB 


ARSPPD 


ABSPRD 


BRING 


CHGSFB 


DEFER 


DELSFB 


DBKCVTBD 


DBKERHSG 


DBKFREE 




DHKFBET 


DUKLCCKD 


DHKLOCKQ 


DHKLOCKT 


DHKPGTTD 


DBKPGTVG 


DBKPGTVR 


DBKPTRAN 


DBKPTBDL 


DBKQCNSY 


DBKRPAGT 


DBKRPAPT 


DHKRSPHQ 




DMKBSPID 


DMKSCHBD 


DHKSCHBO 


DHKSTSCH 


DBKSYSCH 


DBKSYSOl 


FFS 


F1 


F10 


F24 


F255 


F3 


F4 




LOCK 


OPHSFB 


OWNDLIST 


OWNDRDEV 


OWNDVSEB 


PCHCHN 


PRTCHN 


PSA 


BDEVALLH 


RDEVBLOK 


RDEVCLAS 


RDEVCODE 


RDEVDISA 




BDEVDBiB 


RDEVFLAG 


RDBVRECS 


BDEVSER 


RDEVSPL 


RDEVSTAT 


RDEVTYPE 


RDRCHH 


BECBLOK 


RECCYL 


RECBAP 


RECBAX 


RECPNT 




RECSIZE 


RECUSED 


RO 


R1 


RIO 


Ell 


R13 


R1U 


R15 


R2 


R3 


R4 


R5 




B6 


R7 


R8 


R9 


SAVEAREA 


SAVER 1 


SAVER2 


SAVERS 


SAVEHRK1 


SAVEWBK2 


SAVEWRK3 


SAVEWRK4 


SAVEWRK5 




SAVEWRK6 


SA7EWBK7 


SATEWRK8 


SAVEWRK9 


SFBCCPY 


SFBDOMP 


SFBEOF 


SFBFILID 


SFBFLAG 


SFBFLAG2 


SFBINOSE 


SFBLAST 


SFBLOK 




SFBOPEM 


SFBPHT 


SFBRECEB 


SFERECNO 


SFBRECS 


SFBBSTRT 


SFBSIZE 


SPBSTART 


SFBTIBE 


SFBDHOLD 


SHQBLOK 


SHQBSIZE 


SHQDSER 




SPLINK 


SPHXTPAG 


SPRECHDM 


SISIPLDV 


SYSTEB 


TYP2314 


TYP3330 


IYP3350 


VBBLOK 


ZEBCES 










EHKCHS ALARM 


ASISVH 


ATTN 


BALRSAVE 


BALR3 


BALB6 


BALR9 


BLANKS 


BEING 


BUSY 


CAN 


CC 


CCC 




CD 


CDC 


CE 


CHC 


CLASTERB 


CBDREJ 


CONACTV 


CONADDR 


CCNCCW1 


C0BCCW2 


C0NCCW3 


C0HCCH4 


CONCNT 




COHCNTL 


COHCOHHD 


CONDATA 


COHESCP 


CONFLAG 


COHOOTPT 


CONPARB 


CONPNT 


CONRESP 


COHBETN 


CONRTRY 


CONSPLT 


CONSTAT 




COHSYHC 


COHTASK 


COHTSIZE 


CONTSKSZ 


COHDSER 


CPID 


CSi 


DATACHK 


DE 


DEFEB 


DBKBLDVB 


DBKCJBAT 


DMKCFBBK 




DHKCPIEH 


DMKCVTBH 


DHKDSPCH 


DBKERHSG 


DBKFREE 


DBKFRET 


DBKIOERR 


DBKIOEST 


DBKIOSQR 


DHKBSHB 


DBKPTBAN 


DBKQCNCL 


DBKQCNET 




DBKQCHTO 


DHKSCHBD 


DMKSCHRU 


DHKTBLCI 


DBKTBLCO 


DBKTBLPI 


DBKTBLPO 


DBKTBLTI 


DBKTBLTO 


DBKTBLDP 


DBKTBBBI 


DBKTBHHO 


DHKTBBNI 




DHKTBHHO 


DMKTBMID 


EDIT 


FFS 


F1 


F10 


F15 


F16 


F2 


F256 


FU 


F8 


IFCC 




IL 


INHIBIT 


INTREQ 


lOBCAH 


I0BCC1 


I0BCC3 


lOBCSH 


lOBERP 


lOBFATAL 


lOBFLAG 


lOBIOEB 


lOBIBA 


lOELINK 




lOBLCK 


lOBBADD 


lOERES 


lOBSIZE 


lOBSPEC 


lOBSTAT 


lOBONSL 


lOBOSER 


lOEBBLOK 


lOERDATA 


lOEBEXT 


I0FBFLG3 


lOERNOB 




lOEROVFL 


lOERREAD 


lOEBSIZE 


LOGDROP 


LOGHCLD 


NOADTO 


PRGC 


PRIORITY 


PRTC 


PSA 


BDEVACTV 


RDEVATNC 


RDEVATOF 




RDEVBLOK 


RDEVCOH 


BDEVCORB 


RDEVCTL 


RDEVDISA 


RDEVDISB 


RDEVEHAB 


RDEVEPBD 


BDEVFLAG 


RDEVHIO 


BDEVIDNT 


RDEVIOER 


RDEVLOG 




RDEVNRDY 


RDEVPREP 


RDEVPSDP 


RDEVPTTC 


RDEVHCST 


RDEVREST 


RDEVSADN 


RDEVSTAT 


RDEVTFLG 


RDEVTBCD 


EDEVTYPC 


RDEVTYPE 


EDEVUSC8 




BDEVDSEB 


BO 


B1 


BIO 


R11 


R12 


E13 


R1U 


B15 


R2 


R3 


B4 


R5 




B6 


R7 


R8 


B9 


SAVEABEA 


SAVERO 


SAVER1 


SAVER2 


SILI 


SKIP 


SB 


SYSTEB 


TEBPRO 




TEHESA7E 


IRACBEF 


THACCDER 


TRACEND 


TBACFLG2 


THACSTET 


TYPTTI 


TIPDNDEF 


TIP 1050 


TYP27tH 


TYP3210 


DC 


UCASE 




OE 


VHBLCK 


VKCF 


VHCFHAIT 


VBLOGOFF 


VHLOGOH 


VBBCPEHV 


VBBLEVEL 


VBOSTAT 


VBRSTAT 


VBSYSOP 


VHTCDEL 


VBTLEND 




VMTTIME 




























DHKCPB ASYSTB 


BLAHKS 


BBIHG 


CLASSPEC 


CLASTAPE 


CLASTERB 


CLASORI 


CLASORO 


DE 


DEFER 


DBKCFPED 


DBKCFPRR 


DBKCVTBH 




DHKCVTBB 


DHKDSPCe 


DHKERMSG 


DHKFBEE 


DBKFBET 


DBKIOSQR 


DBKIOSRW 


DBKPGSPO 


DBKPTBAN 


DBKQCNWT 


DBKSCHFD 


DBKSCNVD 


DBKVATBC 




DHKVATHD 


DBKVIOMK 


EXTHODE 


F3 


Fa 


F6 


lOBCAH 


lOBIRA 


lOBLOK 


lOBMISC 


lOBSIZE 


lOBDSEE 


NORET 




PSA 


RCHBLOK 


BCOBLOK 


BCDCHA 


BCDPBIBE 


BCDSDB 


RCDTYPE 


RDEVBLOK 


BDEVBOSY 


RDEVCDA 


RDEVSTAT 


RO 


R1 




RIO 


R11 


R12 


E13 


R15 


R2 


R3 


BU 


E5 


R6 


R7 


B8 


SAVEAREA 




SA?ERET» 


SAVEHBK2 


SAVEHRK4 


SAVEHBK5 


SILI 


SYSTEB 


TRANBODE 


TYPCTCA 


TYP3210 


VCHADD 


VCHBLOK 


VCHCDINT 


VCOADD 


n 


VCUBLOK 


VCODVINT 


VDEVADD 


VDEVBLOK 


VDEVBDSY 


VDEVDED 


VDEVINTS 


VDEVNRDY 


VDEVPEND 


VDEVREAL 


VDEVSTAT 


VDEVTYPC 


VDEVTYPE 


VHBLCK 


VMESTAT 


VHEXTCH 


VHIOINT 


VBIOPND 


VBPA2APL 


VBPEND 


VBPSTAT 


VBPSH 


VHPXINT 


VBQSTAT 


VBV370R 
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XINTCODE 


XIBTNEXT 


XIHTSIZE 


XINTSORT 


X40FFS 


ZEROES 

















■p 

ON 



< 

3 
N 

Ul 

o 



en 

(D 

B 

f> 
O 

O 

0) 

3 
On 

M 
O 

tr 



o 
f+ 

(D 
H 

B 
H- 
S 
0> 

f+ 
o 

9 

a 

c 

H- 
(0 



Module External References (Labels and Modules) 



DHKCPI 



EMKCPS 



ACOEETEL 

ARIOD¥ 

BDFPER 

CLiSTERM 

CPSTATDS 

DAMAGRPT 

DMKC?TBD 

DMKFHESV 

DMKPGTBN 

DMKPGT5T 

DMKPTRLK 

DMKSCEST 

DMKSYSEV 

FTR35MB 

HAHDSTCP 

IPUADDR 

NOTIME 

RCHADD 

RDEVADD 

RDEVMDI 

RDEVTYPC 

RO 

R7 

SWPCHG1 

TEHPR5 

TRQBVAL 

VMBLOK 

ZEROES 

ARIOCH 

CPCREG8 

lOBFIAG 

lOBTIO 

NICSIZE 

RDEVAIOB 

RDEVISKS 

RDEVTYPE 

E5 

TYPBSC 



ALARM 

ASYSOP 

BDFIN 

CORCFLCK 

CPSTAT2 

DATE 

DMKCVTBB 

DMKFBET 

DHKPGTPG 

DMKPGT90 

DMKPTRUL 

DHKSCHTI 

DMKSYSTI 

FTE7CMB 

IDLEHAIT 

KEYHASK 

OHHDLIST 

RCBBLOK 

RDEVAIOB 

RDEVHICL 

RDEVTYPE 

R1 

R8 

SHPCBG2 

TEMPSAVE 

TYPBSC 

VMLOGON 

ARIOCT 

CPEXBLOK 

lOBHIO 

lOBUNSL 

HOBET 

RDEVBLOK 

RDEVHAX 

RDEVOSER 

R6 

TYP2305 



ALOCBLOK 

ASYSVB 

BDFNXT 

COHCP 

CPOID 

DE 

DHKCVTDT 

DMKFRETB 

DHKPGTPO 

DMKPRGIH 

DMKPTRU 1 

DHKSCNRD 

DMKSYSTZ 

FO 

IFCC 

MCHEK 

OHHDPREF 

RCHCUTBL 

RDEVALLH 

HDEVHHDY 

RDEVOSER 

RIO 

R9 

SWPCYL 

TIMER 

TYP2305 

VMMFE 

AEIOCO 

CPEXRO 

lOEHVC 

lOBUSER 

PRIORITY 

RDEVBDSY 

RDEVMOUT 

RO 

R7 

TYP3705 



AL0CCYL1 

BALRSAVE 

BDFSIZE 

COEFLAG 

CPDLOG 

DEFER 

DHKDHPAO 

DMKIOEFL 

DMKPGTPU 

DMKPSADO 

DMKQCNRD 

DMKSCNRH 

DMKSTSOD 

F1 

IHTMASK 

HCNPSN 

OHMDRDEV 

RCHDISA 

RDEVATOF 

EDEVOWN 

RECBLOK 

R11 

SAVESIZE 

SHPFLAG 

TODATE 

TYP2314 

VMHSVC 

ARIODV 

CPEXSIZE 

lOBIOER 

lOBVADD 

PSA 

EDEVCTRS 

HDEVNICL 

R1 

R8 

VDEVBLOK 



AL0CCYL2 

BALRO 

BDSY 

CORFPHT 

CPUMCDEL 

DMKBLDRT 

DMKDMPDV 

DMKIOSIH 

DMKPGTF5 

DMKPSAEX 

DMKQCSWT 

DMKSCHVS 

DMKSYSVL 

F10 

IHTREQ 

NEHPAGES 

OHNEVSER 

RCHSTAT 

RDEVADTO 

REEVPHT 

RECCYL 

R12 

SEGPAGE 

SYHCLOG 

TRACCDRR 

TYP2741 

VMPAGES 

ASYSOP 

CPID 

lOBIRA 

lOERBLOK 

ECHELOK 

RDEVDED 

RDEVMRDY 

RIO 

SAVEAEEA 

VDEVSPL 



ALCCHAP 

BALR1 

CAW 

CORFREE 

CPDVERSB 

DHKCFMEN 

DMKDMPRC 

DMKIOSQR 

DMKEGTTM 

DMKPSAHI 

DHKHIOCN 

DMKSYM 

DMKDDRBV 

F2 

lOBCAS 

HEBSEGS 

PAGCORE 

ECDADD 

RDEVBLOK 

RDEVPREF 

BECMAP 

E13 

SFBLOK 

SYSIPLDV 

THACEFLG 

TYP3066 

VMESTAT 

ASYSVH 

CB 

lOBLIHK 

lOERDATA 

RCBCOTBL 

BDEVDISK 

EDEVOWN 

B11 

SAVER11 

VMBLOK 



ALOCMAX 

BALR14 

CC 

COESHPNT 

CPWAIT 

DHKCKP 

DHKDMPSF 

DMKLOGOP 

DMKPGTTO 

DHKPSALO 

DMKRIOEH 

DHKSYMTB 

DHKVMI 

F3 

lOBIRA 

NICBLOK 

PAGEWAIT 

RCDBLOK 

RDEVCODE 

RDEVPTTC 

RECMAX 

R14 

SFBORIG 

SYSTEM 

TRACEND 

TYP3210 

VMSEG 

CFSTOP 

DE 

lOBLOK 

lOEREXT 

RCHDISA 

RDEVDBAN 

RDEVRCVY 

R12 

SAVEWRKl 

VMDVSTRT 



ALOCPHT 

BALR2 

CCC 

CORTABLE 

CSW 

DMKCHSES 

DMKDSPCH 

DMKMCHIH 

DMKPGTTO 

DMKPSANS 

DMKRPAPT 

DHKSYSDO 

DHKHRMST 

FU 

lOBLOK 

HICDISA 

PAGE4K 

ECUDISA 

RDEVDISA 

RDEVRON 

RECPNT 

R15 

SFBSTART 

TEMPRO 

IRACSTRT 

TYP3277 

VMSIZE 

CLASDASD 

DFRET 

lOBMISC 

lOERSIZE 

RCHSTAT 

HDEVENAB 

RDEVRSVD 

H13 

SAVEHRK2 

VMTTIHE 



ALOCUSED 

BALB6 

CE 

CPCREGO 

CDE 

DMKCPEID 

DMKDSPNP 

DMKHETAE 

DMKPGTT4 

DMKPSASV 

DMKSAV 

DMKSYSDH 

EDIT 

Fa096 

lOBSIZE 

NICHAME 

PRHPSW 

ECDDVTBL 

RDEVENAB 

EDEVSER 

EECSIZE 

R2 

SFBDSER 

TEMPRm 

TRQBIRA 

TyP3330 

VMTEEM 

CIASGRAF 

F2 

ICBMISC2 

MONAIOB 

RCUBLOK 

RDEVEPLN 

RDEVSCED 

Ria 

SAVEWRK3 
VMUSER 



APAGCP 

BALR8 

CKCMASK 

CPEXSIZE 

CO 

DHKCPEHD 

DMKFREE 

DMKMLDR 

DMKPGTT5 

DMKPTRAN 

DMKSCHLI 

DMKSYSND 

EXDPSW 

F5 

ICBUSER 

NICSIZE 

PROETIME 

RCDPRIME 

RDEVFLAG 

RDEVSTAT 

RECUSED 

R3 

SILI 

TEMPE15 

THQBLOK 

TYP3340 

VMUSER 

CLASTAPE 

F3 

lOERADD 

MONARDB 

ECUDISA 

EDEVFLAG 

RDEVSPL 

R15 

SAVEHRKI 

VMVTERM 



ARIOCH 

BLKMPX 

CLASDASD 

CPID 

CI 

DMKCPVAE 

DMKFREHI 

DMKPAGHI 

DMKPGT4P 

DMKPTRFA 

DHKSCBHD 

DMKSYSOC 

EXTMODE 

F7 

lOHTWAIT 

NICSTAT 

PEOPSS 

HCUSTAT 

RDEVFTR 

RDEVSYS 

RONCRO 

B4 

SH 

TEHPR2 

TRQBSIZE 

TYP3350 

HAIT 

CLASTERM 

I0BCC3 

lOBSIZE 

MONCOM 

BCUDVTEL 

RDEVIOER 

RDEVSTAT 

H2 

SAVEHRK9 

X40FFS 



ARIOCT 
BEING 
CLASGRAF 
CPMICAVL 

cm 

DMKCQEFI 

DMKFEELG 

DMKPAGLO 

DMKPGT4T 

DMKPTEFN 

DMKSCHQI 

DMKSYSOH 

FFS 

F8 

IPLCCH1 

NOAUTO 

PSA 

ECUSOB 

RDEVIDNT 

RDEVTFLG 

RUNCRl 

R5 

STARTIME 

TEMPH3 

TBQBTOD 

UC 

XPAGNUM 

CLASUEI 

lOBCP 

lOBSPEC 

M0NFLAG1 

RCDSTAT 

RDEVLCEP 

RDEVSYS 

H3 

TBUSY 

ZEROES 



ARIOCO 

BUFCNT 

CLASTAPE 

CPMICON 

C6 

DMKCSOSD 

DMKFRELO 

DMKPAGST 

DMKPGT5P 

DMKPTRF1 

DMKSCHQ2 

DMKSYSRM 

FTRRPS 

F9 

IPLPSH 

NORET 

PSENDCLR 

RCOTYPE 

RDEVHAX 

EDEVTMCD 

EONUSEE 

E6 

SVCNPSW 

TEMPR4 

TRQBUSER 

UCASE 

XRIGHT16 

CLASUEO 

lOBCSW 

lOBSTAT 

MONOSER 

RDEVADD 

RDEVLNCP 

RDEVTYPC 

R4 
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Hodule External References (Labels and Modules) 



EHKCPV 



DMKCQG 



DMKCQP 



EHKCQH 



Ui 



ACOBETBl 


ARIOCB 


ARIOCT 


ARIOCO 


ARIOEV 


ASYSOP 


ASYSVM 


AVMREAL 


BALRSAVE 


BRING 


CLASDASD 


CLASGRAF 






CLASTERH 


CORCFLCK 


CORFLAG 


CORFPNT 


CORTABLE 


CPEXADD 


CPEXBLOK 


CPEXREGS 


CPEXR12 


CPEXSIZE 


DEFER 


F1 


F2 




F3 


F4096 


F8 


F9 


LOCK 


NORET 


PSA 


RCHBLOK 


RCHCOTBL 


RCOELOK 


ECDDVTBL 


RDEVBLOK 


RDEVDED 




RDEVDISA 


RDEVDISB 


RDEVENAB 


RDEVFLAG 


RDEVLCG 


RDEVSTAT 


RDEVTFL6 


RDEVTYPC 


RDEVTYPE 


RDEVOSER 


RO 


R1 


RIO 




R11 


R13 


R14 


R15 


R2 


R3 


R4 


E5 


R6 


R7 


R8 


R9 


SAVEAREA 




SAVEREGS 


SAVER 11 


SAVEWRK1 


SAVEHRK2 


SAVEWRK3 


SAVEHRK4 


SAVEHHK3 


SAVEiRK4 


SAVEWHK8 


SYSTEM 


TYPTTY 


TYP3066 


TYP3277 




TYP3284 


VCHBLOK 


VCHCDTEL 


VCOBLOK 


VCDDVTEL 


VDEVBLOK 


VDEVDED 


VDEVFLAG 


VDEVSTAT 


VDEVTDSK 


VDEVTYPC 








VHBLOK 


VMCHSTRT 


VHCHTEL 


VMCOSTRT 


VMDVSTRT 


VMLOGOFF 


VMLOGON 


VMMACCON 


VMMLEVEL 


VMPNT 


VMRSTAT 


VHSEG 


VMSIZE 




VHSTOR 


VMTTIHE 


VMDSER 


VMHSPROJ 


XUOFFS 


ZEROES 


















ARSPPR 


ARSPPD 


ARSPRD 


BLANKS 


CHXBLOK 


CHXOTHR 


CHXYADD 


CLASDASD 


CLASGRAF 


CLASSPEC 


CLASTAPE 


CLASTERM 


CLASORI 




CLASDRO 


DMKCVTBD 


DMKCVTBH 


DMKCVTDB 


DMKCVTHB 


DMKERMSG 


DMKFREE 


DMKFRET 


DMKQCNHT 


DMKSCHAO 


DMKSCNFD 


DMKSCNRD 


DMKSCNRN 




DMKSCNVS 


DMKSCNVO 


F1 


F2 


F3 


F8 


NORET 


PSA 


RDEVBLOK 


RDEVSER 


RDEVTYPC 


RDEVTYPE 


RO 




R1 


RIO 


R11 


R12 


R13 


R15 


R2 


R3 


R4 


R5 


E6 


R7 


R8 




R9 


SAVEAREA 


SAVERO 


SAVER11 


SAVEWBK1 


SAVEWRK2 


SAVEHRK3 


SAVEWRK4 


SAVEWRK5 


SAVEiiRK8 


SFBCLAS 


SFBCOPY 


SFBDATE 




SFBDIST 


SFBDUHP 


SFEFILIE 


SFBFLAG 


SFBFNAME 


SFBFTYPE 


SFBINDSE 


SFBLOK 


SFBORIG 


SFBPNT 


SFBHECHO 


SFBSEOLD 


SFBTIME 




SFBTYPE 


SFBOBOLD 


SFBOSER 


TYPBSC 


TYPCTCA 


TYPPRT 


TYPRDR 


TYPTIMER 


TYP2305 


TYP2311 


TYP23ia 


TYP3210 


TYP3330 




TYP3340 


TYP3350 


VCBADD 


VCHBLOK 


VCBCDTBL 


VCDADD 


VCOBLOK 


VCODVTBL 


VDEVADD 


VDEVBLOK 


VDEVBND 


VDEVCLAS 


VDEVCONT 




VDEVCOPY 


VDEVCSPL 


VDEVDED 


VDEVENAB 


VDEVEOF 


VDEVEXTN 


VDEVFLAG 


VDEVFOR 


VDEVHOLD 


VDEVNRDY 


VDEVRDO 


VDEVREAL 


VDEVSFLG 




VDEVSTAT 


VDETTDSK 


VDEVTEBM 


VDEVTYPC 


VDEVTYPE 


VDEVXFER 


VDEV231B 


VDEV231T 


VMBLOK 


VMCHSTRT 


VMCHTBL 


VMCLASSD 


VMCLASSG 




VMCLEVEL 


VMCOSTRT 


VMDISe 


VMDIST 


VMDVSTRT 


VMFBMX 


VMFSTAT 


VMOSTAT 


VMSTKO 


VMSTOR 


VMTERM 


VMTRMID 


VMOSER 




VSPXBLOK 


VSPXXUSR 


ZEROES 
























ALARH 


ARIOCH 


ARIOCT 


ARIOCO 


ARIODV 


ASYSVH 


BLANKS 


CLASDASD 


CLASGRAF 


CLASSPEC 


CLASTAPE 


CLASIEEM 


CLASORI 




CLASORO 


DMKCVTBD 


DMKCVTBH 


DMKCVTHB 


DMKERMSG 


DMKFREE 


DMKFRET 


DMKQCNHT 


DMKRIORN 


DMKRSPDR 


DMKSCNAO 


EMKSCNFD 


DMKSCNRD 




DHKSCHRB 


DMKSCHRO 


DHKSCHVE 


EMKSCNVO 


DMKSYSRM 


DMKSYSRV 


ERRMSG 


FFS 


F1 


F2 


F3 


F6 


NORET 




PSA 


RCHBLOK 


RCHCOTBL 


RCDBLOK 


RCODVTEL 


RDEVACNT 


RDEVADD 


RDEVATT 


RDEVAOTO 


RDEVBLOK 


RDEVCLAS 


RDEVEED 


RDEVDISA 




RDEVDRAN 


RDEVENAB 


REEVFLAG 


RDEVLCEP 


RDEVLNCP 


RDEVLNKS 


RDEVMOOT 


RDEVNCP 


RDEVNRDY 


RDEVOWN 


RDEVSEP 


RDEVSER 


RDEVSLOH 




RDEVSPl 


RDEVSTAT 


RDEVSYS 


RDEVTYPC 


RDEVTYPE 


RDEVUSER 


RSPLCTL 


ESPSFBLK 


RO 


R1 


RIO 


R11 


E12 




R13 


R14 


R2 


R3 


RU 


R5 


R6 


R7 


R8 


R9 


SAVEAREA 


SAVEREGS 


SAVERO 




SAVER1 


SAVER11 


SAVER2 


SAVEWRK1 


SAVEHRK2 


SAVEURK3 


SAVEHEK5 


SAVEHRK6 


SAVEHRK8 


TYPESC 


TYP2305 


TYP3705 


VDEVADD 




VDEVBLOK 


VDEVBND 


VDEVFLAG 


VDEVRDO 


VDEVBEAL 


VDEVRELN 


VDEVSIZE 


VDEVTDSK 


VDEVTYPC 


VMBLOK 


VMDISC 


VMDVCNT 


VMDVSTRT 




VHOSTAT 


VMPNT 


VMSTKO 


VMTERM 


VMTRMID 


VMDSER 


XRIGHT16 


ZEROES 














ARIODV 


ARSPPR 


ARSPPO 


ARSPRD 


BLANKS 


CLASDASD 


CLASSPEC 


CLASTAPE 


CLASTERH 


CPMICON 


CPSTAT2 


EFRET 


DMKACOTM 


n 


DBKCVTED 


EMKCVTBH 


DHKCVTDB 


DHKCVTDT 


DMKDHPDV 


DMKDMPSW 


DMKERMSG 


DMKFREE 


DMKFRET 


DMKPAGQR 


DMKPTRFF 


DMKPTRSS 


DMKQCNWT 


►O 


DMKRIOPR 


DMKRSPHQ 


DMKRSPPR 


DHKRSPPO 


DMKRSPRD 


DMKSCHPG 


DMKSCNAD 


DMKSCNFD 


DMKSCNRD 


DMKSYSEW 


EMKSYSLG 


DMKSYSND 


DMKSYSNM 


3 


DMKSYSTI 


FO 


F1 


F2 


F4095 


F60 


F8 


NICAPL 


NICATOF 


NICBLOK 


NICFLAG 


NICLLEN 


NICPSOP 


O 
p. 


NICSIZE 


MICTHCD 


NOHET 


PAGEWAIT 


PSA 


RDEVAPLP 


RDEVATOF 


RDEVBLOK 


RDEVFLAG 


RDEVLLEN 


EDEVNICL 


RDEVPSDP 


RDEVTFLG 


(3 


RDEVTMCD 


RDEVTYPC 


RDEVTYPE 


RO 


B1 


RIO 


R11 


R12 


R13 


R14 


R15 


R2 


R3 


1 


R4 


R5 


R6 


H7 


R8 


R9 


SAVEAREA 


SAVERO 


SAVEHRK1 


SAVEHRK2 


SAVEHHK4 


SAVEHRK8 


SFBCLAS 


SFBFLAG 


SFBINUSE 


SFBLOK 


SFBPNT 


SFBSHCLD 


SFBOHOLD 


SFBOSER 


SHQBLOK 


SHQSHOLD 


SHQOSER 


STARTIME 


TEMPSAVE 


TYPBSC 


(+ 
O 

1 


TYPPBT 


TYPPUN 


VMELOK 


VMCFRON 


VMCLASSA 


VMCLASSB 


VMCLASSD 


VMCLASSE 


VMCLEVEL 


VMDISC 


VMISAM 


VMMACCON 


VMHCODE 


VMHCPENV 


VMMCR6 


VMMFE 


VMMIMSG 


VMMLEVEL 


VMMLINEC 


VMMLVL2 


VMMSGON 


VMMSVC 


VBMTEXT 


VMOSTAT 


VMPAGEX 


VMPFUNC 


f 


VBPNT 


VMPSTAT 


VMHON 


VMSTKO 


VMTCDEL 


VMTERM 


VMTESCP 


VMTLDEL 


VMTLEND 


VMTLEVEL 


VMTON 


VMTRMID 


VMUPRIOR 




VMUSER 


VHV370R 


VHHNGON 


ZEROES 
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Module External Beferences (Labels and Hodules) 



EHKCSO 



EMKCSP 



EHKCST 



ACORETBL APTHAN ARIODV ARIOPR ARIOPD ABIORD ASYSVM EALRSAVE BLANKS 

CHGBDV CLASDRI CLASDHO Cl DE DEFER DHKCKSPL DHKCVTBH DMKCVTDB 

DMKFHEE DMKFEET DHKIOSQR DMKPTRDL DHKQCHBT DMKRSPEX DBKSCHFD DMKSCHRO DMKSCHVD 

FTEUCS F1 F2 r3 FU F8 lOBCAW lOBCP lOBCSW 

lOBLOK lOBMISC I0EMISC2 lOBRADD lOBRSTRT lOBSIZE lOBSTAT lOBDSER LOCK 

RDEVAIOB RDEVBACK RDEVBLOK RDEVBDSY RDETCLAS BDEVDED RDEVDISA RDEVDRAN RDEVFLAG 

RDEVBSTR BDEVSEP RDETSPAC RDEVSPL RDEVSTAT EDBVTERH RDEVTYPC RDEVTYPE RDEVUSER 

R1 RIO R11 H12 B13 BIH H15 R2 R3 

R8 R9 SAVEAREA SAVEWRK1 SAVESRK2 SAVEWRK4 SAVEiRKS SAVEHRK6 SAVEHRK7 

SFBLOK SFBRECER SFBRECOK SFBREQDE SFBSHOLD SILI SKIP SYSTEM TYPPRT 

VDEVSTAT VDIVTYPE VFCBBLOK VFCBCHT VFCBLOAD VFCBWDEX VFCBSIZE 



VDEVDED 
VHUSER 

ARSPPR 

DHKCSOSD 

DMKVSPCR 

lOBUSEB 

R6 

SFBDIST 

SHQBSIZE 

VCBADD 

VDEVDED 

VDEVTYPC 

VSPXELOK 

ARSPRD 

DMKPGTVG DMKPGTVR DHKRPAGT EMKHPAPT DHKSCHFD DHKSCSVD DBKSCNVN DMKSCHVO FFS 



VDEVFCBK 
ZEROES 

ARSPPU 

DMKCVTDB 

FFS 

lOBVADD 

H7 

SFBFILID 

SHQFLAGS 

VCHBLOK 

VDEVEOF 

VDEVTYPE 

VSPXDIST 

BRING 



ARSPRD 

DMKCVTHE 

F1 

PSA 

R8 

SFEFLAG 

SHQPHT 

VCHCDTBL 

VDEVEXTN 

VDEVXFER 

VSPXLEH 



BLANKS 

DMKERHSG 

F2 

RO 

R9 

SFBFLAG2 

SBQSBOLD 

VCDADD 

VDEVFLAG 

VMBLOK 

VSPXSIZE 



BUFFER 

DHKFREE 

F3 

R1 

SAVEAREA 

SFBFHAME 

SBQDSER 

VCDBLCK 

VDEVFOR 

VHCHSTRT 

VSPXSPAR 



CBGSFB 

DMKFRET 

F1 

BIO 

SAVESRK1 

SFBBOLD 

TEMPR2 

VCDDVTBL 

VDEVHOLD 

VMCHTBL 

VSPXTGLH 



CHGSHQ 

DMKRSPBQ 

F7 

R11 

SAVENBK2 

SFBINDSE 

TYPPRT 

VDEVADD 

VDEVPEND 

VBCDSTRT 

VSPXXDSR 



CLASTERM 

DMKSCHFD 

F8 

H13 

SAVEiRKf* 

SFBLOK 

TYPPUH 

VDEVBLOK 

VDEVPDRG 

VMDIST 

ZEROES 



CLASURI 

DBKSC8VD 

lOBCSH 

Rlt 

SAVEMRKS 

SFBNOHLD 

TYPBDR 

VDEVCLAS 

VDEVSFLG 

VBDVCNT 



BBING 

DMKCVTHB 

DMKSPLDL 

lOBFATAL 

NOBET 

BDEVFTR 

HSPLCTL 

R4 

SAVEflRK8 

TYPPON 

VMBLOK 



CLASOHO 

DBKSTKIO 

lOBIHA 

R2 

SAVEWHK6 

SFBSHOLD 

TYP3210 

VDEVCONT 

VDEVSIZE 

VBDVSTRT 



BOFFEE 

DMKDSPCH 

DBKSTKIO 

lOBFLAG 

OPERATOR 

RDEVIOEE 

BSPBISC 

R5 

SFBCOPY 

TYP3211 

VMOSTAT 



DE 

DBKODBFO 

lOBLlHK 

R3 

SAVEWBK8 

SFBDHOLD 

UDIRBLOK 

VDEVCOPY 

VDEVSPL 

VBOSEB 



EDFHXT 

DHKEBMSG 

DMKUCBLD 

lOBIRA 

PSA 

RDEVLOAD 

RSPSFBLK 

R6 

SFBFLAG 

UE 

VHSEG 



DELSFB 

DBKVIOIN 

lOBLOK 

R4 

SAV£eRK9 

SFBOSER 

DDIHPASS 

VDEVCSPL 

VDEVSTAT 

VSPLCTL 



CC 

DHKFCBLD 

DBKOCSLD 

lOBLINK 

REEVACNT 

RDEVNRDY 

RO 

B7 

SFBFLAG2 

VDEVBLOK 

VaSYSOP 



DHKCKSPL 

DMKVSPCO 

lOBSIZE 

R5 

SFBCLAS 

SHQBLOK 

UDIRSIZE 

VDEVCSW 

VDEVTERH 

VSPSFBLK 



BDFCNT BDFFER CLASTERH CLASDRI CLASDHO DMKCVTBH DMKCVTDB DMKCVTHB DBKEBBSG DBKFREE DMKFEET 



F1 



F2 



F3 



PSA 



RO R1 RIG H11 R13 Hl4 H2 R3 H4 H5 H6 fi7 R8 

R9 SAVEAREA SAVEiRKi SAVEHRK2 SAVEHRK4 SAVEWEK5 SAVEHBK6 SAVEWRK7 SFBFILID SFBLOK SFBPNT SFBSTART SFBOSER 

SKIP SYSTEM TYPPRT TYPPON TYPRDR TYP3210 VDEVADD VDEVBLOK VDEVDED VDEVEXTN VDEVFOR VDEVSFLG VDEVSIZE 

VDEVSTAT VDEVTYPC VDEVTYPE VDEVXFER VMBLOK VMDIST VBDVCNT VBDVSTRT VBSTKO VMDSER VSPXBLOK VSPXDIST VSPXLEN 

VSPXSIZE VSPXSPAR VSPXTAG VSPXTGLN VSPXXOSR ZEROES 

EBKCSO ARSPPR ARSPPD 

DMKSBHSG DBKFBEE 

F2a F3 

lOBVADD NOBET 

R4 B5 

SAVEHRK8 SAVEHRK 

SFBDHOLD SFBOSER TEMPB2 

VCODVTBL VDEVADD 



ARSPRD 


BLANKS 


BUFFER 


BDFNXT 


CHGSFB 


CLASORI 


DE 


DBKCKSPL 


DBKCSOSD 


DMKCVTBD 


DMKCVTDB 


DMKFRET 


DMKQCNiT 


DMKSCNAD 


DMKSCHFD 


DMKSPLDL 


EMKSTKIO 


DMKODRFO 


DBKVIOIN 


FFS 


F1 


F2 


F4 


F5 


F6 


F7 


F8 


lOBCSi 


ICBIBA 


lOBLINK 


lOBLOK 


lOBSIZE 


lOBOSEE 


PSA 


RO 


R1 


BIO 


Ell 


H12 


R13 


R14 


B15 


B2 


E3 


B6 


R7 


B8 


H9 


SAVEABEA 


SAVEE11 


SAVEMRKI 


SAVEWEK2 


SAVERBK4 


SAVEWRK5 


SAVEWRK6 


SFBCLAS 


SFBCOPY 


SFBDIST 


SFBFILID 


SFBFLAG 


SFBFNABE 


SFBINOSE 


SFBLOK 


SFBORIG 


SFBPNT 


SFBSHOLD 


TEMPB2 


TEMPH3 


TEflPEU 


TYPPRT 


TYPPON 


TYPRDR 


VCHADD 


VCHBLOK 


VCHCDTBL 


VCDABE 


VCDBLOK 


VDEVBLOK 


VDEVCLAS 


VDEVCSW 


VDEVPEND 


VDEVSPL 


VDEVSTAT 


VDEVTYPC 


VDEVTYPE 


VMBLOK 


VMCHSTRT 


VMCHTBL 


VMCOMND 


VMCOSTRT 


VBDVSTRT 


VMBIHSG 


VBBLEVEL 


VBBLVL2 


VMHSGOH 


VMTTIME 


VBOSEE 


ZEROES 
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Module External 


Beferences (Labels and Hodules) 


















EHKCVT BALSSaVE 


BALR1 


BALR2 


CPID 


DATE 


F1 


F10 


F240 


FU 


F60 


PSA 


BO 


fil 


BIO 


B11 


R15 


B2 


B3 


B5 


B6 


H7 


B8 


B9 


TEBPSAVE 


TODATE 




DBKDAS ALABB 


ASYSVM 


CC 


CCC 


CD 


CDC 


DFRET 


DBKCVTBH 


DBKDSPCH 


DBKFBEE 


BBKFRET 


DBKIOESD 


DBKIOEST 


DHKIOSQR 


DHKHSWB 


DHKQCNNT 


DMKSCNBO 


FTBEXTSH 


FTBBPS 


FTR35BB 


FTR70BB 


F1 


F10 


F2 


P256 


F4095 


F4096 


F8 


IDA 


IFCC 


lOBCAW 


I0BCC3 


lOBCP 


lOBCSW 


lOBEBP 


lOBFATAL 


lOBFLAG 


lOBIOER 


lOBIBA 


lOBLIHK 


lOBLOK 


lOBRADD 


lOBBCAW 


lOBBCHT 


lOBBSTBT 


lOBSIZE 


lOBSPEC 


lOBSTAT 


lOBTIO 


lOBDSER 


lOEBACT 


lOERADR 


lOEBBLOK 


lOEBCAL 


lOERCAN 


lOEBCEHD 


lOEECSW 


lOEBDASD 


lOERDATA 


lOERDEC 


lOEEDW 


lOEBECF 


lOERETRY 


lOEREXT 


I0ERFLG1 


I0EBP1G2 


I0EBFLG3 


lOSRHA 


lOERIGHB 


I0ERIBD3 


lOERIHDt 


lOERIHFO 


lOERLEN 


lOERLOC 


lOEBBSG 


lOERBSW 


lOEBHDB 


lOEROVFL 


lOEBPEND 


lOEBPNT 


lOERREAD 


lOEBSIZE 


lOERSTAT 


lOEBSTBT 


I0EEV0L1 


lOEBVSEB 


NORET 


OPERATOR 


PRGC 


PRTC 


PSA 


BDEVELCK 


BDEVDED 


BDEVDISA 


RDEVFLAG 


RDEVFTR 


BDEVIOEB 


RDEVBODT 


BDEVHBDY 


RDEVOHH 


RDEVSER 


RDEVSTAT 


RDEVSYS 


RDEVTYPE 


RO 


B1 


BIO 


R11 


B12 


B13 


R15 


B2 


R3 


R4 


R5 


B6 


R7 


B8 


H9 


SAVEAREA 


SAVER11 


SILI 


SKIP 


TYP2305 


TYP2314 


TYP3330 


TYP33U0 


TYP3350 


DC 


XRIGHT16 


ZEBOES 


























DHKDDB ATTH 


BUSY 


CC 


CD 


CE 


CLASDASD 


CLASTAPE 


CLASTERM 


CDE 


DE 


EBBBS6 


INTBEQ 


BO 


R1 


BIO 


B11 


B12 


B13 


Bm 


R15 


B2 


R3 


R4 


B5 


B6 


B7 


B8 


B9 


SILI 


SKIP 


TYP2305 


TYP2311 


TYP2314 


TYP2319 


TyP2401 


TYP2U15 


TYP2a20 


TYP3330 


TYP33aO 


TYP3350 


TYP3410 


TYP3mi 


TYP3420 


DC 


DE 


WAIT 














EMKDEF CLASDASD 


CLASGBAF 


CLASSPEC 


CLASTEBH 


CLASDBI 


CLASUBO 


DELPAGES 


EELSEGS 


DBKBLDRL 


DBKBLDRT 


DBKCFPBD 


EBKCFPBB 


DBKCVTBD 


DMKCVTBH 


DMKCVTDB 


DHKCVTHE 


EMKEBMSG 


DHKFBEE 


DHKFBET 


DBKLOCKD 


DBKLOCKQ 


DBKPGSPO 


DBKQCNST 


DBKSCNFD 


DBKSCNVD 


DBKSCHVN 


DMKSCNVD 


DHKDDBFU 


DHKODBBD 


DHKODBEV 


DHKVCABS 


DMKVDSDF 


FFS 


F3 


F4 


F5 


F8 


NEHPAGES 


NENSEGS 


NOBET 


PSA 


BDEVATT 


BDEVBLOK 


BO 


B1 


RIO 


B11 


R12 


R13 


R15 


R2 


B3 


B4 


B5 


B6 


B7 


B8 


SAVEAREA 


SAVER2 


SAVEiBKI 


SAVEMBK2 


SAVEWRK3 


SAVEWHK4 


SAVEWRK5 


SAVEHRK6 


SA?EWBK7 


SAVESBKB 


SATEWBK9 


TYPCTCA 


TIPIBfll 


TYPPBT 


TYPTELE2 


TYP1052 


TYP1403 


TYP2305 


TYP3211 


DDBFBLOK 


DDBFSIZE 


UDBFVADD 


DDEVADD 


ODEVBLOK 


DDEVCLAS 


OEEVEISP 


DDEVFTB 


DDEVNCYL 


ODEVSTAT 


DDEVTDSK 


DDEVTYPC 


DDEVTYPE 


DDEV3158 


UDIRBLOK 


ODIEDISP 


DHACBLOK 


DHACMCOB 


VCHADD 


VCHBLCK 


VCHBHX 


VCHCOTBL 


VCHDED 


VCHSEL 


VCHSTAT 


VCHTYPE 


VCUADD 


VCDBLOK 


VCUCTCA 


VCaDVTBL 


VCOTYPE 


VDIVAED 


VDEVBLOK 


VDEVDED 


VDEVFLAG 


VDEVLIHK 


VDEVPOSN 


VDEVEELH 


VDEVSTAT 


VDIVTDSK 


VDEVTYPC 


VHBLOK 


VMCHSTBT 


VHCHTBL 


VHCDSTRT 


VMDVSTBT 


VHFBBX 


VBFSTAT 


VBBIBSG 


VBBLVL2 


VBSIZE 


VBSTOE 


VBDSER 


VBVTERB 


VBALOC 


























EHKDGD ACOBETBL 


BBING 


CC 


CD 


CLASDASD 


COBPGPNT 


CORSBPNT 


COBTABLE 


CPSHRLK 


CPSTAT2 


CSW 


EEFEB 


DBKDSPCH 


DMKFBEE 


DMKFBET 


DHKIOSQV 


DMKPSACC 


DHKPSASC 


DBKPTRAB 


DBKPTBFB 


DBKPTBFT 


DBKPTBOL 


DBKSCNVD 


DBKVBAPS 


FFS 


F1 


F15 


F16 


F3 


F4 


FtJ095 


Ft096 


F5 


F6 


F8 


IDA 


lOBCAW 


I0BCC1 


I0BCC3 


lOBCSH 


lOBCYL 


lOBFATAL 


lOBFLAG 


lOBHVC 


lOBIOEB 


lOBIBA 


lOBLINK 


lOBLOK 


lOBBISC 


I0BBISC2 


lOBSIZE 


lOBSTAT 


lOEBBLOK 


lOEBEXT 


lOEBSIZE 


LOCK 


PCIF 


PSA 


BCiADDB 


BCMCCW 


RCWCNT 


RCHCOBND 


BCWCTL 


BCWFLAG 


RCWIO 


BCWSHR 


BO 


B1 


RIO 


B11 


B12 


R13 


B14 


R15 


B2 


B3 


B4 


B5 


R6 


B7 


B8 


E9 


SAVEABEA 


SAVEBEGS 


SAVER 12 


SAVEB2 


SAVEHRK9 


SILI 


SWPFLAG 


TYP2305 


TYP2311 


TYP2314 


TYP3330 


TYP33aO 


TYP3350 


VDEVBLOK 


VDEVBND 


VDEVBDSY 


VDEVCHAN 


VDEVDED 


VDEVFLAG 


VDEVIOB 


VDEVIOER 


VDEVPEHD 


VDEVPOSN 


VDEVPOST 


VDEVBDO 


VDEVBELN 


VDEVSTAT 


VDEVTYPC 


VDEVTYPE 


VDEVOC 


VBACTDEV 


VBBLOK 


VflCOflP 


VBDVSTBT 


VBESTAT 


VBEXTCa 


VMEXHAIT 


VMGPRS 


VMIOCNT 


VHIOHAIT 


VBLOGOFF 


VBLOPRI 


VBPSH 


VBQLEVEL 


VBRSTAT 


XPAGHOB 
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Kodule External Beferences (Labels and Modules) 



EBKDIA ARIOCD 


ARIODV 


ASYSVM 


BALRSAVE 


BALR1 


BLAHKS 


CC 


CCDESBD 


CD 


CE 


CHBSIZE 


CHXBLOK 


CHXOTHB 


CHIIADD 


CHYBIOK 


CBYOTHE 


CHYXAED 


CLASGRAF 


CLASSPEC 


CLASTERB 


CHDBEJ 


CCNCCW3 


CONDATA 


CONDCNT 


CONSYSB 


CPEXADD 


CPEXBLOK 


CPEXSIZE 


CRESDQ 


CRESIMD 


CSETDSM 


CSSLMEP 


CSSLHCP 


CTBBLTR 


DE 


DFBET 


DBKACODV 


DBKBLEVB 


DBKCFPRD 


DHKCVTED 


DHKCVTBH 


DHKCVTHE 


EMKDSPCB 


DHKEBBSG 


DBKFREE 


DBKFRET 


DBKIOSHA 


DMKIOSQR 


DBKQCNCL 


DBKQCBBT 


DBKBIOEN 


DBKRNHND 


DHKSCNAU 


DHKSCBFD 


DMKSCHBE 


DHKSCNRN 


DHKSCHRD 


DBKSCHVD 


DBKSCSVO 


DBKSTKCP 


DBKSTKIO 


DBKSYSCK 


DBKSYSBD 


EBKSYSEB 


DBKVCARS 


DMKVIOIN 


FFS 


F1 


F2U0 


F3 


F4095 


IDA 


IL 


IHTREQ 


lOBCAW 


lOBCC 1 


lOBCP 


lOBCSH 


lOBFlAG 


lOBIOEB 


lOBIBA 


lOBLINK 


lOBLOK 


lOBBISC 


lOBRADD 


lOBRCAi 


lOBRSTRT 


lOBSIZE 


lOBSTAT 


lOBDSER 


lOBVADD 


lOERBLOK 


lOERCCS 


lOERCSH 


lOERDATA 


lOEBEXT 


lOEBSIZE 


LOGBOLD 


NICBLOK 


HICCIBB 


NICDISA 


NICENAB 


HICEPAD 


BICEPBD 


NICFIAG 


mCLIBE 


HICLTBC 


NICNAHE 


HICQPNT 


HICSESH 


NICSIZE 


NIC STAT 


HICSHEP 


NICTELE 


HICTYPE 


NICUSER 


NORET 


OPERATOR 


PRGC 


PRIORITY 


PRTC 


PSA 


BCHBLOK 


RCHCDTBL 


RCDBLOK 


RCDDVTBL 


BCWADDR 


BCWCCW 


RCHCNT 


RCWCOBBD 


RCHCTL 


RCiFLAG 


BCilHVL 


RDFVACTV 


BDEVADD 


RDEVAIOB 


RDEVAIRA 


RDEVATT 


BDEVBASE 


RDEVBLOK 


BDEVCOB 


BDEVCOBD 


RDEVCTL 


RDEVCUA 


RDEVCYL 


RDEVDED 


RDEVEPDV 


BDEVEPIH 


BDEVEPBD 


RDEVFLAG 


BDEVHIO 


BDEVLCEP 


BDEVLNCP 


BDEVBICL 


BDEVBBDY 


RDEVPREP 


RDEVBCVI 


BDE7RUN 


BDEVSTAT 


EDEVTFLG 


RDEVTHAT 


BDEVTYPC 


RDEVTYPE 


BDEVOSEfi 


RUNDSER 


RO 


R1 


BIO 


R11 


R12 


R13 


B14 


B15 


R2 


R3 


R4 


B5 


R6 


R7 


B8 


B9 


SAVEAREA 


SAVERETN 


SAVER 11 


SA?ER2 


SAVERS 


SAVEHRK1 


SAVEBRK2 


SAVEWBK3 


SAVEWRK4 


SAVEWRK5 


SAVEWRK6 


SAVESRK7 


SAVEHBK8 


SAVEHRK9 


Sill 


SKIP 


TBQESIZl 


TYPBSC 


TYPCTCA 


TYPIBM1 


TYPTELE2 


TYP3277 


OC 


VCBADD 


VCBBLOK 


VCHCOTBL 


VCOADD 


VCUBLOK 


VCUDVTBL 


VDEVADD 


VDEVBIOK 


VDEVDEC 


VDEVDIAL 


VDEVENAB 


VDEVFLAG 


VDEVIOB 


VDEVNEDY 


VDEVREAL 


VDEVSTAT 


VDEVTYPC 


VDEVTYPE 


VHBLCK 


VHBSIZE 


VMCF 


VMCHSTRT 


VHCBTBL 


VBCUSTRT 


VBDVSTRT 


VBIOHAIT 


VBKIIL 


VBLOGOFF 


VBOSTAT 


VBPNT 


VHRSTAT 


VMTERH 


VMTBHID 


VMTTIME 


VBOSEB 


ZEROES 
















DHKDIB ATTH 


BOSY 


CC 


CD 


CE 


CLASDASD 


CLASGRAF 


CLASSPEC 


CLASTERB 


CLASURI 


CLASORO 


CDE 


DE 


ERRBSG 


FTR2311B 


FTR2311T 


RO 


B1 


BIO 


R11 


R12 


R13 


RIU 


B15 


R2 


R3 


R« 


R5 


R9 


SILI 


TYPCTCA 


TYPIBB1 


TYPTELE2 


TYPTIMER 


TYP1052 


TYPm03 


TYP1443 


TYP2305 


TYP2311 


TYP2314 


TYP2501 


TYP25aOP 


TYP2540R 


TYP3158 


TYP3210 


TYP3211 


TYP3215 


TYP3277 


TYP3330 


TYP33aO 


TYP3350 


TYP3505 


TYP3525 


UC 


UDEVADD 


DDEVBLOK 


UDEVCLAS 


ODEVDASD 


DDEVDED 


DDEVDISP 


ODEVFTR 


UDEVLINK 


ODEVLKDV 


DDEVLKID 


ODEVLB 


DDEVIOSG 


DDE7IR 


UDEVLH 


DDEVMODE 


DDEVHR 


DDEVHS 


UDEVNCYL 


DDEVPASH 


DDEVPASB 


UDEVPASH 


DDEVB 


ODEVRELN 


ODEVRR 


UDEVSIZE 


ODEVSPOO 


DDEVSTAI 


DDEVTDSK 


DDEVTYPC 


DDEVTYPE 


DDEVVSEB 


UDEVW 


DDEVHB 


DDEV3158 


DDIBBLOK 


DDIRDASD 


ODIRDISP 


ODIBFASS 


ODIRSIZE 


UDIRUSEB 


OE 


UBACACC 


DBACACCT 


OBACBLOK 


OBACBBX 


OBACCDEL 


DHACCLEV 


UMACCOBE 


UBACEASD 


DBACDISP 


OHACDIST 


OHACDVCT 


DHACECOP 


OMACES 


OBACIPI 


DBACISAM 


DBACLDEL 


UBACLEND 


DBACBCOB 


UBACNSVC 


OBACOPT 


UBACPBIB 


OBACRT 


UHACSIZE 


OHACVHOP 
























EMKDMP ACORETBL 


ALARM 


ARIODV 


ARSPRD 


ATTH 


BALB2 


BDSY 


CAi 


CC 


CE 


CHGSFB 


CLASEASD 


CLASTAPE 


CLASDRC 


COBCP 


COHFLAG 


COBFPNT 


CORTABLE 


CPABEND 


CPID 


CSH 


CDE 


CO 


C14 


C15 


C2 


DAHAGBPT 


DATE 


DE 


DMKOPRHT 


DBKPRGBC 


DMKBIOPR 


DBKRSPID 


DMKSCNBD 


DBKSCHBU 


DBKSYSCH 


DBKSYSCK 


DBKSYSBB 


DBKSYSRV 


DMPFLAG 


EMPFPRS 


DMPGPBS 


DMPIBREC 


DBPKEY 


DBPKYBEC 


DMPLCOHE 


DBPPGMAP 


DBPSYSRV 


DMPTODCK 


EXTMODE 


FFS 


F4095 


Fa096 


F60 


F8 


HALFPAGE 


HABDSTOP 


INTBEQ 


INITIO 


lOBSIZE 


ICBASK 


ICBPSH 


IPLCCH1 


IPLPSH 


MCHEK 


MONAIOB 


HONARDB 


MOBCOM 


H0NFLAG2 


PRNPSH 


PSA 


RDEVBLOK 


BDEVRECS 


RDEVTYPC 


RDEVTYPE 


BDBCHB 


RECBLOK 


RECCYL 


RECMAP 


BECPNT 


RECDSEE 


BO 


R1 


RIO 


R11 


R12 


R13 


R14 


B15 


R2 


R3 


R4 


R5 


R6 


R7 


R8 


B9 


SFBDATE 


SFBDDMP 


SFBFILID 


SFBLAST 


SFBLOK 


SFBPNT 


SFBSIZE 


SPBSTABT 


SFBTIME 


SFETYPE 


SILI 


SKIP 


SYSIPLDV 


TODATE 


IRON 


TYPPBT 


TYP1403 


TYP2314 


TYP3330 


TYP33aO 


TYP3350 


UC 


OE 


HAIT 


YO 


Y2 


YU 


Y6 


ZEROES 
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a 

H- 
M 
<D 
O 

n- 
o 

H 
H- 
fD 

m 



EMKDSD 


ARIODV 


ARSPRD 


ASYSVa 


BRING 


CLASDBI 


DEFER 


DHKFREE 


DMKFBET 


DMKHVCPC 


DMKPGTSD 


DMKPGTVG 


DMKPGTVR 


DMKPSASP 




DMKPTBAK 


CHKBPAGT 


DHKSCBVU 


DMKSYH 


DMKSYSOW 


DMKVSPCB 


FFS 


Fl 


F255 


F256 


EU096 


F8 


OHNDLIST 




OMNDRDEV 


PSA 


RDEVBLOK 


RDEVTYPE 


RO 


B1 


RIO 


R11 


E12 


R13 


Rm 


R15 


R2 




R3 


m 


R5 


R6 


R7 


R8 


B9 


SAVEABEA 


SAVERO 


SAVER2 


SAVER6 


SAVEHRK1 


SAVEHBK2 




SAVEWRK3 


SAVEiRK6 


SFBCLAS 


SFBCOPY 


SFBDDBP 


SFBEOF 


SFBFILID 


SFBFLAG 


SFBINDSE 


SFBLAST 


SFBLOK 


SFBOPEN 


SFBPNT 




SFBBECEH 


SFBSIZE 


SFBSTABT 


SFBTYPE 


SFBDBOLD 


SFBDSER 


SKIP 


SPLINK 


SPNXTPAG 


SPPREPAG 


SYSTEM 


TYPPRT 


TYPPUN 




TIPRDR 


TYP2305 


TYP2319 


TYP3330 


TYP334C 


TYP3350 


VDEVBLOK 


VDEVBDSY 


VDEVCLAS 


VDEVCONT 


VDEVDIAG 


VDEVSFLG 


VDEVSPL 




TDEVST4T 


VDEVTYPC 


VDEVTYPE 


VMBLOK 


VMDVSTRT 


VMPSN 


VMSEG 


VHDSER 


VSPCAM 


VSPCCW 


VSPDPAGE 


VSPLCTL 


VSPSFBLK 




VSPSIZE 


XPAGNOn 


X20a8EHE 


ZEROES 




















EHKDSP 


ASYSVM 


ATTN 


BRING 


CPCREGO 


CPEX 


CPEXADD 


CPEXBLOK 


CPEXBPNT 


CPEXFPNT 


CPEXREGS 


CPEXB10 


CPEXE11 


CPEXSIZE 




CPHICCH 


CPROB 


CPSHRLK 


CPSTATOS 


CPSTAT2 


CPWAIT 


CSW 


CUE 


CO 


CI 


C11 


C13 


C4 




C5 


C6 


C7 


C9 


DEFER 


DMKCFHBK 


DMKCVTBH 


DHKFREE 


DMKFBET 


DHKIOSER 


DMKIOSRC 


BMKPERT 


DMKPTRAN 




DMKPTRFD 


DMKPTRFE 


DHKPTRFP 


DHKPTRRC 


DMKPTBRT 


DMKQCNMT 


DMKSCHDL 


DMKSCHN1 


DMKSCHN2 


DMKSCHBL 


DMKSCNVO 


DHKTRCEX 


DHKTRCIO 




DMKTBCIT 


DHKTRCPG 


DHKDSOFI 


DMKVATAB 


DMKVATBC 


DMKVATEX 


DMKVATHD 


DMKVIOMK 


DMKVMAPS 


DMKVMASH 


ECBLOK 


ERBMSG 


EXNPSH 




EXOPSH 


EXTCRO 


EXTCR2 


EXTCR4 


EXTCR7 


EXTMODE 


EXTPEBAE 


EXTPERCD 


EXTSHCBO 


EXTSHCR1 


FFS 


FO 


Fl 




IDLEIAIT 


IHTEX 


INTEXF 


INTPRL 


INITIO 


lOBBPNT 


lOBCSW 


lOBFLAG 


ICBFPHT 


lOBIRA 


lOBLOK 


lOBPAG 


lOBDSER 




lONPSW 


lONTWAIT 


lOOPSH 


LASTDSER 


MICBLCK 


MICPEND 


MICVIP 


NORET 


PAGEHAIT 


PCI 


PERADD 


PERCODE 


PERMODE 




PGADDR 


PGBLCK 


PGESIZE 


PGPHT 


PRNPSB 


PROBMODE 


PROPSH 


PSA 


QDANTOM 


QDANTUMR 


BUNCSO 


RUNCRI 


RDNPSW 




RONDSER 


RO 


R1 


RIO 


R11 


B12 


R14 


R15 


R2 


B3 


B4 


B5 


R6 




R7 


R8 


R9 


SIGMASK 


TIMER 


TRACCORR 


TRACEND 


TBACFLG2 


TRACSTRT 


TRACOA 


TBACOC 


TRAC10 


TBANMODE 




TREXCR9 


TREXINl 


TREXIH2 


TBEXT 


DC 


VCHADD 


VCHBLOK 


VCHBOSY 


VCHCEDEV 


VCHCEPHD 


VCECOIHT 


VCHCOTBL 


VCBSEL 




VCHSTAT 


VCBTYPE 


VCDADD 


VCUBLOK 


VCUCEPND 


VCOCTCA 


VCODVINT 


VCODVTBL 


VCDINTS 


VCDSHRD 


VCOSTAT 


VCDTYPE 


VDEVADD 




VDEVBLCK 


VDEVCBAH 


7DEVCSW 


VDIVCDE 


VEEVFLAG 


VDEVIHTS 


VDEVPEND 


VDEVPOST 


VDEVSTAT 


VMAEXP 


VMBLOK 


VMCF 


VMCPREAD 




VMCFRDN 


VHCBSTRT 


VHCHTBL 


VHCOMP 


VMCPSAIT 


VMCDSTBT 


VHDSP 


VMDSTAT 


VMDVSTRT 


VMECEXT 


VMESTAT 


VMEXTCM 


VMEXTPND 




VHEXWAIT 


VMFPRS 


TBGPRS 


VMBIPRI 


VHIDLE 


VMINQ 


VMIHVPAG 


VMINVSEG 


VMIOACTV 


VMICINT 


VHIOPND 


VMKILL 


VMLOGOFF 




VHLOPRI 


VMMABDR 


VMHCR6 


VMMFE 


VHMICRO 


VMMNOSK 


VMMPROB 


VMMSHADT 


VMNDCNT 


VMNEHCRO 


VMNORDN 


VMOSTAT 


VMPAGES 




VHPEHD 


VMPEBCM 


VBPERPHE 


VHPGPND 


VMPGPNT 


VMPGHAIT 


VHPNT 


VMPRGIL 


VMPEIDSP 


VMPSTAT 


VMPSW 


VMPSWAIT 


VMPXINT 




VMQLEVEL 


VHQSEND 


VMQSTAT 


VMRON 


VMRSTAT 


VMEDN 


VMSEG 


VMSHADT 


VMSHR 


VMSYSOP 


VMTIDLE 


VMTIMER 


VMTIONT 




VHTLEVEl 


VHTHINQ 


VMTHOOTQ 


VMTON 


VMTPAGE 


VMTSBRIN 


VMTRCTL 


VMTREX 


VMTREXT 


VMTBIO 


VHTBPER 


V.MTRPRG 


VMTRPRV 




7MTRSVC 


VMTSEND 


VHTTIME 


VHVCRO 


VMV370E 


WAIT 


XINTBLOK 


XINTCODE 


XINTMASK 


XINTNEXT 


XIHTSIZE 


XINTSORT 


XEIGHT16 




XTSDICCK 


YO 


Y2 


Y4 


Y6 


ZEROES 
















EMKEDM 


ACORETBL 


ARIOCT 


ARSPPR 


ASYSVH 


CLASDASD 


CLASGRAF 


CLASTERM 


CLASDRI 


CLASDEO 


CONPHT 


COHTASK 


COHTSKSZ 


CORCP 




CORDISA 


CORFLAG 


CORFLUSH 


CORFPNT 


CORFREE 


CORSHARE 


CORSWPNT 


CORTABLE 


CPABEND 


DATE 


DMPCRS 


DMPFPBS 


DMPGPRS 




DHPINREC 


DMPLCORE 


DHPPGMAP 


DMPSYSRV 


DHPTODCK 


ECBLOK 


EDIT 


EXTSIZE 


INTKFLIN 


lOBFPNT 


lOBLOK 


lOBSIZE 


lOERBLOK 




lOERSIZE 


PSA 


RCHADD 


RCHBLOK 


RCHCDTBL 


BCBFIOB 


RCHSIZE 


RCDADD 


RCOBLOK 


RCDDVTBL 


RCDFIOB 


ECDSIZE 


EDEVADD 




RDEVAICB 


BDEVBLOK 


RDEVCON 


RDEVFIOB 


RDEVFLAG 


RDEVIOER 


RDEVOHN 


RDEVPAGE 


RDEVBECS 


RDEVSIZE 


RDEVSPL 


RDEVTYPC 


RECBLOK 




RECPNT 


RECSIZE 


RSPLCTL 


RSPSFBLK 


RSPSIZE 


BO 


R1 


RIO 


R11 


R12 


R13 


Ria 


E15 




R2 


B3 


Ra 


R5 


B6 


R7 


R8 


R9 


SFBLOK 


SFBPHT 


SFBSIZE 


SFBDSER 


SHPTABLE 




SWPVM 


TODATE 


TREXSIZE 


TREXT 


TYP3215 


VCHADD 


VCHBLOK 


VCHCOTBL 


VCHSIZE 


VCONSIZE 


VCUADD 


VCDBLOK 


VCODVTBL 




VCUSIZE 


VOEVADD 


VDEVBLOK 


VDEVCON 


VDEVIOB 


VDEVIOER 


VDEVSIZE 


VDEVSPL 


VDEVTYPC 


VDEVTYPE 


VMBLOK 


VMBSIZE 


VMCHSTRT 




VHCHTBL 


VMCDSTRT 


VMDVSTRT 


VMECEXT 


VMESTAT 


VMEXTCM 


VHPNT 


VMSEG 


VMSIZE 


VMTRCTL 


VMTREXT 


VMDSEB 


VSPLCTL 



VSPSFBLK VSPSIZE 
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DMKEIG 



EMKEHM 



DBKGIO 



CCC CCHCBDV 
IFCC IGBLAME 
BTCCDE5 BO 
Si¥ESBK9 TEHHSYS 



CCHDAV CCEDI CCHLOG80 CCHRCV CCHBEC CCHDSV 

IGTERMSQ IGVALIDB IHTEBCCH lOELPHTR lOERBLOK PSi 

B1 R12 R13 B14 R15 H2 
TIGCCH 



COBPFES 


COHPSEL 


COMPSYS 


CSi 


FFS 


RTCODEO 


RTCCDE1 


FTC0D12 


BTC0DE3 


BTC0DE4 


B3 


Rtt 


R9 


SaVEABEA 


SAVEWRKI 



ALARM BLANKS BRIHG BUFCNT BUFFER 

DMKFHET DMKPTRAH DHKQCHWT DHKSYSRM ERRHSG 

R11 R12 RIB Em B15 

SAVEABEA SAVEBO SAVEE1 SAVEB2 SAVEB3 



DMKFMT 


ATTK 


EOSY 


CAi 




RO 


R1 


RIO 




B7 


R8 


E9 


DMKFBE 


ACOBETEL 


AFBEE 


ASY 



CC 


CE 


CE 


R11 


R12 


B13 


SILI 


SKIP 


SM 



BDFINLTH BDFSIZE 
F2 F255 
B2 R3 
SYSTEM VMBLOK 



CSW 

Ria 

DC 



DEFER DEBET DMKCVTBD DMKEHAOO DHKEHBOO DMKFEEE 

NORET OPERATOR PSA RO Rl RIO 

R4 R5 R6 R7 R8 R9 
XRIGET16 



CDE 
R15 
OE 



AVMREAL BALESAVE CORPGPHT CORTABLE C2 

FREERO FREER1 FREER14 FREER15 FREESAVE Fl F4096 PSA 

B13 Bit B15 R2 R3 R4 R5 R6 
TRACCDRR TRACEND TRACFLGl TRACSTRT TRAC67 XPAGHOM XTNDLOCK 



DE 
R2 



DMKCPE 

RO 

R7 



ICHPSH 
R3 



lOOPSH 
R4 



PROPSH 
B5 



PSA 
R6 



DHKESPHP DMKPTBFE DMKPTEFT DHKSYSRM 

Rl RIO Ell B12 

E8 E9 SAVESIZE TEMPSAVE 



BEIHG 



CLASDASD CLASTAPF CSH 



DEFEB 



DHKCCHTE DMKDSPCH DMKFEEE DMKFEET DMKIOSQV DHKPTRAN DMKSCNVD DMKDNTFE 



DHKONTBN 


IL 


lOBCAW 


I0BCC3 


ICBCSH 


lOBFATAL 


lOBFLAG 


lOBHVC 


ICBIOEB 


ICBIBA 


lOBLIHK 


lOBLOK 


lOBMISC 


I0BMISC2 


IQBSIZE 


lOESTAT 


lOEEBLOK 


lOEECSH 


lOEBDATA 


lOEEEXT 


lOEESIZE 


PSA 


BO 


Rl 


BIO 


Ell 


E12 


B13 


B15 


B2 


B4 


B5 


R6 


B7 


B8 


B9 


SAVEAEEA 


SAVEB2 


UE 


VDEVBLOK 


VDEVBDSY 


VDEVCHAN 


VDEVCSi 


VDEVDED 


VDEVFLAG 


VDEVIOB 


VDEVIOEB 


VDEVPEND 


VDEVPOST 


VDEVSTAT 


VDEVTYPC 


VDEVUC 


VMACTDEV 


VMBLCK 


VHC0M5 


VMEVSTBT 


VMESTAT 


VHEXTCM 


VMEXIAIT 


VHGPES 


VMIOCNT 


VHIOWAIT 


VMLOPEI 


VMPSW 


VMQLEVEL 


7MHSTAI 


























MKGBF ALABM 


ABIODV 


ASYSVM 


ATTN 


BLANKS 


BRIHG 


BOFCNT 


BUFFEB 


BDFINLTH 


BDFSIZE 


CC 


CCC 


CD 


CDC 


CE 


CHC 


CLASGEAF 


CONACTV 


CONADDB 


C0NCCH1 


C0NCCW2 


CCNCCH4 


CCNCNT 


CONDATA 


CONESCP 


CONODTPT 


COHPABH 


COHPST 


COBBESP 


CONEETN 


C0NRSV3 


CONSTAT 


CONSYNC 


COHTASK 


CONTSIZE 


CONTSKSZ 


CPEXADD 


CPEXBLOK 


CPEXBO 


CPEXSIZE 


CPID 


DE 


EEFEB 


DMKBLDVM 


DHKBOXBX 


DMKCFMAT 


DMKCFMBK 


DMKCFMEN 


DHKCNSED 


DMKCPIEM 


EMKCVTBD 


DMKCVTDB 


DMKCVTEB 


DMKDSPCH 


DMKFEEE 


DMKFEET 


DMKIOEEB 


DMKIOEST 


DHKIOSQR 


DMKMSWB 


DHKPTBAN 


DMKQCNCL 


DMKQCNET 


DHKQCNTO 


DMKQCHHT 


DHKBICCH 


DMKSCHBT 


DMKSCHST 


DMKSCNBD 


DMKSCNRD 


DMKSTKCP 


DMKSYSNM 


DMKTBLGE 


DMKTBLUP 


DMKTBMZI 


DMKTEMZO 


EDIT 


FO 


Fl 


F255 


F256 


F3 


FU 


F5 


F8 


IFCC 


INHIBIT 


INTBEQ 


lOBCAB 


lOBCOPY 


lOBCSH 


lOBEBP 


lOBFATAL 


lOEFLAG 


lOBIOEE 


lOBIRA 


lOBLINK 


lOBLOK 


lOBMISC 


lOBEADD 


lOBECHT 


lOBSEHS 


lOBSIZE 


lOBSPEC 


lOBSTAT 


lOBDNSL 


lOBDSER 


lOEEBLOK 


lOEECSH 


lOEBDATA 


lOEREXT 


I0EEFLG3 


lOEENUM 


lOEROVFL 


lOEBEEAD 


lOEBSIZE 


LOGDBOP 


LOGHCLD 


SOBET 


HOTIME 


PBGC 


PEIOBITY 


PBTC 


PSA 


BCDBLOK 


BCDDVTBI 


RDEVACTV 


BDEVAIOE 


EDEVAIEA 


EDEVAPLP 


BDEVBLOK 


EDEVCON 


RDEVCORD 


BDEVCPHA 


BDEVCTL 


BDEVCDA 


BDEVDED 


BDEVDISA 


BDEVDISB 


RDEVENAB 


BDEVFLAG 


EDEVBIO 


BDEVHOLD 


EDEVIOER 


BDEVLOG 


RDEVMOEE 


BDEVBEAD 


BEEVBDN 


BDEVSTAT 


BDEVTFLG 


BDEVTMCD 


BDEVTEQ 


RDEVTYPC 


BDEVTYPE 


BDEVDSEE 


BO 


Rl 


BIO 


R11 


B12 


B13 


Em 


B15 


B2 


B3 


R4 


R5 


E6 


E7 


R8 


B9 


SAVEAREA 


SAVEBO 


SAVEB2 


SILI 


SYSTEM 


TEMPSAVE 


TBQBIBA 


TRQBLOK 


TEQBSIZE 


TBQBDSEB 


TBQBVAL 


TYP3066 


TYP3277 


TYP3284 


DC 


DCASE 


DE 


VCONCIL 


VCONBBSZ 


VCONBBDF 


VCCHRCNT 


VDEVBLOK 


VDIVCON 


VMBLOK 


VMCF 


VMCFHAIT 


VMDVSTRT 


VMGENIO 


VMLOGCFF 


VMLOGOS 


VMMCPENV 


VMMLEVEL 


VHMLINED 


VMOSTAT 


VMPA2APL 


VMPFUNC 


VMPXINT 


VMQSTAT 


VMBSTAT 


VMSYSOP 


VMTLEND 


VMTTIME 


VMVTERM 


XINTBLOK 


XINTCODE 


XINTNEXT 


XINTSIZE 


XINTSOET 


XTNDLOCK 


ZEROES 
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Module External References (Labels and Modules) 



EMKHVC BLANKS 


BRING 


CCC 


CDC 


CE 


CHC 


CLASGBAF 


CLASTERM 


CPUID 


DE 


DEFEB 


DBKCCSfTC 


DMKCCHTR 


DMKCFGCL 


DMKCFHBK 


DMKCFMEN 


EMKCVTDT 


DMKEGDDK 


DMKDSPCH 


DMKFREE 


DMKFRET 


DMKGIOEX 


DMKHVDAL 


DMKPGSSS 


DMKPBGSM 


DMKPSASP 


DHKPTRAN 


DHKSCHVO 


DMKTMRPT 


DMKONTFR 


DMKVIOEX 


F1 


F16 


F256 


Ft 


F4095 


F60 


IFCC 


IL 


lOBCaW 


lOBCSW 


lOBLOK 


lOBRADD 


lOBSIZE 


NICBLOK 


NICGBAF 


NICSIZE 


NICTYPE 


PCI 


PBGC 


PRTC 


PSA 


RCWADDE 


RCWCCH 


RCWCTL 


ECWPNT 


RCWTASK 


RDEVBLOK 


RDEVNICL 


RDEVTYPC 


RDEVTYPE 


RO 


El 


RIO 


R11 


R12 


R13 


RIU 


R15 


R2 


B3 


m 


B5 


R6 


R7 


R8 


R9 


TEMPR6 


TEHEB8 


TYPBSC 


TYP3277 


UC 


UE 


VDEVBLOK 


VDEVIOB 


VMBLOK 


VMCF 


VMCFWAIT 


VMCOMND 


VMDVSTBT 


VMESTAT 


VMEXTCM 


VMEXWAIT 


VMGPRS 


VMINST 


VMICHAIT 


VMHCODE 


VMMLEVEL 


VMMTEXT 


VMNOTRAN 


V MO STAT 


VMPA2APL 


VMPBIESP 


VMPSTAT 


VHPSH 


VMQSTAT 


VMESTAT 


VMSLEEP 


VMSTOR 


VMTERM 


VMTRMID 


VMTTIME 


VMVIRCF 


VMHSCHG 


XPAGNDM 






DMKHVD ACCTACMO 


ACCTBLOK 


ACCTDIST 


ACCTLENG 


ACCTDSEB 


ACNTBLOK 


ACNTCODE 


ACNTDATA 


ACNTNUM 


ACHTSIZE 


ACNTDSER 


BRING 


CLASGRAF 


CLASSPEC 


CLASTERM 


CLASDRI 


CLASURO 


CPDHCELL 


CPDVERSN 


DEFER 


DMKACOQO 


DMKCPEID 


DHKCPVAA 


DMKCVIDB 


DMKDBDER 


DMKDRDMP 


DMKDEDSY 


DMKFREE 


DMKFRET 


DMKIOEFM 


DMKPSASP 


DMKPTRAN 


DMKRPAGT 


DMKSCNRO 


DKKSCNVD 


DHKSCNVU 


DMKSNCP 


EMKSYSER 


DMKSYSRM 


DMKDDRDS 


DMKDDRFU 


DMKODRSD 


DHKODREV 


FFS 


FTB35ME 


F256 


F3 


fH 


Fiogs 


F4096 


F60 


F8 


IPDADDE 


HICBLOK 


NICGRAF 


NICLLEN 


NICSIZE 


NICTYPE 


PSA 


BDEVBLOK 


RDEVCODE 


RDEVFTB 


BDEVLLEN 


RDEVMEL 


RDEVNICL 


RDEVTYPC 


RDEVTYPE 


RO 


R1 


R10 


Ell 


E13 


E14 


R15 


R2 


B3 


R4 


R5 


R6 


R7 


R8 


R9 


SAVEAREA 


SAVERO 


SYSIPLDV 


TYPBSC 


TYP2305 


TYP2319 


TYP3210 


TYP3277 


TYP3330 


TYP33ilO 


TYP3350 


DDBFBLOK 


UDBFSIZE 


ODEFVADD 


ODIBBLOK 


DDIRDISP 


DDIRHSER 


DMACACCT 


UMACBLOK 


VDEVBLOK 


VEEVEED 


VDEVREAL 


VDEVSTAT 


VDEVTYPC 


VDEVTYPI 


VMACCOUN 


VMACCDHT 


VMBLOK 


VMCLASSA 


VHCLASSB 


VMCLASSC 


VMCLASSE 


VHCLASSF 


VMCLEVEL 


VMDVSTRT 


VMESTAT 


VMEXTCM 


VMGPRS 


VMINST 


VMPA2APL 


VMPSTAT 


VMPSH 


VMQSTAT 


VMTERM 


VMTBHID 


VMOSEB 


VMVTIRM 


XPAGNDM 


XRIGBT24 


X20a8BND 

























DMKIOC CLASDASD CLASTERM OBBDEVSH OBRDEVTN OERBECN OBRSHOBR OBRSWSN PSA 
RDEVCUA RDEVMDL EDEVSADN RDEVTMCD RDEVTYPC RDEVTYPE RO R12 
R9 SAVEAREA TYP2305 TYP2311 TYP3330 ZEROES 



RCDBLOK RCDTYPE RC02701 RCD2702 RDEVBLOK 
R13 R4 B5 B6 R8 



DMKIOE 



(-n 



CCC 

CPEXREGS 

DMKICFST 

ERRIOER 

F7 

lOEBELOK 

IRMBLOK 

OBBCSWN 

OBRSHSN 

RDEVBDl 

R2 

SDECTES 

TYP3330 

X0BET3 



CDC 

CPEXSIZE 

DMKIOFVR 

ERBKEY 

F8 

lOEBCEMD 

IRMBYT1 

CBBCUAIN 

OBRTAPSN 

RDEVSEB 

R3 

SDBFLAGS 

TYP3340 

XOBB010 



CLASDASE 

CPDID 

DMKI0GF1 

ERRMIOB 

IFCC 

lOEECSW 

IRMBYT2 

OBBCOAPE 

OBRDRSNS 

RDEVSTAT 

RU 

SDRLNGTH 

TYP3350 

XOBR150 



CLASGRAF 

DMKCCHRT 

DMKI0GF2 

ERRMIOER 

lOBCP 

lOERDATA 

IRMFLG 

OBRDDCHT 

OBRVOLN 

RDEVTYPC 

R5 

SDRSBRT 

TYP3ai0 

XOBE180 



CLASSPEC 

DMKCFMBK 

DMKQCNWT 

EERPAEM 

lOBFATAL 

lOEREXT 

lEMLHT 

OBRFCCHN 

0BR3211S 

RDEVTYPE 

E6 

TNSCPIDN 

TYP3a20 

X0BR512 



CLASTAPE 

DMKCFPEB 

DMKSTKCP 

ERRSDR 

lOBFLAG 

I0EBFLG2 

IBMLMTCT 

OBRHAN 

0BB33SNS 

RO 

E7 

TNSDEVAD 

TYP3505 

ZEROES 



CLASTERM 

DMKDSPCB 

DHKSYSTZ 

ERR SIZE 

lOBHVC 

lOERLEN 

IRMMAXCT 

OBRKEYN 

OER3420S 

R1 

R8 

TNSKEYN 

DC 



C0NCCH3 

DMKFREE 

EERBLOK 

ERRVOLID 

lOBIOER 

lOERPHT 

IRMOR 

OBRLSKN 

PSA 

BIO 

B9 

TNSREC 

VMBLOK 



CCNDATA 

DMKFRET 

EERCCNT 

FTREXTSN 

lOBLOK 

lOEESIZE 

IRMRLADD 

CBRPGMN 

RDEVBLOK 

R11 

SAVEAREA 

TNSSNSI 

VMCLASSF 



CCNDCNT 

DMKI0FC1 

ERRCCH 

F1 

lOBBADD 

lOERVSER 

IRMSIZE 

OBBEECN 

RDEVCTRS 

R12 

SAVEREGS 

TNSSHS3 

VMCLEVEL 



CPEXADD 

DMKIOFIN 

ERRCORR 

no 

lOBSTAT 

IRMAND 

NORET 

OEBSDRCT 

RDEVFTR 

E13 

SAVER1 

TNSVOLID 

VMUSEE 



CPEXBLOK 

EMKI0FM1 

ERRHEADR 

F255 

lOBDSER 

IBHBITl 

OBECOBL 

OBESENSN 

RDEVIOEE 

R14 

SDRBLOK 

TYP2305 

XOBRFLAG 



CPEXFPNT 

DMKIOFOB 

EEEIOB 

F4 

lOEEADR 

IRHBIT2 

OBRCPIDN 

OBESNSCT 

BDEVIRM 

R15 

SDHBSIZE 

TYP3211 

X0BRT1 
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DMKIOF BBIHG 


CDC 


CLASDASE 


CLASGRAF 


CLASSPEC 


CLASTAPE 


CLASTERB 


CLASDRI 


CLASURO 


CPEXBLOK 


CPEXFPNT 


CPEXREGS 


CPEXR6 


CPEXSIZE 


CPDID 


CPOVERSN 


DEFER 


DBKEHHSG 


DMKFREE 


DBKFRET 


DMKIOCVT 


DKKICECQ 


DBKIOEES 


EBKIOEIQ 


BBKIOEBP 


DBKIOEMQ 


DHKICEKS 


DHKICEMX 


DMKIOESI 


EBKIOENQ 


DBKICEOP 


DBKIOERP 


DBKIOERQ 


DBKIOESQ 


DBKIOEVQ 


DBKPGTVG 


DHKPGTVR 


DBKPTRAN 


DBKPTRDL 


DHKHEAGT 


DBKHPAPT 


DBKSTKCP 


ERRBLOK 


ERRCCNT 


ERRCCH 


ERRCCNT 


EEECORR 


ERRIOB 


ERBICEE 


ERRKEY 


ERRMIOB 


ERRBIOER 


ERSPARH 


ERHSDR 


ERRVOLID 


FFS 


FTREXTSN 


F15 


F255 


Fa 


F7 


lOBFATAL 


lOEEADR 


lOERBLOK 


lOERCSW 


lOEBDATA 


lOEBEXT 


I0ERFLG3 


lOERLEN 


lOEROVFL 


lOERPNT 


lOERREAD 


lOERVSER 


LOCK 


OEHCCRL 


CBRCPIDH 


OBRCSHN 


OBRCUAIN 


OBRCUAPR 


OBRDDCNT 


OBRDEVTH 


OBRFCCWH 


OBBHAH 


OBRIOETY 


OBEKEYN 


OBRLSKN 


OBRPGBN 


OBRRECN 


OBRSDRCT 


OBRSDRSH 


OBRSHOBR 


OBRSHSCT 


OBRSSDRl 


GBRSWSS 


OBRTEBP 


OBRVOLH 


OBR33SNS 


PSA 


RCDBLOK 


RCUTYPE 


RCU2701 


BCn2702 


RDEVBLOK 


RDEVCTRS 


RDEVCUA 


RDEVFTR 


RDEVBDL 


RDEVSADN 


RDEVTBCD 


RDEVTYPC 


RDEVTYPE 


HECCCPD 


RECFLAG1 


RECNXT 


R EC PAG 


RECPAGFL 


RECPAGIU 


RO 


B1 


RIO 


Ell 


R12 


H13 


R14 


R15 


R2 


R3 


RU 


R5 


R6 


R7 


R8 


R9 


SAVEAREA 


SDRELCK 


SDRCTRS 


SDRCUA 


SDRFLAGS 


SDRFLCT 


SDELHGTH 


SDRBAX 


SDROVFWK 


SDEPRBCT 


SDRRDEV 


SDESHRT 


SDRSIZF 


SDRSIZE1 


SYSTEB 


TNSCPIDH 


TUSDEVAD 


TNSKEYN 


TNSREC 


TNSSNS1 


THSSHS3 


TNSVOLID 


TYPTTY 


TYP1050 


TYP1403 


TYP1U43 


TYP2305 


TYP2311 


TYP2501 


TYP2520H 


TYP25aOR 


TYP2700 


TYP27'H 


TYP3066 


TYP3210 


TYP3211 


TYP3330 


TYP3340 


TYP3350 


TYP3410 


TYP3420 


TYP3505 


VBBLOK 


VBUSER 


XOBRFLAG 


X0BRT1 


X0BRT3 


XOBR010 


XOER150 


XOBB180 


X0BB512 


ZEROES 






















EBKIOG ARIOCH 


ARIOCT 


BRIHG 


CHANID 


CPEXSIZE 


CPUID 


CPUBCELL 


CPUflODEL 


CPDVEESH 


DEFER 


DBKCCHCF 


DBKCCHBX 


DBKCCHSZ 


DMKCCH60 


DBKEIG80 


DHKERBSG 


DBKFHEE 


DBKIOEIS 


DMKIOEBP 


DHKIOEBS 


DBKIOEBX 


DBKIOENI 


DBKIOEOP 


DBKBCHAR 


DBKBCHBL 


DBKBCHRD 


DHKPGTVG 


DMKPGTVR 


DBKPTRAN 


DBKRPAGT 


DMKRPAPT 


DBKSCHED 


DHKSEV70 


DBKSIX60 


DBKSYSER 


ECSMLOG 


F7 


lOELPNTR 


LOCK 


MCDAMLEN 


MCHAREA 


BCHFIX 


BCHHODEL 


BCHESS 


BODEFLAG 


BODEL135 


B0DEL145 


MODEL 155 


BODEL158 


B0DEL165 


BODEL168 


BODEQDIT 


NOMODEl 


PSA 


RCHBLOK 


RCHTYPE 


RCH370 


RDEVBLOK 


RDEVCODE 


RDEVTYPE 


RECCCPD 


RECFLAG1 


BECFLAG2 


RECNXT 


RECPAG 


RECPAGFL 


RECPAGFM 


RECPAGFR 


RECPAGIU 


RO 


B1 


RIO 


R11 


R12 


R13 


Rm 


R15 


R2 


R3 


m 


R5 


R6 


R8 


R9 


SAVEAREA 


SAVE REGS 


SAVEHRK2 


SAVEWRK3 


SAV1HRK7 


SYSIPLDV 


SYSTEB 


TYP2305 


TYP3330 


TYP33aO 


TYP3350 


VBBICK 


HAIT 
















DMKIOS ADSPCH 


ASYSVH 


ATTH 


BUSY 


CAM 


CC 


CCC 


CDC 


CE 


CHC 


CLASDASE 


CLASGRAF 


CLASSPEC 


CLASTAPE 


CLASTERM 


CLASDRI 


CLASDRO 


CPCEEGO 


CPCBEG8 


CPEXAED 


CPEXBLOK 


CEEXE13 


CPEXSIZE 


CPSTATUS 


CPHAIT 


CSH 


CUE 


CO 


C8 


DE 


DBKBSCEE 


DBKCCHIS 


DBKCCHNT 


DBKCNSIN 


DBKDASER 


DMKDASRD 


DBKDSPCH 


DBKFREE 


DBKFRET 


DHKGRPIN 


DMKIOERR 


DBKEGAIN 


DBKRNHIN 


DBKRSPER 


DHKRSPEX 


DBKSCHDL 


DBKSCNEU 


DBKSTKCP 


DBKSTKIO 


EBKTAPER 


DBKTRCSI 


DBKVIOIN 


FTRRPS 


FO 


F1 


IFCC 


IL 


IHTBEQ 


IHTTIO 


lOBBPKT 


lOBCAW 


I0BCC1 


I0BCC2 


I0BCC3 


lOECP 


lOBCSS 


IGBCYL 


lOBERP 


lOBFATAL 


lOBFLAG 


lOBFPNT 


lOBHIO 


lOBHVC 


ICBIOER 


lOEIRA 


lOELIMK 


lOBLOK 


lOBPAG 


lOBRAED 


lOBRCAW 


lOBRELCO 


lOBRES 


lOERSTET 


lOBSIOF 


lOBSIZE 


lOBSNSIO 


lOBSPEC 


lOBSPLT 


lOBSTAT 


lOBTIO 


lOEUC 


lOBUSSL 


lOBUSER 


IGEVAEE 


lOERBLOK 


lOERCCH 


lOERCSW 


lOERDATA 


lOEREXT 


lOERLEN 


lOEBSIZE 


lOOPSH 


flSCLSEEK 


MNCOCYL 


PCI 


PRGC 


PRTC 


PSA 


QUAUTDBR 


HCHADD 


RCHBLOK 


RCHEBX 


RCHBUSY 


RCHDISA 


RCHFIOB 


RCHBPX 


RCHQCNT 


RCHSEL 


HCHSTAT 


RCHTYPE 


RCH370 


RCUADD 


RCUBLOK 


RCUBUSY 


RCUCHA 


RCUDISA 


RCUFIOB 


BCOPRIBE 


RCUQCNT 


RCDSCED 


RCUSHRD 


RCOSTAT 


RCDSUB 


RCUTYPE 


RDEVADD 


BDEVAIOE 


RDEVATT 


RDEVBLOK 


RDEVBDCH 


RDEVBUSY 


RDEVCOSC 


RDEVCUA 


REEVCYL 


RDEVDED 


EDEVEISA 


RDEVFIOE 


RDEVFLAG 


RDEVFTR 


RDEVIOCT 


RDEVIOER 


RDEVLIOB 


RDEVQCNT 


RDEVRACT 


RDEVSCED 


RDEVSKUP 


RDEVSTAT 


RDEVSTA2 


RDEVTYPC 


RDEVTYPE 


RDEVUSER 


RUNUSER 


RO 


R1 


RIO 


R11 


R12 


H13 


R14 


fi15 


R2 


R3 


R4 


R5 


R6 


E7 


H8 


R9 


SAVEAREA 


SAVER 11 


SILI 


SKIP 


SB 


TEHPR14 


TIBER 


TRACBEI 


TRACCURR 


TRACEND 


TRACFLG1 


TRACFLG2 


IRACSTRT 


TRAC05 


TYPESC 


TYPCTCA 


UC 


VDEVBLOK 


VDEVIOCT 


VDEVREAL 


VBBLOK 


VHESTAT 


VBEXTCM 


VBFPRS 


VHGPRS 


VBIDLE 


VMIOWAIT 


VBPSW 


VMRSTAT 


VBTBODTQ 


VMTRCTL 


VHTRSIO 


VBTTIBE 


YO 


Y2 


Y4 


Y6 
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EMKISH CD DMKFREE DMKPTRAH DHKPTEOL DHKOMTIS F16 

lOBMISC PSA BCHCCHT BCWCCH BCHIC BCWPNT 

R12 B13 Bit* B15 B2 R3 
VHBLOK 



F2 


F4 


F8 


IDA 


I0BCA8 


lOBIEA 


lOBLOK 


BCWRCNT 


BCHTASK 


RCWVCAW 


BO 


R1 


BIO 


R11 


B4 


B5 


B6 


B7 


B8 


B9 


SAVEABEA 



CO 



DHKLDOO DMKCPE 


DHKPSA 


DHKWBH 


BO 


R1 


RIO 


B12 


B13 


R1U 


R15 


R2 


R3 


m 


R5 


B6 


B7 


B8 


R9 


















DHKLNK BLANKS 


BUFFER 


BDFINLTH 


BUFNXT 


BOFSIZE 


CLASDASD 


DBKCVTBD 


DBKCVTBH 


DBKCVTHB 


DMKEPSWD 


DMKERMSG 


DBKFREE 


DBKFRET 


DHKLOCK 


DHKLCCKD 


DHKQCHBD 


DMKQCHWT 


DMKSCHAD 


DBKSCHFD 


DBKSCNLI 


DMKSCNVN 


DBKSCNVS 


DBKSCNVD 


DMKUDBFD 


EBKOEBFO 


DBKDDRRV 


DMKVDREL 


DMKVDSLK 


EDIT 


EBBHSG 


FFS 


FTB2311E 


FTB2311T 


F1 


F15 


F2 


F4095 


F7 


F8 


INHIBIT 


HORET 


PSA 


RDEVBLOK 


RDEVTYPC 


RDEVTYPE 


RO 


R1 


RIO 


R11 


R12 


R13 


B14 


R15 


R2 


R3 


R4 


R5 


R6 


R7 


R8 


B9 


SAVEABEA 


SAVERETN 


SAVEB11 


SAVER 2 


SAVEHBKl 


SAVEWRK2 


SAVEHRKt 


SAVEWBK5 


SAVEBBK6 


SAVEWRK7 


SAVEHHK8 


SAVEWRK9 


TyP2311 


TYP23ia 


DCASE 


DDBFBLOK 


DDBFSIZE 


DDBFVADD 


DDEVADD 


DDEVBLOK 


DDZVDED 


DDEVDISP 


DDEVFTR 


DDEVLINK 


DDEVLKDV 


ODEVLKID 


DDEVLM 


UDEVLONG 


DDEVLB 


DDEVLW 


ODEVMODE 


DDEVPASR 


UDEVR 


DDEVBELN 


ODEVSTAT 


ODEVTDSK 


DDEVTYPC 


DDEVTYPE 


DDEVVSER 


DDEVW 


DDIRBLOK 


DDIBDISP 


VCHBLOK 


VCHDED 


VCHSTAT 


VDEVBLOK 


VDIVFLAG 


VDEVRDO 


VDEVREAL 


VDEVRELN 


VDEVTYPC 


VDEVTYPE 


VDEVDSER 


VBBLOK 


VBCOBHD 


VBKILL 


VMLOGON 


VMOSTAT 


VHPSWDCT 


VMBSTAT 


VHDSER 


VBVIRCF 


ZEROES 














DMKLOC ASYSLC 


BALRSAVE 


BALR14 


CPIXADD 


CPEXBLOK 


CPEXFPNT 


CPEXREGS 


CPEXSIZE 


DBKDSPCH 


DMKFREE 


DBKFRET 


DBKSTKCP 


DBKSYSLB 


LOCKBLOK 


LOCKNAME 


LOCKNEXT 


LOCKQUE 


LOCKSIZE 


PSA 


RO 


B1 


RIO 


R12 


B14 


R15 


R2 


B3 


B4 


R5 


B6 


R7 


B8 


B9 


SYSLOCS 












DHKLOG ABICDC 


ABIODV 


ASYSLC 


ASYSOP 


ASYSVM 


BLANKS 


BDFCNT 


BUFFER 


BUFNXT 


BUFSIZE 


CLASDASD 


CLASSPEC 


CLASTERB 


CPMICAVL 


CPSTAT2 


DHKACON 


DMKBLDEC 


DMKBIDRT 


DBKBLDVB 


DBKCFGII 


DHKCQRFI 


DHKCVTBD 


DBKCVTBH 


DMKCVTDT 


DMKEPSWD 


DBKERBSG 


DHKFEEE 


DKKFBET 


DHKIHKSE 


DHKQC8SY 


DMKQCHHT 


DMKSCHDL 


DBKSCHBT 


DMKSCH8Q 


DHKSCNAD 


DMKSCNFD 


DBKSCNRD 


DBKSCHBD 


DBKSCNVD 


DMKSCNTN 


DMKSCNVO 


DHKSYSCK 


DHKSYSDT 


DMKSYSDW 


DBKSYSLG 


DBKSYSLi 


DBKSYSBA 


DBKSYSBD 


DHKSYSNB 


DMKSYSTI 


DMKSYSTM 


DHKODRFO 


DBKUDBBD 


DMKODBBV 


DHKDSOFF 


DHKVDSAT 


DBKVDSDF 


FFS 


F1 


F2U0 


F4095 


F7 


F8 


INHIBIT 


lOBLOK 


lOBDSEB 


MICBLOK 


HICCBEG 


MICRSEG 


MICSIZE 


BICVPSi 


BICBOBK 


NERPAGES 


NEWSEGS 


NICBLOK 


NICFLAG 


NICPSDP 


NICSIZE 


NICUSER 


NOBET 


OPERATOR 


PSA 


RDEVADD 


BDEVAIOE 


RDEVBLOK 


BDEVDED 


RDEVDISA 


RDEVFLAG 


RDEVNICL 


BDEVOWN 


RDEVPSDP 


RDEV5EB 


BDEVSIZE 


BDEVSTAT 


HDEVSYS 


RDEVTYPC 


RDEVTYPE 


RDEVDSER 


RDNQSER 


RO 


R1 


BIO 


B11 


R12 


R13 


B14 


B15 


R2 


R3 


B4 


R5 


R6 


R7 


R8 


R9 


SAVEABEA 


SAVERETN 


SAVEB11 


SAVEB2 


SAVEB9 


SAVEiRKI 


SAVEHRK2 


SAVEHRK8 


SYSLOCS 


TEBPSAVE 


TEQBIBA 


TRQBLOK 


THQBSIZE 


TRQBDSER 


TYPBSC 


TYP1052 


TYP2305 


DDBFBLOK 


DDBFSIZE 


DDBFVADD 


DDEVADD 


DDEVBLOK 


ODEVDED 


DDEVDISP 


DDEVLINK 


DDEVLKDV 


ODEVLKID 


ODEVLONG 


DDEVHODE 


DDEVSIZE 


UDBVSTAT 


DDEVTDSK 


DDEVTYPC 


DDEVTYPE 


ODEVVSEB 


DDIRBLOK 


DEIBDISP 


DDIRPASS 


DDIRDSER 


DMACACC 


UMACACCT 


UHACBLOK 


DHACBHX 


UMACCDEL 


DMACCLA 


OMACCLEV 


DMACCORE 


DMACDIST 


DBACDVCT 


DHACECOP 


UBACES 


DMACIPL 


DBACISAM 


UMACLDEL 


DMACLEND 


DMACNSVC 


DHACOPT 


DHACPRIR 


DMACBT 


DMACVROP 


VCHADD 


VCHBLOK 


VCHSIZE 


VCONCTL 


VCONRBSZ 


VCONRBOF 


VCONRCNT 


VCDADD 


VCOBIOK 


VCDSIZE 


VDE7ADD 


VDEVADCR 


VDEVBLOK 


VDEVCFLG 


VDEVCON 


VDEVSIZE 


VBACCOOH 


VMACHT 


VMACODHT 


VMBLOK 


7MBSIZE 


?MCF 


VHCFREAD 
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VDEVFLAG 


VHBLOK 


VHTTIME 


VBOSER 


X40FFS 
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Module External References (Labels and Modules) 



EHKOPS iLARH CiW CC CD CIASGBAF CPDID CPDVEBSN CSH 
BDEVBIOK BDBVCOBD BDEVTIPC BDEVTYPE BO B1 RIO Rm 
B8 Sill TYP3066 DC XRIGBT16 



DHKRIOCK DHKBIODV FES 
B15 R2 R3 



NOADTO 
R4 



PSA 
R5 



EHKPAG ACORETBL ALARM ABIODV CC 

CPEXB7 DMKCVTBH DMKDSPCH DMKFREE 

DMKSYSOH FTB70MB F1 F2 

lOBCYL lOBFATAL lOEFLAG lOBFPNT 

OWNDBDEV PAGELOAD PAGEBATE PAGEWAIT 

RIO R11 R12 R13 

B9 SILI SKIP SHPCODE 

VMBLOK VMTTIME XTHDLOCK 



CCBTABLE 


CPEXADD 


CPEXBLOK 


CPEXBPNT 


CPEXFPNT 


CPEXMIS( 


DMKFBET 


DMKIOSQH 


DMKOPRWT 


DMKPTRFF 


DMKPTBBQ 


DMKPTBS: 


F3 


Ft» 


F5 


F8 


IL 


ICEBPNT 


lOBIRA 


lOBLOK 


lOBMISC 


lOBPAG 


lOBEADD 


lOBSIZE 


PGSRATIO 


PGWAITPG 


PSA 


RDEVBLOK 


BDEVFTE 


BDEVMDL 


B14 


B15 


R2 


R3 


Ba 


B5 


SHPCYL 


SiPDPAGE 


SHPFLAG 


SSPTRANS 


TYP2305 


TYP2314 



?EXB0 CPEXE11 CPEXB5 

DMKPTBSS DMKPTBSQ DMKSCNED DMKSTKCP 

lOBCAW lOBCP lOBCSW 

lOBSTAT lOBOSER OHMDLIST 

BDEVTYPE BO El 

B6 R7 R8 

TYP3330 TYP33I40 TYP3350 



DHKPER 
EMKPGS 



VMBLOK VMPEHD VMPERPNE VMTRCTL VMTBPEB 



ACORETBL 

DELPAGES 

F15 

B1 

E9 

SHBBPNT 

SHPTABLE 

VMBLOK 

VHSIZE 



ASYSVM 

EHKBLDBL 

F4 

BIO 

SAVEABEA 

SHBFPNT 

SWPVB 

VMESTAT 

VHSTCB 



AVMBEAL 

DMKBLDBT 

Fa096 

Ell 

SAVEE1 

SHENAME 

SWPVPAGE 

VMINVPAG 

VMTIMEB 



COEBPNT 

DMKDSPHP 

F8 

R13 

SAVER2 

SHRSEGCT 

TEEXAHSI 

VMLOGOFF 

VMTBEXT 



COBCFLCK 

DMKFBET 

KEEPSEGS 

SAVEWBK1 

SHBSEGNM 

TBEXIN1 

VMNSHE 

XPAGNDM 



CCBFLAG 

DMKPGTPE 

HEiPAGES 

B15 

SAVEliEK2 

SBBTABLE 

TBEXNSI 

VMOSTAT 



COBFPHT 

DMKPTBAH 

HEHSEGS 

B2 

SAVEHBK3 

SHBTSIZE 

TBEXT 

VMPAGES 



COBIOLCK 

DMKPTEFT 

OLDVMSEG 

B3 

SAVEBBK4 

SHEOSECT 

VHABLOK 

VMPGWAIT 



CCBPGPNT 
DMKPTEPW 
PAGCOEE 

SAVEWBK7 
SWPCYL 
VHADSTOP 
VMPSTAT 



COBBSV 

DMKPTBBC 

PAGIHVAL 

E5 

SAVENBK9 

SHPFLAG 

VMAFPNT 

VMESTAT 



COBSBABE 

DMKPTESC 

PAGEEF 

R6 

SEGPAGE 

SHPKEY1 

VMAHAHE 

VMSEG 



COETABLE 

FFS 

PSA 

S7 

SEGPLEN 

SWPEECMP 

VHASIZE 

VMSHE 



DEFEE 

FO 

BO 

E8 

SEGTABLE 

SHPSHE 

VMASSIST 

VMSHRSYS 



EMKPGT 



ALABH 



ALOCBLOK ALOCMAP ALOCMAX ALOCDSED ABIODV 



ASYSVM 



EALRSAVE BALRO 



BALE1 



BALES 



CPIXADD CPEXBLOK 



CO 

cn 



CPEXSIZE CPID 



DMKCKP DMKDSPCH DHKFBEE DHKFRET DMKQCNWT DMKSTKCP DHKSYSOM FFS 



FTR70MB F1 



F3 



F4 


lOBCYL 


lOBFPHT 


lOBLOK 


HOBET 


OPEEATOE 


OWHDLIST 


OWNDRDEV 


PSA 


RDEVALLN 


BDEVBLOK 


BDEVCODE 


EDEVCYL 


BDEVFIOB 


EDEVFLAG 


BDEVFTE 


EDEVPAGE 


EDEVPST 


BDEVPEEF 


RDEVRECS 


BDEVTYPE 


RECBLOK 


BECCYL 


EECMAP 


BECMAX 


EECPNT 


EECSIZE 


BECDSED 


BO 


El 


E10 


Ell 


R12 


B13 


R14 


E15 


B2 


R3 


EU 


B5 


E6 


B7 


E8 


E9 


SWPCYL 


SWPDPAGE 


SWPFLAG 


SWPRECMP 


TYP2305 


TYP2314 


TYP3330 


TYP33aO 


TYP3350 


VMBLOK 


VMPDISK 


VMPDBOM 




















EMKPEG BEING 


CPABEND 


CPCBEGO 


CPCEEG8 


CO 


C8 


DEFEB 


DMKCFMBK 


DMKDMPDK 


DMKDMPGE 


DMKDSPB 


DMKDSPCH 


DMKPEEIL 


DMKPBVLG 


DMKPTBAH 


DMKQCHWT 


BMKTBCPG 


DMKVATPF 


DMKVATPX 


DMKVATSX 


ECBLOK 


EXTPEBAD 


EXTPEECD 


FFS 


F1 


INTPE 


INTPEL 


INTSVCL 


MONCLASS 


MDNCODE 


NOEET 


PEBADD 


PEECODE 


PBHPSW 


PBOBMCDE 


PBOPSW 


PSA 


QUANTDME 


EDNOSEE 


BO 


B1 


E10 


B11 


E12 


B13 


B14 


B15 


R2 


E3 


Ba 


B5 


E6 


B7 


B8 


B9 


SVCNPSW 


SVCOPSW 


TEMPR14 


TEMPB15 


TIMEB 


TEACCDBB 


TEACEND 


TBACFLG1 


TEACSTET 


TEAC03 


TEAMMODE 


TBEXADD 


TBEXINTC 


TEEXINTL 


TEEXPEBA 


TBEXPERC 


TBEXPSW 


TBEXT 


VMBLOK 


VMCFBDN 


VMCFWAIT 


VMECEXT 


VMESTAT 


VMEXTCB 


VMEXWAIT 


VMFPES 


VMGPBS 


VMIOPHE 


VM 10 WAIT 


VMOSTAT 


VMPAGEX 


VHPEHD 


VMPEECM 


VMPEBPHD 


VMPBGIL 


VMPBGPND 


VMPSTAT 


VMPSW 


VMESTAT 


VMSHADT 


VMSVCPND 


VMTMOOTQ 


VMTBBBIN 


VMTBCTL 


VMTBEXT 


VMTEPEE 


VMTBPRG 


VMTTIME 


VMV370B 


YO 


Y2 


YH 


Y6 
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Hodule External Beferences (Labels and Hodules) 



EMKPRV BRING 


CHAN ID 


CPCREGG 


CPDID 


CPDBCEIL 


CPUVERSB 


CO 


CI 


DEFER 


DMKDSPA 


EBKDSPB 


DBKESPCH 


DBKHVCAL 


DHKPESIL 


DHKPfiGSM 


DMKPSAFP 


EMKPSASP 


DMKPTHAN 


DBKTBRTN 


DBKTRCPB 


DBKTRCPV 


DBKVATAB 


DBKVATEX 


DBKVATLA 


DBKVATEN 


DBKVIOEX 


ECBLOK 


EXTCRO 


EXTCR9 


EXTMODE 


EXTPERAD 


EXTSHCBO 


FFS 


F15 


F16 


F240 


pa 


F5 


F6 


F60 


F7 


INTPR 


INTPRL 


MNCLIHST 


BBCOSIB 


PEHGPBS 


PERSALT 


PROBBODE 


PROPSW 


PSA 


RUNCRO 


RO 


B1 


RIO 


R11 


R12 


R13 


Rm 


R15 


R2 


R3 


R4 


B5 


R6 


R7 


R8 


R9 


SWPFLAG 


SHPKEY1 


SWPSHR 


TEBPSAVE 


TRAHHODE 


TREXCR9 


TREXINTC 


TREXIN1 


TREXNSI 


TREXPEBA 


TREXT 


7CHBICK 


VCHBHX 


VCBSEL 


VCBTYPE 


VMBLOK 


VBCHSTRT 


VMCHTBL 


VMDSP 


VBDSTAT 


VBECEXT 


VBESTAT 


VMEXTCB 


VBEXTPHD 


VMEXHAIT 


VMGPHS 


VHINQ 


VMINST 


VfllHVPAG 


VBINVSEG 


VBIOINT 


VMNEWCRO 


VBPEND 


VBPERCB 


VBPERPND 


VBPRGIL 


VBPSTAT 


VHPSH 
WAIT 


VHPXINT 


VHREAL 


VMRSTAT 


VBRON 


VBSEG 


VBTRBRIH 


VBTRCTl 


VBTREXT 


VBTRPER 


VBTBPBV 


VflVCBO 


VMV370R 


DBKPSA ACOBETEL 


APAGCP 


ASYSOP 


ASYSVM 


BRING 


BUSY 


CLASGRAF 


CLASTERB 


CORFLAG 


CORSHARE 


CORTABLE 


CPABEND 


CPCREGO 


CPCREG8 


CRESIMD 


CSH 


CUE 


CO 


CI 


C8 


DEFER 


DFRET 


DBKCFBBK 


EBKCVTBH 


EBKDBPDK 


DMKDBPGR 


DHKDSPE 


DBKDSPCH 


DMKFREE 


EMKFRET 


DMKPBGRF 


DBKPTRAN 


DMKPTHDL 


DBKQCNCL 


DBKQCNWT 


DMKRNHND 


DBKSCHTQ 


DBKSCNRD 


DBKSTKIO 


DMKTHRVT 


DMKTBCIT 


DMKTRCPE 


BMKTRCSV 


DBKVIRD 


DBKVERO 


EXOPSW 


EXTBODE 


FFS 


F1 


F15 


F2 


F2a0 


ptjogs 


F60 


F8 


INTEX 


INTEXF 


INTSVC 


INTSVCL 


LOCK 


NICBLOK 


NICNABE 


NIC SIZE 


NICOSEB 


NORET 


PROBHODE 


PSASVCCT 


QDAHTOMB 


RDEVBASE 


RDEVELOK 


RDEVFLAG 


RDEVHIO 


HDEVNICL 


RDEVTYPC 


EDEVOSER 


BDNPSW 


EUHOSER 


RO 


R1 


RIO 


R11 


R12 


R13 


B14 


R15 


R2 


R3 


R4 


R8 


SAVEAREA 


SAVENEXT 


SAVEBETS 


SATER12 


SAVER13 


SAVEE2 


SAVESIZE 


SAVEHRK2 


SH 


SVCHPSW 


SVCOPSW 


SYSTEB 


TIBER 


TRACCURR 


TRACEHD 


TRACFLGl 


TRACSTRT 


TRAC01 


TRAC02 


TREXIN1 


TBEXT 


TRQEBPNT 


IRQBFPNT 


TRQBLOK 


TRQBVAL 


VBADSTOP 


VBBLOK 


VBCPDTBR 


VMDISC 


VMDSTAT 


VHESTAT 


VHEXTCM 


VBEXWAIT 


VBFPRS 


VMGPRS 


VBINST 


VMBCR6 


VBBICSVC 


Vflfl SVC 


VflOSTAT 


VBPEND 


VHPERPND 


VHPSW 


VHQSEND 


VMRSTAT 


VBSEG 


VBSHR 


VBSYSOP 


VBTERB 


VBTLEVEL 


VHTBOUTQ 


VBTBRIHT 


VBTEBBIN 


VBTRCTL 


VMTBEXT 
ZEBOES 


VMTRHID 


VHTRSVC 


VMTSEND 


VBTTIBE 


WAIT 


XPAGNOB 


XRIGHT24 


X2048BND 


YO 


Y2 


Y4 


Y6 


EHKPTB ACORETBL 


ARIOD? 


ASYSVH 


AVHREAL 


BALESAVE 


BAIBO 


EALB2 


ERIHG 


CCRBPNT 


CORCFLCK 


CORCP 


CORFLAG 


CORFPNT 


COBFBEE 


COBICLCK 


COBLCNT 


COBPGPNT 


CORRSV 


CORSHABE 


CORSWPNT 


COETABLE 


CPEXADD 


CPEXBLOK 


CPEXFPNT 


CPEXBISC 


CPEXRO 


CPEXR13 


CPEXR2 


CPEXR7 


CPEXR9 


CPEXSIZE 


CPSTAT 


CI 


DEFER 


DBKCFBBK 


DBKESPCH 


DBKDSPNP 


DBKFBEE 


DBKFRET 


DMKFBETR 


EMKPAGIO 


DHKPAGQ 


DHKPGTPG 


DBKPGTPR 


DBKQCNWT 


DBKSCHDL 


DBKSCHN1 


DBKSCHN2 


DBKSTKCP 


DBKSYSOW 


DBKSYSRB 


DBKVMAPS 


FFS 


FO 


F1 


FU 


F4095 


FU096 


F8 


lOERETN 


LOCK 


HCRET 


OWNDLIST 


OWNDREEV 


PAGCORE 


PAGINVAL 


PAGREF 


PGBEAD 


PGBRITE 


PSA 


BDEVBLOK 


RDEVTYPE 


RO 


R1 


RIO 


R11 


R12 


R13 


Ria 


B15 


R2 


B3 


R4 


R5 


R6 


R7 


R8 


R9 


SAVEAREA 


SAVEREGS 


SAVER ETN 


SAVERO 


SAVER1 


SAVER 11 


SAVEB12 


SAVER13 


SAVER2 


SAVEE3 


SAVER7 


SAVEWRK1 


SAVEWRK2 


SAVEWBK3 


SAVEWRK5 


SAVEWRK6 


SAVEHBK9 


SHPALLOC 


SWPCHGI 


SWPCBG2 


SWPCOEE 


SWPCYL 


SWPDPAGE 


SWPFLAG 


SWPKEY1 


SWPKEY2 


SWPRECBP 


SWPREF1 


SWPREF2 


SWPSHR 


SWPTRANS 


SHPVPAGE 


SYSTEM 


TIBER 


TYP2305 


VBBLOK 


VBESTAT 


VBINVPAG 


VBHDCHT 


VMPAGES 


VMPGBEAD 


VflPGRINQ 


VMPGWAIT 


VMPGWBIT 


VHPSTAT 


VMBPAGE 


VBRSTAT 


VBSEG 


VBSIZE 


VflSTEALS 


VMTIBER 


VBTTIHE 


VBWCNT 


XPAGNUM 


XTNDLOCK 


ZEECES 
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Hodule External References (Labels and Modules) 



EHKQCN ADSPCH 


ALARM 


ASYSOP 


BALRSAVE 


BLANKS 


CLASGBAF 


CLASSPEC 


CLASTEBM 


CCNADDH 


CONCNT 


CONCNTL 


CONDATA 


CONOOTPT 


CONPfiBH 


CONPBT 


COHBESP 


CONRETN 


C0NRSV3 


CONSPLT 


CONSTAT 


CONSYNC 


CONTASK 


CONTSIZE 


CONTSKSZ 


CONOSER 


CPEXADD 


CPEXBLOK 


CPEXBEGS 


CPEXB12 


CPIXSIZE 


DFRET 


DMKCNSIC 


DMKCVTBD 


DMKCVTBH 


DMKCVTDT 


DMKDSPCH 


DHKFREE 


DHKFRET 


DMKGRFIC 


DHKBGBIC 


DMKRNHIC 


DMKSCHDL 


DHKSCHRT 


DMKSCHST 


DMKSCNRD 


DMKSCNRN 


DHKSTKCP 


DMKSYSHM 


DHKVSPVP 


EDIT 


Fl 


F2 


F4095 


F8 


INHIBIT 


MNCLRESP 


MNCOBRD 


MHCOERD 


MNCOWRIT 


NICBLOK 


NICLLEN 


NICSIZE 


NOAOTO 


NORET 


NOTIHE 


OPERATOR 


PRIORITY 


PSA 


RDEVAPLP 


RDEVELCK 


BDEVCON 


RDEVLLEN 


BDEVNICL 


BDEVTMCD 


BDEVTYPC 


RDEVTYPE 


RO 


R1 


RIO 


R11 


H12 


R13 


R14 


R15 


R2 


R3 


B4 


R5 


R6 


R7 


R8 


R9 


SA7EAREA 


SAVERO 


SAVER1 


SAVER11 


SAVER2 


SAVER3 


SAVEHRKI 


SAVEIIBK2 


SAVEWRK3 


SAVEHRK4 


TEHPSAVE 


TBQBIBA 


TRCBIOK 


TBQBSIZE 


TRQBDSER 


THQBVAL 


TYPBSC 


DCASE 


VDEVBLOK 


VDEVCSPL 


VDEVFLAG 


VDEVSFLG 


VDEVTERM 


VHBLOK 


VHCF 


VBCFREAD 


VMCFRON 


VHCFHAIT 


VMDELAY 


VHDISC 


VMDVSTBT 


VMGENIO 


VMKILL 


VMLOGOFF 


VMLCGON 


VHMCODE 


VHHLEVEL 


VHHSTHP 


VMMTEXT 


VMOSTAT 


VMQSTAT 


7MRBSC 


VMRSTAT 


VMSYSOP 


VMTERM 


VHTRMID 


VMTTIME 


VMDSER 


VMVIRCF 


VHVTERM 




DHKRGA ASYSVH 


BLANKS 


BRING 


BSCAOSER 


BSCBLOK 


BSCCNT 


BSCCOPY 


BSCECCW1 


BSCECCU2 


BSCENQ 


BSCETE 


BSCFLAG 


BSCFLAG1 


BSCIGN 


BSCINDEX 


BSCLOG 


BSCOPIED 


BSCPCCH1 


BSCPCCH2 


BSCPCCW3 


BSCPCCW4 


BSCRCVD 


BSCREAD 


BSCREGEN 


BSCRESP 


BSCBROBN 


BSCBSTBT 


BSCRVI 


BSCSCAN 


BSCSCCW1 


BSCSCCH2 


BSCSCCH3 


BSCSEL 


BSCSEND 


BSCSENSE 


BSCSIZE 


ESCSIZE1 


BSCSPTR 


BSCTHBQ 


BSCTSTRQ 


BSCOCdPY 


BSCDECCH 


BOFCNT 


BDFFER 


BDFINLTH 


BDFSIZE 


CC 


CD 


CE 


CLASTERM 


CONACTV 


COHADDR 


C0HCCH1 


C0HCCW2 


CONCCHS 


C0NCCW4 


CONCNT 


CONCNTL 


CONDATA 


CONDCNT 


CONESCP 


CONLABEL 


CONPARM 


CONPNT 


CONRESP 


CONRETN 


CONSTAT 


COHTASK 


CONTSIZE 


CONTSKSZ 


CONOSER 


CPEXADD 


CPEXBLOK 


CEEXBO 


CPEXSIZE 


DE 


DEFER 


DMKBLDVH 


DMKCFHAT 


DMKCFMBK 


DMKCFMEN 


DMKCNSED 


DMKCVTBD 


DMKCVTBH 


DMKCVTDB 


DMKCVTHB 


DMKDSPCH 


DHKERMSG 


DHKFREE 


DHKFRET 


DHKIOERN 


DBKICSQR 


DHKPTRAN 


DMKQCHCL 


DMKQCNET 


DMKQCNTO 


DMKQCNHT 


DMKRGBIC 


DHKRGBMT 


DMKBGBSN 


DMKSCHRT 


DMKSCHST 


DHKSCNRD 


DHKSCHBD 


DHKSTKCP 


DMKTBLGR 


DMKTBLDP 


DMKTBMZI 


EDIT 


FO 


F1 


F2 


F255 


F256 


F3 


F4 


Fil095 


F5 


F8 


INHIBIT 


lOBCAH 


I0BCC3 


lOBCP 


lOBCSl 


lOBFATAL 


ICBFLAG 


ICBIOER 


lOBIRA 


10 BLINK 


lOELOK 


lOBMISC 


I0BMISC2 


lOBRADD 


lOBRCNT 


lOBRSTHT 


lOBSIZE 


lOBSPEC 


lOBSTAT 


lOBDNSL 


lOBDSER 


lOERBLOK 


lOEREXT 


lOEESIZE 


LOGDROP 


LOGHCLD 


NICALBM 


NICAPL 


NICATRB 


HICBLOK 


NICCARD 


NICCORD 


NICCPNA 


NICDIAG 


NICDISA 


NICDISB 


NICENAB 


NICFLAG 


HICFMT 


NICHOLD 


NICMORE 


NICNAME 


NICNTRL 


NICPOLL 


NICPBOCH 


NICQPNT 


NICREAE 


NICBSPL 


NICRDNN 


NICSELT 


NICSIO 


HICSIZE 


NICSTAT 


NICTABF 


NICTMCD 


NICTRQ 


NICTYPE 


NICDSER 


NIC3275 


NORET 


NOTIME 


PSA 


BDEVBLOK 


RDEVBSC 


RDEVCGH 


RDEVDISA 


RDEVDISB 


BDEVENAB 


RDEVFLAG 


RDEVMAX 


BDEVNICL 


RDEVNRDY 


RDEVPDLY 


BDEVBSVD 


RDEVSTAT 


RDEVTYPC 


RDEVTTPE 


RDEVHAII 


RO 


R1 


BIO 


B11 


R12 


R13 


R14 


R15 


R2 


B3 


R4 


E5 


R6 


R7 


R8 


R9 


SAVEABEA 


SAVERO 


SAVER2 


SILI 


SYSTEM 


TEHPR2 


TEHPB3 


TEHPE7 


TEMPSAVE 


TRQBIRA 


TRQBLOK 


TRQBSIZE 


TRQBDSER 


TBQBVAL 


TYPBSC 


DCASE 


DE 


VCONCTL 


VCONRBSZ 


VCONRBOF 


VCONRCNT 


VDEVBLOK 


VDEVCOH 


VMBLOK 


VHCF 


VHCFHAIT 


VMDVSTRT 


VMGENIO 


VMLOGOFF 


VHLOGON 


VHMCPENV 


VHHLEVEL 


VHMLINED 


VHOSTAT 


VHPA2APL 


VMPFDNC 


VMPXINT 


VMQSTAT 


VMRSTAT 


VMTEBM 


VMTLEND 


VHTTIME 


VHVTERM 


XIHTBLOK 


XINTCODE 


XINTNEXT 


XINTSIZE 


XIHTSCET 


XTNDLOCK 
























EMKEGB ALARM 


BRING 


BSCADSER 


BSCBLOK 


BSCFLAG 


BSCLINE 


BSCPCCHI 


ESCPCCH2 


BSCPCCB4 


BSCRCVD 


BSCREAD 


BSCRESP 


BSCRROBN 


BSCSCAH 


BSCSCCil 


BSCSCCH2 


BSCSCCW3 


BSCSIL 


BSCSIZE 


BSCSIZE1 


BSCSIZE2 


BSCSPTR 


BDFINLTH 


CC 


CD 


CONADDR 


C0NCCW1 


C0NCCW2 


C0HCCH3 


CONCCWa 


CONCNT 


CONCNTL 


CONDATA 


CONESCP 


CCNLABEL 


COHOOTPT 


CONPABM 


CONPNT 


COHBESP 


CONRETN 


C0NRSV3 


CONSTAT 


CONSYNC 


CONTASK 


CONTSIZE 


CONTSKSZ 


CONOSER 


CPEXADD 


CPEXBLOK 


CPEXSIZE 


DEFEB 


DMKBOXBX 


DMKDSPCH 


DHKFREE 


DMKFRET 


DMKIOSQR 


DMKPTRAN 


DMKQCNET 


DMKRGAIN 


DMKSCHRT 


DHKSTKCP 


DMKTBLGR 


DHKTBMZO 


Fl 


F256 


7^ 


FU095 


INHIBIT 


lOBCAW 


lOBCP 


lOBFLAG 


lOBIOEE 


lOBIBA 


lOBLOK 


lOBMISC 


I0BMISC2 


lOBRCNT 


lOBRSTRT 


lOBSIZE 


lOBSPEC 


lOBSTAT 


lOBOSEE 


lOEEBLOK 


lOEBEXT 


lOERSIZE 


LOGDROP 


LOGHOLD 


NICALEH 


NICAPL 


HICATBB 


HICBLOK 


NICCORD 


NICDIAG 


NICDISA 


NICDISB 


NICFLAG 


NICFMT 


NICHOLD 


NICMORE 


NICNTRL 


NICPOLL 


NICPROCN 


NICQPNT 


NICREAD 


NICBDNK 


HICSELT 


NICSIO 


NICSIZE 


NICSTAT 


NICTMCD 


NICTRQ 


NICDSER 


PRIORITY 


PSA 


BDEVBLOK 


RDEVBSC 


RDEVCON 


RDEVDED 


RDEVDISA 


RDEVDISB 


RDEVFLAG 


RDEVMAX 


BDEVNICL 


RDEVNRDY 


RDEVRSVD 


RDEVSTAT 


RDEVWAII 


BO 


B1 


RIO 


Rll 


B12 


R13 


R14 


R15 


R2 


R3 


B4 


R5 


R6 


R7 


R8 


R9 


SAVEABEA 


SAVEH2 


SILI 


SYSTEM 


TEMPR3 


TEMPSAVE 


TRQBLOK 


VMBLOK 


VMGENIO 


VMLOGOFF 


VHRSTAT 


VMTLEND 


VHTRHID 


VMTTIHE 
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Module External References (Labels and Modules) 



DHKRKH 



DIiKBF& 



DMKRSE 



ABORT 


ALARM 


ASYSVM 


ATTH 


BALRSAVE 


BLANKS 


BDSODT 


BDSY 


CACTDEV 


CACTLIN 


CACTLTR 


CC 


CCDESMD 


CDC 


CBC 


CKPBITS 


CKPBKSZ 


CKPELOK 


CKPNAHE 


CKPRMAX 


CKPSIZE 


CLASSPEC 


CMDREJ 


CHTLBTD 


CONACTV 


CONADDR 


C0NCCW1 


C0NCCH2 


C0NCC13 


CONCNT 


CONCNTL 


COHCOMSD 


CONDATA 


CONDCNT 


CONDEST 


COHESCP 


CONEXIR 


CONFLAG 


CONOUTPT 


COSPABH 


COHPHT 


COHRESP 


CONRETN 


COHRTAG 


COHRTRY 


CONSPLT 


CONSRID 


CONSTAT 


COFSYNC 


COMSYSH 


CONTACT 


CONTASK 


CONTCHD 


CONTSIZE 


CONTSKSZ 


COHDSER 


CPEXADD 


CPEXBLOK 


CPEXSIZE 


CRESCND 


CBESERL 


CRESIMD 


CSETDSM 


CTRMLTR 


DE 


DFHET 


DISCEOC 


DISCHCT 


DMKBLDVM 


DMKCFMAT 


DMKCFMBK 


DMKCNSED 


DMKCPVAE 


DMKCVTBH 


DMKCVTDT 


EMKDSPCB 


EMKEBMSG 


DMKFREE 


DMKFREI 


DHKIOERN 


DHKIOSQR 


DMKNLDHP 


DMKHLDH 


DHKQCNCL 


DMKQCHET 


DMKQCNTO 


DMKQCHWT 


DHKBIORN 


DHKSCNAU 


DMKSCNRD 


DMKSTKCP 


DMKVSPBT 


EDIT 


ERRMSG 


F1 


F16 


F256 


F4 


FU095 


P60 


F8 


IL 


IHBIBIT 


INTBEQ 


lOBC&S 


lOBCCl 


I0BCC3 


lOBCP 


lOBCSH 


lOBFLAG 


lOBIOER 


lOBIRA 


lOBLIHK 


lOBLOK 


lOBMISC 


I0EMISC2 


lOBSADD 


lOBHCiH 


lOBRCNT 


lOBRSTRT 


lOBSIZE 


lOBSPEC 


lOBSTAT 


lOBONSL 


lOBUSER 


lOERBLOK 


lOERDATA 


lOEBEXT 


lOERSIZE 


IPLREQ 


LOGDROP 


LOGHOLD 


NICATOF 


NICATTN 


NICBLOK 


NICCIBM 


HICDED 


NICDISA 


SICDISB 


mCENAB 


HICEPMD 


NICEBLK 


NICFLAG 


NICIIHE 


SICLTBC 


NICHTA 


NICNAME 


MICSTRL 


NICPSDP 


NICQPHT 


NICRCNT 


NICSESN 


NICSIZE 


NICSTAT 


HICTELE 


NICTERM 


NICTYPE 


HICOSER 


NOADTO 


HORET 


OPERATOR 


PCI 


PRGC 


PRIORITY 


PRTC 


PSA 


BDBOFLH 


BDBDFHO 


RDEVADTO 


RDEVBLOK 


RDEVBOSY 


RDEVCKPT 


RDEVCON 


RDEVDED 


BDEVDISA 


RDEVFLAG 


RDEVLCEP 


RDEVLNCP 


BDEVMAX 


BDEVNCP 


RDEVNICL 


RDEVNRDY 


RDEVHCVY 


HDEVHSVD 


RDEVSCEE 


RDEVSLOW 


REEVSTAT 


BDEVTBTD 


RDEVTYPC 


RDEVSAIT 


READHRH 


RO 


R1 


RIO 


R11 


R12 


R13 


Rm 


R15 


R2 


B3 


R4 


R5 


R6 


R7 


E8 


R9 


SAVEAREA 


SAVERO 


SAVER1 


SAVER2 


SILI 


SYSTEM 


TEMP SAVE 


TRACCDRR 


IRACEND 


TRACFLG2 


TRACSTBT 


TBAC11 


TYP3705 


DC 


UCASE 


DE 


VHBLOK 


VHCFWAIT 


VHLCGCH 


VMMCPESV 


VMHLEVEL 


VMRSTAT 


VMTRMID 


VMTTIME 


VMUSER 


WRITERK 


WRITEOT 


HRITHRH 


XHIGBT16 


ZEROES 






















ACORETEl 


AVHHEAL 


BRIHG 


CORBPHT 


CORCFLCK 


CORFLAG 


CORFPHT 


CORIOLCK 


CCRPGPHT 


CORSWPNT 


CORTAELE 


CPEXADD 


CPEXBLOK 


CPEXFPNT 


CPEXRO 


CPEXSIZE 


DEFER 


DMKFREE 


DMKPAGIO 


DHKPGTPR 


DMKPGTSP 


DMKPTBAN 


DHKPTRFT 


DMKPTRDL 


DMKPTRHQ 


DMKSCBDL 


FFS 


F1 


F4 


lOERETH 


LOCK 


PAGCORE 


PAGINVAL 


PAGREF 


PSA 


RO 


B1 


Rll 


R13 


R14 


R15 


R2 


R3 


R5 


B7 


H9 


SAVEABEA 


SAVEB1 


SAVER2 


SAVEWRK1 


SWPCYL 


SiPFLAG 


SHPBECHP 


SRFSHR 


SWPTHANS 


SYSTEM 


VMBLOK 


VMESTAT 


VHINVPAG 


VMPAGES 


VMPGWAIT 


VMRSTAT 


VMHCNT 






ACHTBACK 


ACBTBLOK 


ATTH 


BUSODT 


CC 


CCC 


CDC 


CE 


CHC 


CLASDRI 


CLASORO 


CHERIJ 


CUE 


DATACHK 


DE 


DMKFREE 


DMKFRET 


DHKICEST 


DMKMSRB 


DMKHSP83 


EQCHK 


F1 


F3 


F4 


F7 


F8 


IFCC 


INTREQ 


lOECAW 


I0BCC1 


I0BCC3 


lOBCSi 


lOBERP 


lOBFATAL 


ICBFLAG 


lOBIOEB 


lOBLOK 


I0BMISC2 


lOBRCAW 


lOBRCNT 


lOBRSTRT 


lOBSTAT 


lOERACT 


lOERELOK 


lOEBCEMD 


lOEECSH 


lOEBDATA 


lOERDEPD 


lOERDERD 


lOERECSH 


lOERERP 


lOERETRY 


lOEBEXT 


I0EHFLG1 


I0ERFLG2 


I0ERFLG3 


lOERIGN 


I0ERIHD3 


lOERIHPO 


lOEEHDH 


ICEROVFL 


lOERPEND 


lOERPHT 


lOEBREAD 


lOEBSIZE 


lOEBXERP 


PCI 


PRGC 


PRTC 


PSA 


BDEVACBT 


RDEVBACK 


RDEVBLOK 


RDEVFLAG 


RDEVIOER 


RDEVHBDY 


EDEVRSTR 


RDEVSPL 


RDEVSTAT 


RDEVTERM 


RDEVTYPC 


RDEVTYPE 


RO 


R1 


RIO 


B11 


R13 


R1U 


R15 


R2 


R3 


R4 


R5 


R6 


R7 


R8 


R9 


SAVEAEEA 


SAVEIiBKl 


SILI 


SM 


TYPPOH 


TYP1403 


TYPia43 


TYP2501 


TYP2520P 


TYP25»J0P 


TYP25aOR 


TYP3211 


TYP3505 


OC 


VMBLOK 


VHCF 


VMOSTAT 


X0BRCCB1 


X0BRCCW2 


X0BRCCH3 


XOBRCCHU 


XOBREXT 


XOBRFLAG 


X0BRMIS1 


X0BRHIS2 


X0BRRT1 


X0BRRT2 


XOBBRTS 


XOBRRTU 


X0BRRT5 


X0BRRT6 


XOBRSIZE 


XOBRSTAT 


X0BRT1 


X0BRT2 


X0BRT3 


XOBR010 


X0BR150 


X0BR180 


X0BR512 


ZEROES 
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DHKRSP 



&LA6H 

CLASDRO 

DMKERMSG 

DMKSCHPD 

DMKSYSWM 

lOBCSW 

10 B STAT 

PSA 

RDEVRSTR 

RECUSED 

R12 

SAVEREGS 

SFBRECER 

SILI 

UC 



ELABKS 

CPEXADD 

DMKFREE 

DHKSCNBD 

DHKTHRPT 

lOBEBP 

lOERBLOK 

RDEVACNT 

RDEVSEP 

RSPDPAGE 

R13 

SAVERO 

SFBRECHO 

SKIP 

UE 



BBIHG 

CPEXBLOK 

DMKFRET 

DHKSCHBN 

DBKDDRFD 

lOEFATAL 

lOEECSH 

RDEVBACK 

RDEVSPAC 

RSPLCTL 

Bit 

SFBCLAS 

SFEBECOK 

SPUNK 

VHELOK 



BDFCNT 

CPEXSIZE 

DHKIOSQR 

EHKSCNRO 

F24 

lOBFLAG 

lOERDATA 

BDIVBLOK 

RDEVSPL 

RSPMISC 

B15 

SFBCOPY 

SFBBECS 

SPNXTPAG 



BDFFEB 

DE 

DMKCPRST 

DMKSEPSP 

FU 

lOBIOER 

lOEBDEPD 

BBEVBDSY 

RDE?STAT 

ESPBPAGE 

B2 

SFBFIIID 

SFBREQDE 

SPPBEPAG 



BDFNXT 

DEFEB 

DHKEGTSG 

DMKSPLCB 

FU095 

lOBIRA 

lOEBDEBE 

RDE7CLAS 

BBEVTEBH 

BSPRSTBT 

R3 

SFBFLAG 

SFBBSTBT 

SPBECNUM 



BDFSIZE 

DBKACOPD 

DHKPGTV6 

DBKSPLDL 

Fa096 

lOBLOK 

lOEBEBP 

RDEVDED 

RDEVTYPC 

RSPSFBLK 

R4 

SFBFLAG2 

SFBSHOLD 

SPBMISC 



CC 

DHKCKSPL 

DHKPGTVR 

DHKSPLOH 

F8 

lOBHISC 

lOEEEXT 

RDEVDISA 

BDEVTYPE 

RSPSIZE 

B5 

SFBFNAME 

SFBSIZE 

SPSIZE 



CCC 

DHKCSOSD 

DMKPTBAN 

DMKSTKCP 

IFCC 

ICBBADD 

I0EEFLG1 

BDEVDBAS 

BECBLOK 

BSPVPAGE 

R6 

SFBFTYPE 

SFBSTABT 

SYSTEM 



CDC 

DMKCVTBD 

DMKQCBWT 

DHKSYSOC 

IL 

lOEBCAW 

lOERSIZE 

RDEVFLAG 

RECCYL 

BO 

B7 

SFBLAST 

SFBTICEB 

TYPPBT 



CE 

EMKCVTBH 

DMKRPAGT 

DMKSYSOW 

lOBCAH 

lOBRCNT 

LOCK 

RDEVIOER 

EECMAP 

R1 

B8 

SFBLOK 

SFBTYPE 

TYPPUN 



CHGSFB 

DMKCVTDT 

DMKRPAPT 

DMKSYSRM 

I0BCC1 

lOBRSTBT 

NORET 

RDEVLOAD 

BECPNT 

RIO 

R9 

SFBORIG 

SFBUHOLD 

TYPBDR 



CLASDRI 

DMKDSPCH 

DHKBSEBB 

DHKSYSTP 

lOBCP 

lOESIZE 

OPERATOR 

RDEVNRDY 

BECSIZE 

R11 

SAVEAREA 

SFBPNT 

SFBDSER 

TYP25U0R 



EMKSAV ALARM CAW CC CE CSW DE DMKCKP 

DMKOPHIIT DHKSYSND DMKSYSRS DMKSYSTP DMKSYSTZ DHKSYSVL EXNPSH 

lONPSH lOOPSH MCSPSW PBNPSW PSA PSTABTSV RO 

B15 B2 R3 RU R5 E6 B7 

TEBPSAVE TYP2305 TYP2314 TYP3330 TYP33aO TYP3350 



DMKCKPBS DBKCKPST DBKCKPT 

F1 F2 F3 

B1 BIO B11 

B8 B9 SILI 



DBKCPICD EBKCPIHT DBKCVTBH 

Fa INTBEQ INTTIO 

B12 B13 B14 

SKIP TEHPB2 TEMPB4 



EBKSCH 



EBKSCN 






ACOBETBL 


AVBREAL 


BALRSAVE 


BALR11 


BBIBG 


CCBBPNT 


COBCFLCK 


COBFLAG 


CCBFPNT 


COBIOLCK 


COBBSV 


COBSHABE 


CORTABLE 


DEFEB 


DMKDSPCH 


DBKDSPHP 


DBKFBEE 


DMKFBET 


DBKBIDBT 


DBKPTBAN 


DMKPTBFL 


DHKPTRRL 


DMKPTB01 


ECBLOK 


EXTCPTMB 


EXTCPTRQ 


FFS 


FO 


F1 


FIG 


F15 


F3 


FU 


F5 


IDLBHAIT 


lOHTHAIT 


BSCLSCH 


MHCOAEL 


MNCOAQ 


BNCODQ 


PAGCORE 


PAGELOAD 


PAGEWAIT 


PAGIKVAL 


PAGBEF 


PEOBTIME 


PSA 


BO 


B1 


BIO 


B11 


R12 


R13 


B14 


R15 


H2 


B3 


E4 


E5 


B6 


R7 


E8 


E9 


TEHPSAVE 


TIBER 


TRACCDBB 


TBACEND 


TRACFLG1 


TBACSTBT 


TBAC08 


TBAC09 


TBQEBPNT 


TBQEFPNT 


TBQBLOK 


TBQBQUE 


TBQBTOD 


TBQBVAL 


VBAEX 


VBAEXP 


VMBLCK 


VMCOMP 


VBCPDTMB 


VMCPWAIT 


VBDB0P1 


VBDSP 


VMDSTAT 


VBECEXT 


VBEIIG 


VBEPRIOR 


VMBIPBI 


VBINQ 


VMIOINT 


VMLONGHT 


VMLOPRI 


VMHOBDN 


VBPAGES 


VBPEND 


VBPGBEAE 


VMPGRINQ 


VBPBIDSP 


VMPSTAT 


VMPSHAIT 


VMPXINT 


VBQBPNT 


VMQFPNT 


VBQLEVEL 


VMQPRIOB 


VMQSEHD 


VMQSTAT 


VMQ1 


VBBDINQ 


VBBON 


VBBPAGE 


VMBPEIOB 


VMBSTAT 


VMBUN 


VBSEG 


VMSTEALS 


VBSTMPI 


VBSTflPT 


VMTIBEB 


VMTLEVEL 


VBTBINQ 


VBTBOOTQ 


VBTBBINT 


VMTODINQ 


VMTRQBLK 


VMTSEND 


VMTTIBE 


VMUPRIOB 


VBVTIBE 


VMV370B 


VMWSCHG 


VBWSEBNG 


VMWSPBOJ 


XINTBLOK 


XINTCODE 


XINTHEXT 


XINTPABM 


XIHTSIZE 


XINTSCBT 


ZEBOES 




ABIOCH 


ABIOCT 


ARIOCD 


ABIODC 


ARIODV 


ASYSVM 


BALBSAVE 


EALB1 


BALB2 


BALB3 


BALB8 


BLANKS 


BUFFEB 


BOFKXT 


CLASEASD 


CLASSPEC 


CLASTEBB 


CLASDRI 


CLASDRO 


FFS 


FTR2311B 


FTR2311T 


FO 


F5 


F7 


PSA 


RCHADD 


BCHBLOK 


RCHCOTBL 


BCUADD 


BCUBLOK 


RCUCHA 


BCDDVTBL 


RCDPRIBE 


RCUSUB 


BCDTYPE 


BDEVADD 


BDEVBLOK 


BDEVCUA 


BDEVDED 


BDEVDISA 


RDEVFLAG 


BDEVLNKS 


BDEVHODT 


BEEVSEE 


BDEVSIZE 


RDEVSTAT 


BEEVTYPC 


BO 


B1 


RIO 


B11 


R1U 


B15 


R2 


B3 


BU 


B5 


E6 


B7 


B8 


B9 


TYPCTCA 


TYPIBBl 


TYPPBT 


TYPPDN 


TYPBDR 


TYPTELE2 


TYP2311 


TYP2700 


TYP3210 


TYP3705 


DDEVBLOK 


DDEVFTB 


DDEVBELN 


VCHADD 


VCHBLOK 


VCHCUTBL 


VCUADD 


VCOBLOK 


VCODVTEL 


VDEVADD 


VDEVBLOK 


VDEVDED 


VDEVFLAG 


VDEVIINK 


VDEVBDO 


VDEVBEAL 


VDEVBELN 


VDEVSIZE 


VDEVSTAT 


VDEVTYPC 


VDEVTYPE 


VDEVUSER 


VMBLOK 


VBCHSTBT 


VBCHTBL 


VMCUSTET 


VBDVCNT 


VMDVSTBT 


VMLOGOFF 


VMLOGON 


VBPNT 


VMBSTAT 



VBUSEB 



ZEBCES 
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EMKSEP BRING 


CC 


DEFER 


DMKBOXBX 


DHKCEEID 


DMKCVTEE 


DMKCVTBB 


DMKCVTDT 


DMKDSPCH 


DMKFBET 


EMKIOSQR 


EHKPGTVG 


DMKPGTVR 




DMKETBAK 


BHKPTBDL 


EMKSCNRE 


lOBCAW 


lOBCSS 


ICBFATAL 


lOBFLAG 


lOBISA 


lOBLINK 


lOBLOK 


lOBMISC 


I0BMISC2 


lOEHSTBT 


< 


lOBSIZE 


lOBSTAT 


LOCK 


PSA 


RDEVBLOK 


RDEVFLAG 


RDEVLOAD 


RDEVSEP 


RDEVTYPE 


RO 


El 


RIO 


R11 


3 


R12 


R13 


Ria 


H15 


R2 


B3 


R4 


E5 


R6 


R7 


E8 


R9 


SAVEAREA 


SAVEBEGS 


SAVER10 


SAVERS 


SAVEWRK1 


SAVEHBK2 


SAVEWBK5 


SAVESEK7 


SAVEHRKS 


SAVENRK9 


SFBCLAS 


SFBDATE 


SFBDIST 


SFBFILID 


-J 


SFBFLAG2 


SFBFNAME 


SFBLOK 


SFBORIG 


SFBRECNC 


SFBBSTBT 


SFBTIME 


SFBUSER 


SILI 


SKIP 


SYSTEM 


TYPPUN 


UE 


o 


7MBL0K 




























EMKSEV CCC 


CCHCHNL 


CCHCMDV 


CCHCNTB 


CCHCED 


CCBDAV 


CCBDI 


CCHINTFC 


CCHLOG70 


CCHREC 


CCHSTG 


CCHOSV 


COMPFES 


w 


COMPSEl 


CCHPSYS 


CSl 


FFS 


F7 


F8 


HIOCCH 


IFCC 


IGBLAME 


IGPRGFLG 


IGTERMSQ 


IGVALIDB 


INTERCCH 


ft 


lOEEBLOK 


PSA 


RTCODEl 


RTC0DE2 


RTC0DE3 


RTCODEt 


RTC0DE5 


RTC0DE7 


BO 


R1 


B12 


H13 


R14 


B 


R15 


R2 


R3 


Ra 


B9 


SAVEAREA 


SAVEHRK1 


SAVEWRK9 


TERMSYS 


TIOCCH 


XRIGHT16 






O 


DMKSIX CCHCHHl 


CCHCBDV 


CCHCHTE 


CCHCPU 


CCHDAV 


CCBDI 


CCHINTFC 


CCHLOG60 


CCHREC 


CCHSTG 


CCHDSV 


COMPFES 


COMPSEL 


to 


CSM 


FFS 


F1 


F7 


F8 


HIOCCH 


IFCC 


IGBLAME 


IGPEGFIG 


IGTERMSQ 


IGVALIDE 


lOERBLOK 


PSA 




RTC0DE1 


RTC0DE2 


BTC0DE3 


RTC0DE4 


RTC0EE5 


RO 


R1 


R12 


R13 


E14 


R15 


R2 


S3 


0) 


RU 


R9 


SA7EAREA 


SAVEWRK1 


SAVEiRK9 


TERM SYS 


TIOCCH 


XRIGHT16 












3 


EMKSNC BRING 


CCPADDR 


CCPARH 


CCPNAHE 


CCPPSIZE 


CCPSIZE 


DEFER 


DMKERMSG 


DHKPTBAN 


DMKPTRUL 


DMKSNTBL 


DMKRPAPT 


DMKSCNVS 


*T3 


F1 


F256 


F4096 


lOERETN 


LOCK 


NCPHAME 


NCPPAGCT 


NCPPNT 


HCPSTAET 


NCPTBL 


NCPVOL 


PSA 


RDEVBLOK 


H 


RDEVCODE 


RDEVFLAG 


RDE70HN 


BDEVTYPE 


RO 


B1 


RIO 


B11 


R13 


R2 


B3 


R4 


R5 


O 


R6 


H7 


R8 


R9 


SAVEAREA 


SAVERO 


SAVER2 


SAVER6 


SAVEWRK1 


SAVEBRK2 


SAVEHRK3 


SAVEHRK4 


SAVEHRK5 


<T> 


SAVEHRK6 


SAVEiRKS 


SAVEiRK9 


SYSTEM 


TYP23m 


TYP3330 


TYP3350 


VMBLOK 












S 


EHKSPL ACCTBLOK 


ACCTDIST 


ACCTDSER 


ACORETBL 


ADDSFB 


ARIODV 


ARIOPR 


AHIOPU 


ARSPPR 


ARSPPU 


ARSPBD 


ASYSVM 


BLANKS 


o 


BRING 


CC 


CHGSFB 


CLASDBI 


CPEXADD 


CPEXBLOK 


CPEXBEGS 


CPEXSIZE 


DE 


DEFER 


DELSFB 


DMKCKSPL 


DMKCVTBD 


DMKCVTDT 


DHKDRDDD 


DMKDSPCH 


DBKFBEE 


DMKFRET 


DMKIOSQR 


DMKPGTSD 


DHKPGTSG 


DMKPGTSE 


DMKEGTVG 


DMKPTBAH 


EMKPTRLK 


DMKPTRUL 


ti 

s 


DHKQCHHT 


EHKRPAGT 


DHKRPAPT 


EHKRSPDL 


DMKBSPEX 


DMKBSPHQ 


DMKRSPID 


DMKSCNAU 


DMKSTKCP 


DHKSTKIO 


DMKSYSOC 


DHKSYSOH 


DMKDDRFD 


DHKUDBBD 


LHKODRRV 


DHKVIOIN 


FTH70MB 


FO 


F1 


F2 


F3 


Ft 


lOBCAW 


lOBCP 


lOBCSW 


lOBCYL 


H- 


lOBFATAL 


lOBFLAG 


lOBIRA 


lOBLINK 


lOBLCK 


I0BHISC2 


lOBBABD 


lOBSIZE 


lOBSTAT 


lOBUSER 


lOBVADD 


LOCK 


NORET 


0) 


OHNDIIST 


OHHDBDEV 


PCHCBH 


PRTCBN 


PSA 


RDEVACNT 


RDEVBLOK 


RDEVCLAS 


EDEVDED 


RDEVDISA 


RDEVDBAH 


RDEVFLAG 


RBEVFTR 


r»- 


RDEVSPL 


RDEVSTAT 


RDEVTIPE 


RDRCHN 


RECBLCK 


BECPNT 


RECSIZE 


BSPDPAGE 


RSPLCTL 


RSPRPAGE 


RSPSFBLK 


RSPSIZE 


ESPVPAGE 


o 


RO 


R1 


RIO 


R11 


R12 


R13 


R14 


B15 


R2 


R3 


B4 


R5 


R6 


3 


R7 


R8 


R9 


SAVEAREA 


SAVEB11 


SAVER7 


SAVERS 


SAVER9 


SAVEHRK1 


SAVEHRK2 


SAVEWRK8 


SFBCLAS 


SFBCOPY 


(n 


SFBDATE 


SFBDIST 


SFEDOMP 


SEBFILID 


SFBFIRST 


SFBFLAG 


SFBFLAG2 


SFBFNAMIE 


SFBHOLD 


SFBLAST 


SFBLOK 


SFBNOHLD 


SFBORIG 


s 


SFBPNT 


SFBPDRGE 


SFBRECER 


SFBEECS 


SFBRFCSZ 


SFBREQOE 


SFBRSTBT 


SFBSHOLD 


SFBSIZE 


SFBSTART 


SFBTIME 


SFBTYPE 


SFBOHOLD 




SFBUSER 


SHQBLOK 


SHQSHOLD 


SHQOSER 


SILI 


SKIP 


SPLINK 


SPSIZE 


SYSTEM 


TYPPRT 


TYPPUN 


TYPRDR 


TYP1052 


m 


TYP2314 


TYP3210 


TYP3211 


TYP3340 


TYP3350 


DDBFBLOK 


DDBFSIZE 


DDBFVADD 


UDIRBLOK 


UDIBDISP 


UMACBLOK 


UMACEIST 


VCHADD 




VCHBLOK 


VC ecu TEL 


VCDADD 


VCDBLOK 


VCDDVTBL 


VDEVADD 


VDEVBLOK 


VDEVCLAS 


VDEVCOPY 


VDEVCSH 


VDEVEXTN 


VDEVFOB 


VDEVHOLD 




YDEVPEHD 


VDEVSFLG 


VDEVSPL 


VDEVSTAT 


VEEVTYPC 


VDEVTYPE 


VDEVXFER 
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DMKPTR 


DMKRGA 


DMKRPA 


DMKDSO 


DMKVCA 


DMKVDB 


DMKVMA 




CPEXRl 


000001 


DHKVSP 


























CPEXR10 


000001 


DHKDSP 


























CPEXRl 1 


000005 


DHKDSP 


DMKPAG 


DMKDSO 


DMKVSE 




















CPEXE12 


000004 


DHKCPV 


DHKQCH 


DMKDSO 


DMKVCA 




















CPEXR13 


ooooou 


DMKIOS 


DMKPTR 


DMKVDB 






















CPEXRU 


000001 


DHKCDS 


























CPEXE15 


000001 


DMKCDS 


























CPEXE2 


000005 


DMKPTR 


DMK7MA 
























CPEXE3 


000001 


DMKTMA 


























CPEXR5 


000003 


DMKCDS 


DMKPAG 
























CPEXE6 


000005 


DMKIOF 


























CPEXR7 


000003 


DMKCDS 


DMKPAG 


DMKPTR 






















CPEXE8 


000001 


DHKVSP 


























CPEXE9 


000002 


DMKPTR 


























CPEXSIZE 


000057 


DHKACO 


DMKCDS 


DMKCFM 


DMKCPI 


DMKCPS 


DMKCPV 


DMKDIA 


DMKDSP 


DMKGRF 


DMKIOE 


DMKIOF 


DMKIOG 








DMKIOS 


DHKLOC 


DMKMCC 


DMKMCH 


DHKHON 


DMKPGT 


DMKPTR 


DMKQCH 


DMKRGA 


DMKRGE 


DMKRHH 


DMKRPA 








DMKRSP 


DMKSPL 


DMKDSO 


DMKVCA 


DMKVDB 


DMKVMA 


DMKVSP 














CPID 


000031 


DMKCCH 


DMKCKP 


DMKCHS 


DMKCPI 


DMKCPS 


DMKCVT 


DMKDHP 


DMKGRF 


DMKMCH 


DMKPGT 


DMKtfRH 






CPMICA¥L 


000007 


DMKCFS 


DMKCPI 


DMKLOG 






















CPMICOH 


000009 


DMKCFS 


DMKCPI 


DMKCQR 


DMKDSP 




















CPRDH 


000002 


DMKDSP 


























CPSHRLK 


000007 


DMKCCi 


DMKDGD 


DMKDSP 






















CPSTAT 


000001 


DMKPTR 


























CPSTATDS 


000012 


DMKCPI 


DMKDSP 


DMKIOS 






















CPSTAT2 


000019 


DMKCCW 


DMKCFS 


DMKCPI 


DMKCQR 


DMKDGD 


DMKDSP 


DMKLOG 














CPDID 


000028 


DMKCCE 


DMKCPI 


DMKHVC 


DMKIOE 


DMKIOF 


DMKIOG 


DMKMCH 


DHKMOH 


DMKOPR 


DMKPRV 


DMKSSP 


DMKVER 




CPOLOG 


000001 


DMKCPI 
























n 


CPDHCELl 


000003 


DBKHVD 


DMKIOG 


DMKPRV 




















na 


CPDMODEL 


000002 


DMKCPI 


DMKIOG 






















t^ 


CPDVEESN 


000011 


DMKCPI 


DMKHVD 


DMKIOF 


EMKIOG 


DMKMCH 


DMKOPE 


DMKPRV 


DMKSSP 












CPWAIT 


000008 


DMKCPI 


DMKDSP 


DMKIOS 


DMKVCA 
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CRESCMD 


000001 


DMKEMH 
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CRESDQ 


000001 


DMKDIA 
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CRESIME 


000005 


DHKDIA 


DHKHET 


DHKPSA 


DHKRNH 


















CSETDSB 


000002 


DHKDIA 


DHKBHB 






















CSW 


000269 


DMKCCH 


DHKCKP 


DHKCHS 


DHKCPI 


DHKDGD 


DHKDHP 


DHKDSP 


DHKEIG 


DHKFHT 


DHKGIO 


DHKIOS 


DHKOPR 






DHKPSA 


DHKSAT 


DHKSEV 


DHKSIX 


DHKSSP 


DHKTBA 


DHKTRC 


DHKVCH 


DHKVIO 


DHKVHI 


DHKVSP 




CSHLMEP 


000002 


DHKDIA 


DHKNES 






















CSIilHCE 


000002 


DHKDIA 


DHKHES 






















CTRHLTB 


000003 


DHKDIA 


DHKNES 


DHKRNH 




















COE 


000039 


DHKCEP 
DHKRSE 


DHKCKP 
DHKSSP 


DHKCPI 
DHKTAP 


EHKEBR 
DHKVIC 


DHKDIR 


DHKDHP 


DHKDSP 


DHKFHT 


DHKIOS 


DHKHON 


DHKNLD 


DHKPSA 


CO 


00003a 


DHKCKP 


DHKCPI 


DHKDHP 


EHKESP 


DHKIOS 


DHKHCH 


DHKPRG 


DHKPRV 


DHKPSA 


DHKTHR 


DHKTRC 




CI 


0000i»9 


DHKCCH 


DHKCDB 


DHKCPI 


DHKCSC 


DHKDSP 


EHKPBV 


DHKPSA 


DHKPTR 


DHKTHB 


DHKTRA 


DHKTRC 


DHKVAT 


C11 


000001 


DHKDSP 
























C13 


000003 


DHKDSP 


DHKHCe 






















C1U 


000003 


DHKCFG 


DHKCPI 


DHKDHP 




















C15 


000003 


DHKCFG 


DHKDHP 






















C2 


000013 


DHKCFG 


DHKCKP 


DHKDHP 


EHKFRE 


















C3 


000003 


DHKCKP 


DHKHCH 






















CH 


000003 


DHKDSP 
























C5 


000002 


DHKDSP 
























C6 


000009 


DHKCPI 


DHKDSP 






















C7 


000006 


DHKCCH 


DHKDSP 


DHKHCH 




















C8 


000022 


DHKCPS 


DHKIOS 


DHKHCC 


EHKHON 


DHKPRG 


DHKPSA 














C9 


000001 


DHKDSP 
























DiBAGRET 


000002 


DHKCPI 


DHKDHP 






















EASDCL 


000006 


DHKHCC 


DHKHON 






















DATACHK 


000006 


DHKCNS 


DHKRSE 


DHKVSP 




















EATE 


000027 


DHKCPI 


DHKCVT 


DHKDHP 


DHKEDH 


DHKHID 
















DDRCUA1 


000002 


DHKVER 
























EDRCDA2 


000002 


DHKVER 
























DDRKEYH 


000001 


DHKVER 
























EDRREC 


000001 


DHK?ER 
























DE 


000096 


DHKACG 


DHKCKP 


DHKCHS 


DHKCPB 


DHKCPI 


DHKCPS 


DHKCSO 


DHKCSP 


DHKCSO 


DHKDER 


DHKEIA 


EHKDIR 






DHKDHP 


DHKFHT 


DHKGRF 


DHKHVC 


DHKIOS 


EHKHON 


DHKRGA 


DHKRNH 


DHKRSE 


DHKRSP 


DHKSAV 


DHKSPL 






DHKSSP 


DHKTAP 


DHKVCA 


EMKVCN 


DHKVIO 


DHKVHI 


DHKVSP 












EEFER 


000112 


DHKCCW 


DHKCDB 


DHKCDS 


DHKCFD 


DHKCFG 


EHKCKS 


DHKCNS 


DHKCPB 


DHKCPI 


DHKCPV 


DHKCSO 


DHKDGD 






DMKDRD 


DHKDSP 


DHKERM 


EHKGIO 


DHKGRF 


DHKHVC 


DHKHVD 


DHKIOF 


DHKIOG 


EHKHCC 


EHKNLD 


DHKPGS 






DHKPRG 


DHKPRV 


DHKPSA 


DHKPTR 


DHKBGA 


DHKRGB 


DHKRPA 


EMKHSP 


DHKSCH 


DHKSEP 


DHKSNC 


DHKSPL 






DMKTHH 


DHKTRC 


DHKUDR 


DMKVAT 


DHKVCH 


DHKVCN 


DHKVER 


DHKVIC 


DHKVMA 


DHKVSP 


DHKHBH 




EELPAGES 


000007 


DHKBLD 


DHKCFP 


DHKDEF 


BHKPGS 


DHKUSO 
















DELSEGS 


000005 


DMKBLD 
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DHKDSO 
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DEVCCH 

EFRET 

DISCEOC 

DISCNCT 

DMKACO 

EHKACOEV 

DMKACOFF 

EHKACON 

DHKACOEU 

EHKACOQD 

DMKACOTfl 

EMKBLDEC 

DMKBLDBL 

EMKBLDET 

DHKBLDVM 

EMKBOXBX 

DHKBOIBB 

EMKBSCEE 

DHKCCHCF 

BKKCCHIS 

DMKCCHBX 

EHKCCBNT 

DHKCCBBT 

EMKCCBSZ 

DMKccaeo 

EHKCCWSB 
DHKCCHTC 
EMKCCWTR 
DHKCDBDC 
EMKCEBEI 
DHKCDBDH 
EHKCDBEO 
DKKCDSCP 
EHKCBSTO 
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DBKCFGII 
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DMKCFHBK 


000018 


DBKCNS 


DBKCPV 


DBKDSP 


DBKGBF 


DBKHVC 


DBKIOE DBKBCH DBKPBG DBKPSA DBKPTR DBKBGA DBKRBH & 






DMKSYM 


DBKTSC 


DBKVCN 


DBKVBA 








DMKCFMES 


000006 


DMKCPI 


DBKGBF 


DHKBVC 


EBKBGA 


DBKSYB 


EBKVCH 
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000002 


DBKCFC 


DBKSYB 
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000002 


DBKCFC 


DBKSYfl 












DWKCKP 


000006 


DBKCPI 


DBKPGT 


DBKSAV 










EMKCKPES 


000001 


DBKS&V 












n 


DHKCKPST 


000001 


DBKSAV 












o 


EMKCKPT 


000002 


DBKSAV 


DBKSYB 










01 


DHKCKSIH 


000001 


DBKUBB 












EMKCKSPL 


000018 


DBKCSO 


DBKCSP 


DBKCSD 


DBKSID 


DBKRSP 


DBKSPL DBKVSP DBKHRB 


» 


DMKCKSBH 


000001 


DHKWBB 
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EHKCMSED 


000006 


DBKGRF 


DBKRGA 


DBKBNH 


DBKSYB 
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n 


DHKCHSEN 


000003 


DBKCPI 


DBKCPV 


DBKSYB 








EHKCNSIC 


000002 


DBKQCN 


DBKSYB 










P 


DMKCNSIH 


000002 


DBKIOS 


DBKSYB 










n 


EHKCPBEX 


000002 


DBKCFC 


DBKSYB 












DBKCPBKB 


000002 


DBKCFC 


DBKSYB 












EKKCPBBS 


000002 


DBKCFC 


DBKSYB 












DBKCPBBi 


000002 


DBKCFC 


DBKSYB 












EHKCPBBY 


000002 


DBKCFC 


DBKSYB 












DMKCPBSB 


000002 


DBKCFC 


DBKSYB 












EMKCPE 


000002 


DBKFRE 


DBKLDOCE 












DBKCPEID 


000005 


DBKCPI 


DBKHVD 


DBKBON 


DBKSEP 


DBKSYB 






EMKCPEND 


000003 


DBKCPI 


DBKSYB 












DMKCPICD 


000001 


DBKSAV 














EMKCPIEM 


000002 


DBKCNS 


DBKGRF 












DBKCPIBT 


000002 


DBKSAV 


DBKSSP 












EHKCPVAA 


000002 


DBKHVD 


DBKSYB 












DMKCPVAC 


000002 


DBKCFC 


DBKSYB 












EHKCPVAE 


000003 


DBKCPI 


DMKRNH 


DBKSYB 










DMKCPVDS 


000002 


DBKCFC 


DBKSYB 












EMKCPVEN 


000002 


DBKCFC 


DBKSYB 












DMKCPVH 


000002 


DBKCFC 


DBKSYB 












EMKCPVLK 


000002 


DBKCFC 


DBKSYB 












DMKCPVEY 


000002 
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EHKCQGEN 


000002 


DBKCFC 


DBKSYB 
























DBKCQPBV 


000002 


DBKCFC 


DBKSIB 
























EHKCQRZY 


000002 


DBKCFC 


DBKSYB 
























DHKCQBFI 


000003 


DBKCPI 


DBKLOG 


DBKSYB 






















DMKCSOES 


000002 


DBKCFC 


DBKSYB 
























DHKCSODB 


000002 


DBKCFC 


DBKSYB 
























EMKCSOFL 


000002 


DBKCFC 


DBKSYB 
























DUKCSOID 


000002 


DBKCFC 


DBKSYB 
























EHKCSOHP 


000002 


DBKCFC 


DBKSYB 
























DBKCSOSD 


000005 


DBKCPI 


DBKCSP 


DBKCSD 


DBKBSP 


DBKSYB 


















EHKCSOSP 


000002 


DBKCFC 


DBKSYB 
























DMKCSOST 


000002 


DBKCFC 


DBKSYB 
























EHKCSOVL 


000002 


DBKCFC 


DBKSYB 
























DMKCSPCL 


000002 


DBKCFC 


DBKSYB 
























EMKCSPFS 


000002 


DBKCFC 


DBKSYB 
























DBKCSPHL 


000002 


DBKCFC 


DBKSYB 
























EBKCSPSP 


000002 


DBKCFC 


DBKSYB 
























DBKCSTAG 


000001 


DBKCFC 


























DBKCSOCH 


000002 


DBKCFC 


DBKSYB 
























DBKCSDCB 


000002 


DBKCFC 


DBKSYB 
























EBKCSOPD 


000002 


DBKCFC 


DBKSYB 
























DBKCSDTB 


000002 


DBKCFC 


DBKSYB 
























EBKCVTED 


000060 


DBKCDB 


DBKCKS 


DBKCPI 


DBKCPV 


DBKCQG 


DBKCQP 


DBKCQB 


DBKCSD 


DBKDEF 


DBKDIA 


DBKEBB 


DBKGBF 








DBKLNK 


DBKLOG 


DBKQCH 


EBKB6A 


DBKBSP 


DBKSEP 


DBKSPL 


DBKTHI 


DBKDSO 


DBKVDB 


DBKWBB 






EBKCVTBH 
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DBKCCH 
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DBKCFG 
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BBKDSP 


DBKLNK 
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DBKBSW 


DBKNES 


DBKBET 


DBKBLD 
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DBKBGA 


DBKBNH 


DBKBSP 


DBKSAV 


DBKSEP 








DBKSSP 


DBKTHI 


DBKTBC 


EBKDSO 


DBKVCA 


DBKVCH 


DBKVDB 


DBKVDB 


DBKVDS 


DBKVEB 


DBKVBA 


DBKVSP 




EBKCVTEB 


000032 


DBKCDB 
DBKDEF 


DBKCDS 
DBKGBF 


DBKCFC 
DBKHVD 


DBKCFG 
DBKBCC 


DBKCFS 
DBKBSG 


DBKCFT 
DBKNES 


DBKCQG 
DBKRGA 


DBKCQB 


DBKCSO 


DBKCSP 


DBKCST 
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DBKCFS 
DBKSEP 
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DBKSPL 
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DBKDSO 
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EBKCVTFP 


000001 


DBKCDB 
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DBKCPV 


DBKIOS 


DBKSYB 
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000003 


DBKCCH 


DBKCPV 


DBKSYB 
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000002 
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DBKSYB 
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EHKDIAL 

DBKDIASH 

EMKDMPAU 

DMKDHPDK 

EMKDBPEV 

DHKDMEGH 

EHKDMPRC 

DMKDMPES 

EMKDHPSF 

DHKDHPSH 

EMKDMPTR 

DHKDRDED 

EHKBRDER 

DMKDRDHP 

EHKDRBSY 

DBKDSPA 

EMKDSPAC 

DKKDSPB 

EMKDSPEC 

DMKDSPCC 

EHKDSPCH 



EMKDSPCK 
DMKDSPIT 
EHKDSPNP 
DHKDSPET 
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DBKDSPBQ 
EBKEIG80 
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EBKFCBLD 000002 



DBKCFC 
DKKCCH 
DBKCFS 
DBKPHG 
DBKCFS 
DHKPBG 
DHKCPI 
DBKCPV 
DHKCPI 
DBKCFS 
DHKCDB 
DHKSPL 
DHKHVD 
DBKHVD 
DHKHVD 
DHKPRV 
DMKHOH 
DBKCFB 
DHKHON 
DBKHON 
DMKACO 
DHKGRF 
DHKPSA 
DBKTMR 
DHKMOH 
DKKHOH 
DHKCPS 
DBKHON 
DHKSYH 
DHKSTK 
DHKIOG 
DBKEBH 
DHKERH 
DHKLMK 
DHKACO 
DBKCPV 
DHKLNK 
DHKBSP 
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DHKSYH 
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DBKPRG 
DHKSYH 
DBKSYB 
DBKCFH 
DHKBVC 
DBKPTR 
DHKUEB 



DHKCPI 



DBKSYB 
DBKSYB 



DHKLOG 
DHKBLD 
DHKCQG 
DBKLOG 
DBKSHC 



DBKVCA 

DHKSYH 
DHKCQE 
DHKSYH 

DHKSYH 



DHKPRV 



DHKCFP 
DHKIOE 
DHKQCN 
DHKONT 



DBKCPV 



DBKSYH 
DHKCDB 
DHKCQP 
DHKHCC 
DHKSYH 



EHKPSA 



DBKCSS 
EHKIOS 
DBKRGA 
EBKOSO 



DBKFHE 



DBKCDS 
EBKCQR 
DBKBCH 
EBKTBI 



DHKCPE DHKCPI 

DHKLOC DHKHCH 

BHKRGE DHKBHH 

DHKVAT DBKVCA 



DBKBOH 



DBKPGS 



DBKCPV 
DHKHOH 
DHKRSP 
DHKVCH 



DBKPTR 



DBKCSO 
DHKSLD 
DHKSCH 
DHKVDB 



DHKSCH 



DHKDAS 
DBKPAG 
DHKSEP 
DHKVIO 



DHKSYH 



DHKDGD 
DHKPGT 
DHKSPL 
DHKVHA 



DBKVHA 



DBKDIA DHKGIC 

EHKPRG DHKPRV 

DHKSYH DHKTDK 
DHKVSP 



DHKCFC DHKCFD 

DHKCSO DHKCSP 

DBKBID DBKHON 

DHKTRA DBKOSO 



DBKCFG 
DBKCST 
DHKHSG 
DHKVCH 



DBKCFS 
DBKCSO 
DBKNES 
DHKVDB 



DHKCFT 
DHKDEF 
DHKNET 
DHKVDS 



DHKCKS 
DBKDIA 
DBKNLD 
DBKVBA 



DBKCNS DHKCPB 

DHKIOF DHKIOG 

DBKRGA DHKRNH 

DHKVSP DHKHRH 
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DHKFREE 000320 



EMKFBEBI 
DMKFKEIG 
EMKFRELO 
DMKFRELS 
EMKFHENP 
DHKFREBS 
EMKFRES? 
DBKFBET 



000002 
000002 
000003 
000001 
000002 
000002 
000002 
000285 



DMKFHETR 
EHKGIOEX 
DHKGBFEH 
EBKGRFIC 
DMKGEFIH 
EHKHVCAL 
DMKHVCDI 
EMKHVCPC 
DHKHVDAl 
EMKIOCVT 
DMKIOECC 
EMKIOECQ 
DMKIOEES 
EMKIOEFL 
DBKIOEFH 
EMKIOEIQ 
DHKIOEIB 
EHKIOEMC 
DBKIOEHP 
EHKIOEBQ 
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000002 
000002 
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DBKACO 
DBKCFS 
DBKCSD 
DBKIOE 
DBKBSH 
DBKBPA 
DBKDSO 
OBKHBB 
DBKCPI 
DBKCPI 
DBKCPI 
DBKSYB 
DBKSYB 
DBKSYB 
DBKCPI 
DBKACO 
DBKCNS 
DBKDEF 
DBKIOS 
DBKPGS 
DBKSPL 
DBKVCA 
DBKCPI 
DBKHVC 
DBKCPV 
DMKQCH 
DBKIOS 
DBKPBV 
DBKBON 
DBKDBD 
DBKHVC 
DBKIOF 
DBKCCH 
DBKIOF 
DBKIOF 
DBKCPI 
DBKHVD 
DBKIOF 
DBKCFS 
DBKBCH 
DBKIOF 
DBKIOF 



DBKBLD 
DBKCKS 
DBKDAS 
DBKIOF 
DBKNES 
DBKBSE 
DBKVAT 

DBKSYB 
DBKSYB 
DBKSYB 

DBKDSO 
DBKOSO 
DBKSYB 
DBKBLE 
DBKCPB 
DBKDGE 
DBKLNK 
DBKPGT 
DBKSYB 
DBKVCH 
DBKPTB 
DBKSYB 
DBKSYB 
DBKSYB 
DBKSYB 
DBKSYB 
DBKSYB 



DBKIOG 
DBKSYB 



DBKIOG 



DBKBSC 
DBKCNS 
DBKDEF 
DBKIOG 
DBKNET 
DBKBSP 
DBKVCA 



DBKDSO 



DBKBSC 
DBKCPI 
DBKDIA 
DBKIOC 
DBKPSA 
DBKTAP 
DBKVCN 
DBKSYB 



DBKCCB 
DBKCPE 
EBKEGB 
DBKIOS 
DBKHLD 
EBKSCB 
DBKVCH 



DBKCCB 
DBKCPV 
EBKERD 
DBKIOG 
EBKPTB 
DBKTDK 
DBKVDB 



DBKCCB 
DBKCPI 
DBKDIA 
DBKISB 
DBKPAG 
DBKSPL 
DBKVCN 



DBKCCH 
DBKCQG 
DBKDSP 
DBKBCC 
DBKQCN 
DBKTHI 
DBKVDR 



DBKCDB 
DBKCPV 
DBKDBD 
DBKLBK 
DBKPGT 
DBKSYB 
DBKVDB 



DBKCDB 
DBKCQP 
DBKERB 
DBKBON 
DBKBGA 
DBKTBR 
DBKVDS 



DBKCDS 
DBKCQG 
DBKDSP 
DBKLOC 
DBKPSA 
DBKTAP 
DBKVDR 



DBKCFD 
DBKCQE 
DBKGIO 
DBKBSG 
DBKRGB 
DBKTRA 
DBKVER 



DBKCFC 
DBKCCP 
DBKERB 
DBKLOG 
DBKPTB 
DBKTDK 
DBKVDS 



DBKCFG 
DBKCSO 
DBKGRF 
DBKBSH 
DBKRNH 
DBKTRC 
DBKVIO 



DBKCFD 
DHKCQB 
DBKGIO 
DBKBCC 
DBKQCN 
DBKTHI 
DBKVER 



DBKCFB 
DBKCSP 
DBKHVC 
DBKNES 
DBKRSE 
DBKDDB 
DBKVBA 



DBKCFG 
DBKCSO 
DBKGRF 
DBKBCH 
DBKRGA 
DBKTBR 
DBKVIO 



DBKCFP 
DBKCST 
DBKHVD 
DBKHET 
DBKRSP 
DBKDNT 
DBKVSP 



DBKCFB 
EBKCSP 
DBKHVC 
DBKBON 
DBKRGB 
DBKTRA 
DBKVBA 



DBKCFP 
EBKCST 
DBKHVD 
DBKBSG 
DBKRNH 
EBKDDR 
DBKVSP 



DBKCFS 
DBKCSD 
DBKIOE 
DBKNLD 
DBKSCH 
DBKDSO 



DBKCKS 
DBKDAS 
DBKIOF 
DBKPAG 
DBKSEP 
DBKVAT 
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Label 



DHKIOEHS 

EHKIOEMX 

DHKIOEHI 

EMKIOENQ 

DMKIOECP 

DMKIOEHN 

DMKIOEBP 

EMKIOEFQ 

DHKIOEBB 

EMKIOESD 

DMKIOESQ 

EHKIOESR 

DBKIOEST 

EHKIOEVQ 

DHKIOEVB 

EHKIOF 

DMKI0FC1 

EMKIOFIN 

DMKI0FB1 

EBKIOFOB 

DMKIOFST 

EHKIOFVB 

DHKIOG 

EHKI0GF1 

DI1KI0GF2 

EHKIOSCT 

DHKIOSEB 

EMKIOSE& 

DMKIOSIS 

EHKIOSQB 

EHKIOSQT 

DBKIOSBC 

EHKIOSBW 

DHKISMIB 

EHKLNKIN 

DHKINKSB 

EHKLOC 

DMKLOCK 

EHKLOCKD 

DMKLOCKQ 

EMKLOCKT 
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000011 
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DMKIOF 
DMKIOF 
DBKIOF 
DMKIOF 
DHKIOF 
DHKRGA 
DBKIOF 
DBKIOF 
DBKCNS 
DBKDAS 
DBKIOF 
DBKCPV 
DBKBSC 
DBKIOF 
DHKVEE 
DBKSYB 
DBKIOE 
DBKIOE 
DBKIOE 
DBKIOE 
DBKIOE 
DBKIOE 
DBKSYB 
DBKIOE 
DBKIOE 
DBKBON 
DBKDSP 
DBKCFP 
DBKCPI 
DBKACO 
DBKPAG 
DBKDGD 
DBKDSP 
DBKCPB 
DBKCCH 
DBKCFC 
DBKIOG 
DBKSYB 
DBKLNK 
DBKCFP 
DBKCFP 
DBKCKS 



DBKIOG 
DBKIOG 
DBKIOG 

DBKIOG 
DBKRNH 



DBKG6F 



DBKNES 
DBKCHS 



DBKSYB 

DBKCPV 
DBKSYB 
DBKCFP 
DBKBGA 
DBKGIO 

DBKVDR 
DBKSYB 
DBKSYB 
DBKSYB 



DBKCKS 
DBKCKS 



DBKIOS 



DBKNET 
DBKDAS 



DBKSYB 



DMKGEF 



DBKRSE 



DBKTAP 



DBKDIA 

DBKCNS 
DBKBGB 
DBKSYB 



DBKSYB 

DBKCPB 
DBKBNH 
DBKVIC 



DBKCPI 
DBKBSP 



DBKCPV 
DBKSEP 



DBKCSO 
DBKSPL 



DBKDAS 
DBKSYB 



DBKDIA 
DBKTDK 



DBKGRF 
EBKUDB 



DBKBON 
DBKVEB 



DHKNLD 
DBKVDR 
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DBKDEF 
DBKDEF 



DBKLNK 
EMKTAP 



DBKTAP 
DBKTRA 



DMKTBA 
DBKTRC 



DBKTRC 
DBKDDR 



DBKDDR 
DBKDSO 



DMKDSO 
DHKVDB 



DBKVDB 
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Ul 
00 



DBKIOGA 

CHKLOGON 

DHKIOGCF 

EMKHCCCL 

DMKHCHiB 

DMKHCBEL 

DHKHCHIH 

EMKHCHHS 

DHKHCHBD 

EHKBIDNT 

DHKHOMIO 

EHKMONHI 

DHKHONSH 

EMKHONTH 

DMKBONTT 

EMKHSGEC 

DHKMSGHS 

EMKHSGnN 

DHKMSVB 

EHKNEMOP 

DMKFESDS 

EHKHESEP 

DMKNESHD 

EMKNESPL 

DH^HESIB 

EBKNESNN 

DMKNETAE 

EBKNETWK 

DBKVLDBF 

EBRNLDB 

DBKOPRST 

EBKPAGCC 

DBKPAGHI 

EBKPAGIC 

DBKPAGIO 

EBKPAGLO 

DBKPAGPS 

EBKPAGQ 

DBKPAGCB 

EBKPAGSP 
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DBKCFC 
DBKCPI 
DBKCFC 
DBKCCH 
DBKIOG 
DBKCPI 
DBKCFS 
DBKIOG 
DBKSCH 
DBKSYB 
DBKBCC 
DBKCPV 
DBKBCC 
DBKBCC 
DBKCFC 
DBKCFC 
DBKCFC 
DBKBSC 
DBKSYB 
DBKSET 
DBKSET 
DBKEET 
DBKNET 
DBKBET 
DBKNET 
DBKCPI 
DBKCFC 
DBKFET 
DBKCPI 
DBKCCH 
DBKBON 
DBKCPI 
DBKSYB 
DBKCDS 
DBKCPI 
DBKBCH 
DBKPTB 
DBKCQB 
DBKSYB 
DBKCPI 
DBKPSG 



DBKSYB 
DBKSYB 
DBKSYB 
DBKCFS 

DBKSYB 
DBKSYB 

DBKSYB 



DBKBCC 
DBKSYB 

DBKSYB 
DBKSYB 
DBKSYB 
DBKCHS 
DBKTBC 



DBKSYB 
DBKBNH 
DBKNET 
DBKCKP 
DBKSYB 



DBKPTB 



DBKSYB 
DBKSYB 



DBKSYB 
DBKPBV 



DBKIOG 



EBKSYB 



DBKDAS 



DBKGBF 



DBKBSE 



DBKSYB DBKTAP 



DBKSYB 
DBKBNH 
DBKDBP 



DBKBPA 



DBKSYB 
EBKBCE 



EBKSYB 



DBKPAG 



DBKBSP DBKSAV 



DBKSYB 



DBKVAT 



n 
»n 

t-l 

pi 
o* 

(D 
M 
I 
f+ 

o 
I 

at 
o 

a 



o 
n 
o 

01 

» 

(D 
Hi 
(D 

(0 

a 

n 



U) 

o 



< 

EX 
\ 
Ul 

o 



Vi 

m 
n- 

(D 

B 

f 
O 

>a 
o 

o> 

s 

n 
o 
tr 

M 
(!) 

a 

t3 
(D 
f+ 
(D 

n 

a 

!-•• 
9 
P> 
f+ 
H- 
O 
9 

ff) 

e 

H' 
Pi 



Label 



DMKPEBT 

EMKPGS 

DMKPGSFS 

EMKPGSPO 

DHKPGSEP 

DHKPGSPS 

DHKPGSSS 

EHKPGTBN 

DMKPGTCG 

EMKPGTPG 

DBKPGTEB 

EMKPGTPO 

DHKPGTPa 

EMKPGTP5 

DHKPGTSD 

EHKPGTSG 

DMKPGTSP 

EBKPGTSR 

DHKPGTTH 

EMKPGTTO 

DBKPGTTO 

EMKPGTT4 

DMKPGTT5 

EHKPGTVG 

EMKPGTVR 
DMKPGT4P 
EHKPGTUT 
DMKPGT5P 
EMKPGT5T 
DBKPGT90 
EBKPRGCT 
DBKPEGC8 
EHKPRGGR 
DBKPRGI« 
EHKPRGMC 
DBKPRGBI 
EMKPRGRF 
DBKPRGSB 
EBKPRGTI 
DBKPRVCD 
EBKPRVCE 



Count 



000003 
000001 
000001 
000007 
000004 
000002 
000001 
000002 
000001 
000003 
000003 
000003 
000003 
000004 
000004 
000006 
000001 
000001 
000004 
000003 
000004 
000004 
000004 
000022 

000020 
000003 
000004 
000003 
000004 
000002 
000002 
000012 
000007 
000002 
000012 
000002 
000002 
000008 
000006 
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DBKCFP 
DHKSYB 
DBKCFG 
DBKCFG 
DBKCFG 
DBKCFG 
DBKHVC 
DBKCPI 
DBKBLD 
DBKCPI 
DBKPGS 
DBKCPI 
DBKCPI 
DBKCPI 
DBKDBD 
DBKESP 
DBKBPA 
DBKSPL 
DBKCPI 
DBKCKS 
DBKCPI 
DBKCPI 
DBKCPI 
DBKCFG 
DBKWBB 
DBKCFG 
DBKCPI 
DBKCPI 
DBKCPI 
DBKCPI 
DBKCPI 
DBKBOH 
DBKBCC 
DBKBON 
DBKCPI 
DBKCPV 
DBKBCC 
DBKPSA 
DBKHVC 
DBKBCC 
DBKBOH 
DBKBON 



DBKDSP 



DBKCFP 
DBKCFP 



DBKSYB 

DBKPTR 
DBKPTB 
DBKTDK 
DBKTEK 
DBKTDK 
DBKNLE 
DBKSPL 



DBKSYB 
DBKCPI 
DBKTEK 
DBKTDK 
DBKTDK 
DBKCKS 

DBKCKS 
DBKTDK 
DBKTDK 
DBKTEK 
DBKTDK 
DBKVEE 
DBKSYB 
DBKBON 
DBKSYB 
DBKSYB 
DBKDBP 
DBKBON 
DBKSYB 
DBKPRV 
DBKBON 



DBKOSO 



DBKCPB 
DBKCPV 



DBKSYB 
DBKBPA 
DBKVDB 
DBKVDE 
DBKOSO 
DBKSPL 
DBKVSP 



DBKVDE 
DBKSYB 
DBKVDB 
DBKVDB 
DBKVDB 
DBKCST 

DBKCST 
DBKVDB 
DBKVDB 
DBKVDB 
DBKVDB 



DBKSYB 



DBKBCC 



DBKSYB 



DBKEEF 
EBKSYB 



DBKBCH 



DBKSYB 



DBKOSO 



DBKVDB 



DBKEED 



DBKDBD 



DBKIOF 



DBKIOF 



DBKIOG 



DBKIOG 



DBKNLD 



EBKNLD 



DBKBSP 



DBKBSP 



DBKSEP 



DBKSEP 



DBKSPL 



DBKDDR 



DBKDDB 



DBKVSP 



DBKVSP 



DBKHEB 



DKKHCN 



DBKTBR 



DBKSYB 



DBKVAT 
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DMKPRVCH 

EHKPRVCP 

DMKPRVCS 

EMKPRVCT 

DMKPRVDI 

EMKPRVEK 

DHKPRVEP 

EHKPRVIK 

DMKPRVIP 

EHKPRVLC 

DMKPRVLG 

EMKPRVLP 

DBKPRVIR 

EBKPRVMN 

DHKPRVHO 

EHKPRVMS 

DMKPRVSC 

EMKPRVPB 

DHKPRVEE 

EMKPRVPT 

DHKPSVBE 

EMKPRTTC 

DHKPEVTE 

EHKPSA 

DHKPSaCC 

EHKPSAEO 

DHKPSAEX 

EMKPSAFP 

DHKPSABI 

EHKPSALO 

DHKPSABS 

EMKPSANX 

DHKPSABG 

EHKPSARE 

DMKPSABS 

EHKPSABX 

DMKPSASC 

EMKPSASP 

DHKPSASV 

EMKPTRAN 
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DHKLDO 
DHKCDS 
DHKCPI 
DHKCPI 
DHKPRV 
DHKCPI 
DHKCPI 
DHKCPI 
DHKHON 
DHKSYH 
DHKTRC 
DHKTBC 
DHKTRC 
DHKCDS 
DHKDRD 
DHKCPI 
DHKCCH 
DHKDSP 
DHKPRG 
DHKTHB 



DHKSYH 



DHKSYH 



OE 



DHKDGD DHKVCN 

DHKSYH 

DHKSYH 

DHKTHR 



DHKSYH 



DHKCFD DHKDGD 

DHKHVC DHKHVD 

DHKSYH 

DHKCDB DHKCDS 

DHKEBH DHKGIO 

DHKPRV DHKPSA 



DHKVSP 



DHKUER 



DHKVAT 



EHKTRC 
DHKPRV 

DHKCFD 
EHKGRE 
DHKRGA 
EHKVCB 



DHKVCN DHKVSP 

DHKTHR DHKTBC 

DHKCFG DHKCKS DHKCNS DHKCPB DHKCPI DHKCPV 

DHKHVC DHKHVD DHKIOF DHKIOG DHKISH DHKHCC 

DHKEGB DHKBPA DHKRSP DHKSCH DHKSEP DHKSNC 

DHKVCN DHKVEB DHKVIO EHKVHA DHKVSP DHKURH 



DHKDGD DHKDBD 
DHKNLD DHKPGS 
DHKSPL DHKSYH 
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EMKPTBCS 
DMKETBCT 
DMKPTBFA 
DHKPTBFC 
EHKPTBFD 
DMKPTBFE 
EMKPTBFF 
DHKPTBFL 
EMKPTBFN 
DMKPTBFP 
EHKPTBFB 
DMKPTBFT 
EHKPTBFO 
DMKPTfiFl 
EHKPTELK 
DHKPTBEB 
EHKPTBPi 
DMKPTBBC 
EHKPTBBF 
DHKPTBBL 
EMKPTBBQ 
DHKPTBBT 
EMKPTBBO 
DBKPTBSC 
EHKPTBSS 
DHKPTBSH 
EHKPTBDL 

EMKPTB01 
DHKPTBHQ 
EHKQCNCL 
DMKQCHET 
EMKQCNBD 
DHKQCHSY 
EHKQCNTO 
DBKQCHST 



Count 



000001 
000001 
000001 
000002 
000001 
000001 

oooooa 

000001 
000002 
000001 
000005 
000010 
000001 
000001 
000005 
000002 
000003 
000005 
000001 
000003 
000002 
000001 
000002 
000005 

oooooa 

000001 
000036 

000002 
000004 
000017 
000012 
000014 
000004 
000008 
000174 



EMKBG&IN 000003 
DMKBGBEB 000004 



Beferences 



DHKHOM 
DHKSIH 
DHKCPI 
DHKHOH 
DHKDSP 
DHKDSF 
DMKCQE 
DMKSCB 
DMKCPI 
DHKDSP 
DMKCCW 
DHKDGD 
DHKHON 
DHKCPI 
DHKACO 
DHKHOH 
DMKCFP 
DHKCFS 
DHKHOH 
DHKCFS 
DHKPAG 
DHKDSP 
DHKCFS 
DHKHON 
DHKCQB 
DHKHOH 
DHKACO 
DHKPSA 
DHKCPI 
DHKCDS 
DHKCNS 
DHKCMS 
DHKCFG 
DHKCFP 
DHKCNS 
DHKACO 
DHKCPV 
DHKIOE 
DHKPBG 
DHKOSO 
DHKIOS 
DHKSES 



DHKSIH 

DHKHON 

DHKHOH 

DHKDGD 
DHKFBE 



DMKCPI 
DHKSIH 
DHKPGS 
DHKDSP 

DHKSCH 
DHKSIH 

DHKOSO 
DHKPGS 
DHKHOH 

DHKCCH 
DHKBPA 
DHKSCH 
DHKPAG 
DHKDIA 
DHKGBF 
DHKCFH 
DHKCKS 
DHKGBF 
DHKBLD 
DHKCQG 
DHKLHK 
DHKPSA 
DHKVCA 
DHKBGB 
DHKHET 



DHKPAG 



DHKFBE 
DHKHCB 



DHKCPV 



DHKVAT 
DHKHOH 



DHKOSO 



DHKSIH 
DHKPAG 

DHKCFG 
DHKSEP 

DHKBPA 
DHKGBF 
DHKBGA 
DHKCFS 
DHKLOG 
DHKHES 
DHKCCB 
DHKCQP 
DHKLOG 
DHKPTB 
DHKVCH 
DHKSIH 
DHKSIH 



DHKSIH 



DHKHCC 
CHKHOH 



DHKSEL 



DHKPGS 



EHKVHA 
DHKSIH 

DHKCKS 
DHKSHC 

EHKSIH 
DHKHES 
DHKBGB 
DHKCPI 
DHKSIH 
DHKHLD 
EBKCDB 
DHKCQB 
DHKHCC 
DHKBGA 
EHKVCH 



DHKPGS DHKBPA 



DHKSIH 



DHKCPI 
DHKSPL 



DHKHLD 
DBKBHH 
DHKLNK 

DHKBGA 
DHKCDS 
DHKCSO 
DHKHCH 
DHKBHB 
DHKVDB 



DHKCPV 
DHKDHT 



DHKPSA 
DHKSIH 
DHKHSG 

EHKBHH 
DHKCFC 
DHKCSO 
DHKHID 
DHKBSP 
DHKVDB 



DHKDDB 



DHKCSO 
DHKVIO 



DHKBGA 

DHKHSW 

DHKSIH 
DHKCFD 
DHKDAS 
DHKHSG 
DHKSPL 
DMKVEB 



DHKDHT 



DHKDGD 
DHKVSP 



DHKIOF 



DHKISH 



DHKHON 



DHKNID 



DHKBNH DHKSIH 

DHKNLD DHKSIH DHKVCH 



DHKCFG 
DHKDEF 
DHKHSfi 
DHKSIH 
DHKHBH 



DHKCFH 
DHKDIA 
DHKHES 
DHKTHI 



DHKCFS 
DHKDSP 
DHKHET 
DHKTBA 



DHKCPB 
DHKEBM 
DHKHLD 
DHKTBC 



DHKCPI 
DHKGBF 
DMKPGT 
DHKUDE 
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Count 



Bef erences 



EHKRGBIC 

DHKBGBHT 

EHKBGBSN 

DHKBIO 

EHKRIOCH 

DMKRIOCN 

EMKBIOCU 

DBKBICDV 

EHKRIOPfi 

DMKBIOED 

EHKBIOBD 

DHKBIOEN 

EMKRNHCT 

DHKBNHIC 

EHKBHHIN 

DHKBHHIID 

EMKBNBTG 

DMKBBHIB 

EMKBHTBL 

DHKBPAGT 



000004 
000001 
000001 
000002 
000002 
000006 
000004 
000006 
000004 
000002 
000002 
000014 
000001 
000002 
000003 
000015 
000001 
000004 
000002 
000043 



DHKBPAPT 000024 



DBKBSEBB 

EMKBSPflC 

DBKBSPCV 

EMKBSPEL 

DMKBSPEB 

EHKBSPEX 

DMKBSPHQ 

EMKBSPID 

DMKRSPEB 

EHKRSPPU 

DBKRSPBD 

EBKRSPOfi 

DBKfiSP83 

EBKSAV 

DBKSAVBS 

EBKSCHAL 

DBKSCHAP 

EMKSCHAO 

DHKSCHCO 



000002 
000003 
000005 
000009 
000002 
000005 
000009 
000008 
000005 
000004 
000005 
000002 
000002 
000004 
000001 
000002 
000002 
000004 
000001 



DHKQCN 
DBKBGA 
DBKBGA 
DHKSSP 
DBKSSP 
DBKCPI 
DBKSSP 
DBKCPB 
DBKCQB 
DBKSSP 
DBKSSP 
DBKBLD 
DHKSYB 
DBKQCN 
DBKIOS 
DBKDIA 
DBKSYB 
DBKSES 
DBKNLD 
DBKCFG 
DBKVSP 
DBKCFG 
DBKHBB 
DBKBSP 
DBKCKP 
DBKCKP 
DBKCKP 
DBKIOS 
DBKACO 
DBKCKP 
DBKCKP 
DBKCKP 
DBKCKP 
DBKCKP 
DBKCQP 
DBKBSE 
DBKCKP 
DBKCKP 
DBKBON 
DBKCFS 
DBKCFS 
DHKTHI 



DBKRGA 



DBKSYB 
DBKGBF 
DBKSYB 
DBKSSP 
DBKDBP 
DBKSYB 
DBKSYB 
DBKCPI 

DBKSYB 
DBKNLD 
DBKHES 

DBKSYB 
DBKSNC 
DBKCKS 
DBKHBB 
DBKCKS 

DBKSYB 
DBKSYB 
DBKSYB 
DBKSPL 
DBKSYB 
DBKCSO 
DBKCKS 
DBKCKS 
DBKCQB 
DBKCQR 
DBKCQB 
DBKSYB 
DBKSYB 
DBKCPI 



DBKSYB 



DBKOPE EBKSSP 



DBKSYB 
DBKSSP 



DBKSYB 
DBKNET 



DBKCST 
DBKCPI 



DBKWBB 
DBKWBB 
DBKSYB 

DBKIOS 
DBKCQB 
DBKDBP 
DBKSYB 
DBKSYB 
DBKSYB 



DBKSYB 
DBKSYB 
DBKSYB DBKDSC 



DBKSYB 



DBKSYB 



DBKCQP DBKEIA DBKNES DBKNET 



DBKBNH 



DBKSYB 



EBKPSA 



EBKEBD 
EBKCST 



DBKiRB 

DBKSPL 
EBKCSP 
DBKNLD 
DBKHBB 
DBKHBB 
EBKHBB 



DBKSYB 



DBKHVD 
DBKIOF 



DBKIOF 
DBKIOG 



DBKIOG 
DBKNLD 



DBKNLD 
DBKBSP 



DBKBSP 
DBKSNC 



DBKSPL 
DBKSPL 



DBKSYB 
DBKSYB 



DBKUDB 
DBKVSP 



DBKSYB 
DBKSPL 
DBKSPL 



DBKSYB 
DBKSYB 



DBKHBB 
DBKHBB 
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Label 



Count 



References 



DMKSCHCP 
DHKSCHCT 
DMKSCHCU 
DMKSCHDL 
DMKSCeiB 
DMKSCHII 
EHKSCHMD 
DBKSCHIII 
DHKSCHN2 
DHKSCHEB 
EBKSCHPD 
DBKSCHEG 
DMKSCHPU 
DHKSCHCl 
EKKSCBQ2 
DMKSCHBL 
EMKSCBBT 

EMKSCBSC 
DHKSCHST 
EHKSCBS1 
DBKSCHS2 
EHKSCBTI 
DMKSCHTQ 
EBKSCBDB 
DBKSCHS1 
EHKSCBW2 
DMKSCH80 
EMKSCNAD 



000002 
000002 
000001 

ooooia 

000001 
000002 
000002 
000006 
000005 
000001 
000001 
000003 
000003 
000003 
000002 
000002 
000016 

000001 
000011 
000001 
000001 
000001 
000002 
000001 
000003 
000003 
000003 
000021 



EMKSCNFD 000178 



DBKSC81I 000001 
EBKSCNBD 000048 



DBKSCNBN 000015 
EBKSCNRU 000048 



DBKSCNVD 000011 



DBKBLD 
DHKBON 
DBKTBI 
DHKDSP 
DBKSYB 
DHKCPI 
DBKCPI 
DBKDSP 
DBKDSP 
DBKSYB 
DBKSYB 
DWKCFS 
DBKBON 
DBKCPI 
DBKCPI 
DBKDSP 
DBKCFC 
DBKTBB 
DBKTHI 
DBKCFC 
DBKTBI 
DBKTBI 
DBKCPI 
DBKPSA 
DBKSYB 
DBKBON 
DBKBON 
DBKCFS 
DBKCFD 
DBKSPl 
DBKCDB 
DBKCQB 
DBKNBS 
DBKLNK 
DBKBLD 
DBKLOG 
DBKOSO 
DBKCPV 
DBKCCB 
DBKGBF 
DBKVDB 
DBKCFT 



DBKSYB 
DBKSYB 

DBKIOS 

DBKTBI 
DBKSYB 
DBKBON 
DBKBON 



DBKCQB 
DBKSYB 
DBKBON 
DBKSYB 
DBKSYB 
DBKCFB 
DBKOSO 



DBKCFS 
DBKNES 
DBKVCH 
DBKCQG 
DBKCFD 
DBKBVD 
DBKVDS 
DBKCPV 



DBKLOG EBKPTR DBKQCN DBKBPA DBKSYB DBKUSO DKKVCA DBKVIO 



DBKPTB DBKSYB 
DBKPTB DBKSYB 



DBKSYB 
DBKSYB 



DBKTBR 
DBKTBB 



DBKCFP DBKCFS DBKGRF DBKLOG DBKBCC DBKBON DBKQCN DBKRGA DBKBGB DBKSYB 



DBKCPI DBKGRF DBKBCC DBKBID DBKBON DBKQCN DBKEGA DBKSYB DBKTBB 



DBKSYB 

DBKSYB 
DBKSYB 
DBKLOG 
DBKCFS 
DBKOSO 
DBKCDS 
DBKCSO 
DBKNET 



DBKSYB 
DBKCPV 
DBKVDB 
DBKCFC 
DBKCSP 
DBKNLD 

DBKCKS 
DBKNET 
DBKVDB 
DBKCQP 
DBKCFS 
DBKIOG 
DBKHRB 
DBKCQP 



DBKCQG DBKCQP DBKCQR DBKCSU DBKDIA DBKLNK DBKLOG 



DBKCFD 
DBKCST 
DBKESE 

DBKCHS 
DBKNLD 
DBKVDB 
DBKDIA 
DBKCKS 
DBKIOS 

DBKCST 



DBKCFG 
DBKCSD 
DBKTHI 

DBKCPI 
DBKPAG 
DBKVDS 
DBKBSfi 
DBKCNS 
DBKLOG 

DBKDEF 



DBKCFB 
DBKDEF 
DBKTBA 

DBKCPV 
DBKPSA 
DBKVEB 
DBKQCN 
DBKCPI 
DBKBCC 

DBKDIA 



DBKCFS 
DBKDIA 
DBKDSO 

DBKCQG 
DBKQCN 

DBKESP 
DBKCPV 
DBKNES 

DBKBVD 



DBKCFT 
DBKLNK 
DBKVDB 

DBKCQP 
DBKBGA 

DBKTBC 
DBKCQP 
DBKNLD 

DBKLOG 



DBKCPB 
DBKLOG 



DBKCQR 
DBKRSP 

DBKDSO 
DBKCSO 
DBKRGA 

DBKVSP 



DBKCPV 
DBKBCC 



DBKDIA 
DBKSEP 



DBKBSG 

DBKCQG 
DBKBCB 



DBKDBP 
DBKTBI 



DBKVDB DBKVDR 
DBKDAS DBKDIA 
DBKRNB DBKBSP 



DHKRNH 

DBKCQP 
DBKBSG 



DBKGRF 
DBKTBC 



DBKDBP 
DBKVCH 



n 

f 
o> 
er 

(D 

I 

<+ 
O 

I 

at 
o 

s 

M 

n> 

o 
» 

o 

Ui 

in 
so 

(D 
l-h 
(D 
H 
(D 
9 
O 
(0 



label 



Count 



References 






EBKSCNVN 000009 
DHKSCH7S 000011 
EHKSCNVD 000063 



EMKSEPEB 

DBKSEPSP 

EliKSEV70 

DHKSIieO 

EHKSLC 

DHKSHCE 

EHKSNTEL 

DHKSPLCB 

EHKSPLC? 

DHKSPLDl 

EHKSPLER 

DHKSPLCB 

EMKSPLOV 

DMKSTKCP 



000001 
000002 
000002 
000002 

000002 
000001 
000002 
000002 
000007 
000001 
000002 
000002 
000043 



EHKSTKIO 000024 



EMKSYH 

DHKSIMTB 

EHKSYSCD 

DHKSTSCH 

EMKSISCK 

DHKSISCS 

EHKSYSCS 

DBKSYSDT 

EHKSYSEU 

DHKSYSDi 

EHKSYSEB 

DMKSYSES 

EHKSYSLB 

DHKSYSIC 

EMKSYSLD 

DMKSYSIE 

EMKSYSLG 

DHKSYSLl 

EMKSYSLH 

DHKSYSBA 



000002 
000001 
000001 
000003 
000020 
000006 
000001 
000004 
000002 
000009 
000003 
000001 
000002 
000001 
000001 
000002 
000006 
000002 
000003 
000001 



DHKCPV 
DHKCF6 
DHKCFD 
DHKDIA 
DUKVCA 
DMKSYM 
DMKESP 
DMKIOG 
DHKIOG 
DHKBLD 
DBKBVD 
DHKCFG 
DBKBSP 
DHKSYH 
DHKCSO 
DHKSYM 
DHKBSP 
DHKSYM 
DHKACO 
DHKPAG 
DHKVSP 
DHKACO 
DHKDHT 
DHKCPI 
DHKCPI 
DHKCFT 
DHKCKS 
DHKACO 
DHKCKS 
DHKSYH 
DHKCFS 
DHKCPI 
DHKCFS 
DHKHVD 
DHKCFT 
DHKLOC 
DHKSYH 
DHKCFT 
DHKBLD 
DHKCFS 
DHKBLD 
DHKCFS 
DHKLOG 



DHKCQG 
DHKCPI 
DHKCFG 
DHKDBD 
DHKVCe 

DHKSYH 
DHKSYH 
DHKSYH 

DHKSYH 

DHKSYH 
DHKVSP 
DHKCSU 

DHKSYH 
DHKVSP 
DHKCFH 
DHKPGT 

DHKCFP 
DHKVCA 
DHKDRD 



DHKDHP 
DHKCCH 



DHKCKP 
DHKNLD 
DHKCPI 
DHKIOG 



DHKCFT 
DHKCKP 



DHKLOG 



DHKCST DHKEEF 

DHKLHK BHKHLD 

DHKCFP DHKCPB 

DHKDSP DHKGIC 

DHKVCH EHKVDB 



DHKLNK 
DHKSNC 
DHKCPV 
DHKHVC 
DHKVDS 



EHKLOG 
DHKVDB 
DHKCQG 
DHKHVD 
DHKVEB 



DHKTRC 

DHKCQP 
DHKLNK 
DHKVIO 



EHKVDB 

DHKCSO 
EHKLOG 
BHKVSP 



DBKCSP 
DHKNLD 



DHKCST 
DHKTHI 



EHKEIF 
DHKTRC 



DHKDGD 
DHKUSO 



DHKRSP 



EBKSYH 



BHKCFP EHKCPV 
DHKPTR DBKQCN 



DHKCPV 
DHKVIO 



DHKCSC 



DHKCKP DBKDIA 

DHKLOG DHKHBH 
EHKCQR EHKLOG 



DHKVSP 



DHKDIA 
DHKRGA 



DBKCSP 



EBKDHP 



DBKBID 



DBKGEF 
DHKRGB 



DHKCSO 



EHKLOG 



DHKDSO 



DBKIOE 
DHKRNH 



DHKDIA 



DHKHCH 



DHKIOF 
DHKRSP 



DHKIOS 



DHKVDS 



DHKIOS 
DHKSPL 



DHKNLD 



DHKLOC 
DHKOSO 



DHKPSA 



DHKBCB 
DBKVCA 



DBKSPL 



EBKBON 
DBKVBA 



DBKTBR 



DBKCQR DBKLCG 



DBKWRH 
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label 



EBKSYSMU 
DMKSYSHD 
rMKSYSSM 
DMKSYSSU 
EHKSYSOC 
DHKSYSCP 
EMKSYSOH 

EHKSYSPL 
DBKSYSBM 

DBKSYSBS 
EHKSYSRV 
DMKSYSTI 
EHKSYSTM 
DMKSYSTP 
EMKSYSTZ 
DMKSYSOD 
EMKSYSVL 
DHKSYSVH 
EMKSYSWH 
DMKTAPEB 
EMKTBLCI 
DHKTBLCO 
EHKTBLGB 
DHKTBIEI 
EHKTBLPO 
DHKTBIII 
EBKTBLTO 
DBKTBLOP 
EBKTBBBI 
DBKTBBBO 
EBKTBBNI 
DBKTBBHO 
EHKTBBZI 
DBKTBMZO 
EBKTDKGT 
DBKTDKBl 
EBKTHIEN 
DBKTHBCK 
EBKTBBPT 
DBKTBRTS 



Count 



OOOOOU 
000004 
000014 
000003 
000010 
000001 
000022 

000003 
000029 

000002 
000009 
000006 
000002 
000003 
000004 
000004 
000004 
000001 
000003 
000002 
000001 
000001 
000004 
000001 
000001 
000001 
000001 
000004 
000001 
000001 
000001 
000001 
000002 
000002 
000002 
000002 
000001 
000001 
000007 
000002 



References 



DBKLOG 
DMKCQB 
DBKCQB 
DBKCPI 
DHKCKP 
DBKSYB 
DBKCKP 
DBKVDB 
DBKDDR 
DBKCCH 
DBKPTB 
DBKS4V 
DBKCFS 
DBKCPI 
DBKCFS 
DBKCKP 
DBKCPI 
DBKCPI 
DBKCPI 
DBKSYB 
DBKCKP 
DBKIOS 
DBKCNS 
DBKCHS 
DBKGRF 
DBKCNS 
DBKCNS 
DBKCHS 
DBKCNS 
DBKCHS 
DBKCHS 
DBKCHS 
DBKCNS 
DBKCHS 
DBKGRF 
DBKGBF 
DBKSYB 
DBKSYB 
DBKCFC 
DBKBLD 
DBKACO 
DBKPRV 



DBKDIJS 
DBKGRF 
DBKSAV 
DBKCPI 

DBKCKS 
DBKHBB 

DBKCCW 
DBKRSP 
DBKSYB 
DBKCPI 
DBKCQB 
DBKLOG 
DBKRSP 
DBKIOE 
DBKUDR 
DBKSAV 

DBKRSP 
DBKSYB 



DBKRGA 



DBKGRF 



DBKRGA 
DBKRGE 
DBKVDS 
DBKVDB 



DBKCKP 
DBKSYB 



DBKBOH 
DBKLOG 
DBKSSP 
DBKBON 

DBKCPI 



DBKCDB 
DBKSYB 

DBKCQP 
DBKLOG 

DBKSAV 
DBKSAV 

DBKSYB 

DBKHBB 



DBKBGB 



DBKBGA 



DBKBOH 
DBKBSE 
DBKEED 



EBKCDS 
DBKTBC 



DBKDBE 
DBKBID 



DBKQCH 
DHKSPL 
DBKBON 



DBKCKP 
DBKDNT 



DBKSYB 
DBKDSO 



DBKUSO 
DBKSYB 
DBKPAG 



DBKCPI 
DBKVCA 



DBKUDB 
DBKPGT 



DBKVDB 
DBKPTR 



DMKBSP 



DBKSPL 



DBKSYB 



DBKUDR 



DBKCQP DBKDIA DBKDBP DBKEBB DBKFBE EBKHVD 



EBKVCN 
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DBKHVC 



DBKBSP 



DBKTHI 



DBKVSP 



label 



Count 



References 






EMKTHHVT 
DMKTEACE 
DMKTRCEX 
DHKTECIO 
EHKTRCIT 
DMKTRCKD 
EHKTRCPB 
DHKTECEG 
EMKTRCPV 
DMKTRCSI 
DMKTRCSV 
DMKTRCSH 
EHKTRCWT 
DMKTRMID 
EMKDCBLB 
DHKUCSID 
EHK0D8BV 
DMKUDRBS 
EHKDDBFD 
DMKODRFU 
EHKODRRD 
DMKUDREV 
EMKDNTFR 
DMKUSTIS 
EHKUNTRN 
DHKUNTES 
EMKDSOES 
DHKOSOFF 
EMKUSOFL 
DMKUSOFM 
EMKDSOLG 
DHKVATAB 
EMKVATEC 
DMKVATEX 
EMKVATLA 
DBKVATBD 
EHKVATPF 
DMKVATEX 
EHKVATEN 
DHKVATSX 
EMKVCARD 
DMKVCARS 



000001 
000002 
000002 
000001 
000005 
000001 
000008 
000002 
000001 
000004 
000001 
000001 
000001 
000002 
000001 
000001 
000002 
000002 
000003 
000012 
000006 
000008 
000008 
000003 
000003 
000002 
000002 
000003 
000002 
000001 
000003 
000007 
000006 
000004 
000002 
000005 
000001 
000002 
000006 
000002 
000002 
000004 



DMKPSA 
DHKCFC 
DHKDSP 
DHKDSP 
DHKCDS 
DHKUSO 
DMKCDS 
DHKDSP 
DMKPRV 
DHKIOS 
DMKPSA 
DMKVIO 
DMK¥IO 
DMKCNS 
DMKCSO 
DMKCSO 
DMKCPI 
DMKBVD 
DMKLNK 
DMKCSP 
DMKDEF 
DMKDEF 
DMKCFP 
DMKISM 
MKGIO 
DMKCCi 
DMKCFC 
DMKDSP 
DMKCFC 
DMKSYM 
DMKCFC 
DflKCDB 
DMKCDS 
DMKDSP 
DMKPRV 
DMKCDS 
DMKPRG 
DMKPRG 
DMKPRV 
DMKPRG 
DMKCFP 
DMKDEF 



DMKSYM 
DMKSYM 



DMKCFC 



DMKCFC 
DMKPRG 



DMKVCA 



DMKSYM 



DMKSYM 
DMKSYM 
DMKSYM 
DMKCSO 
DMKHVD 
DMKHVE 
DHKGIO 
DMKSYM 
DMKSYM 
DMKSYM 
DMKSYM 
DMKLOG 
DMKSYM 

DMKSYM 
DHKCDS 
DMKCFP 
DMKPRV 
DMKSYM 
DHKCFG 



DMKDSP 
DMKCFP 

DMKVIO 



DMKESA 
DMKEHV 



DMKTRA 
DMKPSA 



DMKTRA 



DMKDEF 
DMKLOG 
DHKLMK 
DMKHVC 

DMKVIO 



DMKSYM 



DMKDSP 
DMKCPB 
DMKSYM 

DMKCPB 



EMKHVD 
DMKSPl 
DMKLOG 
DMKSYM 



DMKLNK 
DMKSYM 
DMKSPL 
DMKVIO 



DMKLOG 



DMKSYM 



DMKRSP 



DMKSPL 



DMKSYM 



DMKSYM 

DMKSYM DMKTMR 

DMKSYM 

DMKSYM 

DMKDIA DMKSYM 



DMKPRV 
DMKDSP 
EMKTMR 

DMKESP 



DMKTBC 



DMKVDH 



DMKSYM 
DMKSYM 



DMKSYM 



DMKVER 



DMKDSO 
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label 



EBK7CASH 

DHKVCaST 

EMKTC4TS 

DBKVCHDC 

EHK7CNEX 

DMKVDBAT 

EMKVEBDE 

DHKVDBEL 

EHKVDSAT 

DHKVDSDF 

EMKVDSLK 

BMKVEBD 

EHKVERO 

DHKVIOCI 

EHKVIOCT 

DMKVIOCH 

EMKVIOEX 

DHKVIOHD 

EBKVIOBI 
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000017 


DBKIOS 


DBKTBA 


DBKTBC 


DBK¥CA 


DBK¥IO 


















¥MTBS¥C 


000005 


DBKDSP 


DBKPSA 


DBKTBA 


DBKTBC 




















¥BTSEIiD 


000006 


DBKDSP 


DBKPSA 


DBKSCH 






















¥BTTIBE 


000268 


DBKACO 


DBKBLD 


DBKCHS 


DBKCPS 


DBKCPV 


DBKCSO 


DBKDIA 


DBKDSP 


DBKGBF 


DBKH¥C 


DBKIOS 


DBKLOG 








DBKBCH 


DBKBID 


DBKBOH 


DBKBSG 


DBKBSH 


DBKHES 


DBKHLD 


DBKPAG 


DBKPBG 


DBKPSA 


DBKPTB 


DBKQCH 








DBKBGA 


DBKBGB 


DBKBHH 


DBKSCH 


DBKSPL 


DBKTHI 


DBKOSO 


DBK¥CA 


DBK¥CH 


DBK¥DB 


DBK¥BA 






¥BOPRICB 


000005 


DBKCFS 


DBKCQB 


DBKLOG 


DBKBOH 


DBKSCH 


















¥BDSEB 


000132 


DBKBLD 


DBKCCH 


DBKCDS 


DBKCFP 


DBKCFS 


DBKCKP 


DBKCPI 


DBKCPS 


DBKCP¥ 


DBKCQG 


DBKCQP 


DBKCQB 


n 






DBKCSC 


DBKCSP 


DBKCST 


DBKCSO 


DBKDEF 


DBKDIA 


DBKDBD 


DBKEDB 


DBKH¥D 


DBKIOE 


DBKIOF 


DBKLHK 


•d 






DBKLOG 


DBKBCC 


DBKBCH 


DBKBOH 


DBKBSG 


DBKBSH 


DBKHES 


DBKHET 


DBKHLD 


DBKQCH 


DBKBHH 


DBKSCH 


t-i 






DBKSPL 


DBKTHI 


DBKOSO 


DBK¥CA 


DBK¥CH 


DBK¥DB 


DBK¥DB 


DBK¥EB 


DBK¥SP 








Pi 


¥BVCBO 


000019 


DBKCDB 


DBKCDS 


DBKCFG 


DBKCFP 


DBKCFS 


DBKDSP 


DBKLOG 


DHKPBY 


DBKTBC 


DBK¥IO 






(D 


¥B¥IBCF 


000015 


DBKCFC 


DBKCFB 


DBKHTC 


DBKLHK 


DBKLOG 


DBKHES 


DBKHET 


DBKCCH 










1 


¥B¥TEfiB 


000019 


DBKBLD 
DBKOSO 


DBKCFB 
DBKVDB 


DBKCFP 
DBKVDS 


DBKCFT 


DBKCPS 


DBKDEF 


DBKGBF 


DBKHVD 


DBKLOG 


DBKQCH 


DBKBGA 
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Label 


Count 


fieferences 












VHVTIME 


000008 


DHKACO 


DHKLOG 


DHKHON 


DHKSCH 


DHKTHB 






¥M?370B 


000058 


DMKBLD 


DHKCDE 


DHKCDS 


DHKCFG 


DHKCFP 


DHKCFS DHKCPB DHKCCB DHKDSP DHKLOG DHKPBG DHKPBV 


^ 






DHKSCH 


DHKTHE 


DHKTBC 


DHKOSC 


DHKVIO 




3 


¥HSCHT 


000008 


DMKPTB 


DHKBPA 










Ul 


YHHNGON 


000010 


DHKBLD 


DHKCFS 


DHKCQB 


DHKLCG 


EHKHSG 


DHKOSO 


UMISCHG 


000003 


DHKHVC 


DHKSCH 










o 


VHHSEBNG 


000003 


DMKSCH 














VMHSPRCJ 


000018 


DHKELC 


DHKCPV 


DHKHOH 


DHKSCH 


DHKTHI 




w 


VSALOC 


000003 


DHKBLD 


DHKDEF 


DHKLOG 










VSPBDFBK 


000016 


DBKVSP 












<+ 


VSPBDFSZ 


000006 


DHKVSP 












(0 

B 


1SPCAH 
VSPCCH 


oooom 

000118 


DBKDBD 
DHKDED 


DHKVSP 
DHKVSP 










o 


iSPDPAGE 


000024 


DHKEBD 


DHKVSP 










VSPIDACT 


000006 


DHKVSP 












n 


VSPIDAl 


000001 


DHKVSP 












VSPIDASH 


000008 


DHKVSP 












p> 


TJSPIDAS2 


000002 


DHKVSP 












3 


VSPLCTL 
iSPHISC 


000011 
000002 


DHKCKP 
DHKVSP 


DHKCSP 


DHKDBD 


DHKEDH 


DHKSPL 


DHKVSP 


•T3 
1-1 


VSPNEXT 


000005 


DHKVSP 












O 


VSPRECMC 


000002 


DHKVSP 














VSPSFBLK 


000024 


DHKCKP 


DHKCSP 


DHKDBD 


DHKEDH 


DHKSPL 


DHKVSP 


(D 


VSPSIZE 


000009 


DHKDBD 


DHKEEH 


DHKSPL 


DHKVSP 






B 


¥SPVPAGE 


000015 


DHKSPL 


DHKVSP 










O 


VSPXBLCK 


000019 


DHKCKP 


DHKCQG 


DHKCSP 


DHKCST 


DHKSPL 


DHKVDB 


(D 
(0 


VSPXDIST 


000006 


DHKCSP 


DHKCST 










VSPXLEB 


000006 


DHKCSP 


DHKCST 


DHKVDB 








B 


TSPXSIZE 


000002 


DHKCSP 


DHKCST 










fSPXSPAB 


000002 


DHKCSP 


DHKCST 










9 


VSPXTAG 


000003 


DHKCST 


DHKSPL 










VSPXTGIH 


000007 


DHKCSP 


DHKCST 


DHKSPL 








H- 


VSPXXDSR 


000009 


DHKCKP 


DHKCQG 


DHKCSP 


DHKCST 


DHKSPL 




O 

9 


VSISBES 


000003 


DHKCFG 














HAIT 


000017 


DHKBLD 


DHKCDS 


DHKCFH 


DHKCFP 


DHKCPI 


DHKDEB DHKDHP DHKDSP DHKIOG DHKLOG DHKPBV DHKPSA 


O 

s 






DHKTBA 


DHKTBC 


DHKDSO 








H- 


HEITBBK 


000001 


DHKBNB 














SBITECT 
iBITNBH 


000002 
000007 


DHKBHH 
DHKBNH 














XIHTBLCK 


000055 


DHKCFP 


DHKCPE 


DHKDSP 


DHKGBF 


DHKBGA 


DHKSCH DHKTHB 




XINTCOEE 


000017 


DHKCPB 


DHKDSP 


DHKGBF 


DHKBGA 


DHKSCH 






XIHTHASK 


000005 


DHKDSP 
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label 


Count 


Heferen 


ces 












XINTHEXT 


000036 


DMKCFP 


DMKCPB 


DMKDSP 


DMKGRF 


DMKBGA 


DMKSCH 


DMKTMB 


XIHTPABM 


000002 


DMKSCH 


DMKTMB 












XINTSIZE 


000013 


DMKCFP 


DMKCPB 


DMKDSP 


DMKGBF 


DHKBGA 


DMKSCB 


DMKTMR 


XIHTSOBT 


000015 


DMKCFP 


DMKCPE 


DMKDSP 


DMKGBF 


DHKRGA 


DHKSCH 


DHKTHR 


X0EBCCW1 


000002 


DMKRSE 














X0BfiCCI2 


000001 


DMKBSE 














X0BSCCW3 


000001 


DMKRSE 














lOBBCCiU 


000001 


DMKBSE 














XOEREXT 


000003 


DMKRSE 














XOBBFIAG 


000013 


DMKIOE 


DMKIOF 


DMKRSE 










XOBRMISI 


000002 


DMKRSE 














X0BEI1IS2 


000002 


DMKRSE 














X0BRRT1 


000006 


DMKRSE 














X0BfiRT2 


000006 


DMKBSE 














X0ERET3 


000006 


DMKRSE 














X0BBBT4 


000003 


DMKBSE 














X0EBBT5 


000007 


DMKBSE 














X0BRRT6 


000006 


DMKBSE 














XOERSIZE 


000002 


DMKBSE 














XOBRSTAT 


000012 


DMKBSE 




- 










X0BRT1 


000011 


DMKIOE 


DMKIOF 


DMKRSE 










X0BRT2 


000001 


DMKBSE 














X0ERT3 


000007 


DMKIOE 


DMKIOF 


DMKRSE 










XOBR010 


000003 


DMKIOE 


DMKIOF 


DMKRSE 










XOBRTSO 


000001* 


DMKIOE 


DMKIOF 


DMKRSE 










XOBB180 


000003 


DMKIOE 


DMKIOF 


DMKRSE 










XOBR512 


000009 


DMKIOE 


DMKIOF 


DMKBSE 










XPA6N0H 


000047 


DMKBLD 
DMKPTB 


DMKCCW 
DHKDNT 


DMKCDB 
DMKVMA 


DMKCBS 


DHKCPI 


DHKDGD 


DHKDRD 


XRIGHT16 


000028 


DMKCCW 


DMKCDB 


DMKCFG 


DMKCPI 


DMKCQP 


DHKDAS 


DHKDSP 






DMKSIX 


DMKSSP 


DMKTBA 


DMKVAT 


DMKVCH 






XRIGeT2a 


000007 


DMKCCW 


DMKCFP 


DMKHVD 


DHKPSA 








XTNDLOCK 


000011 


DMKDSP 


DMKFBE 


DMKGBF 


DHKPAG 


DMKPTR 


DHKRGA 


DMKVIO 


X2 048BFD 


000015 


DMKCCW 


DMKDBB 


DBKHVD 


DHKPSA 


DHKTRC 


DHKDHT 




X40FFS 


000007 


DMKCFG 


DMKCFS 


DMKCFT 


DHKCPE 


DHKCPS 


DHKCPV 


DMKMLD 


10 


000011 


DMKDMP 


DMKDSP 


DMKIOS 


DHKMCH 


DHKPBG 


DHKPSA 




¥2 


000011 


DMKDMP 


DMKDSP 


DMKIOS 


DHKKCB 


DHKPRG 


DHKPSA 




in 


000011 


DMKDMP 


DMKDSP 


DMKIOS 


DHKMCB 


DMKPRG 


DHKPSA 




Y6 


000011 


DMKDMP 


DMKDSP 


DMKIOS 


DHKMCH 


DHKPRG 


DHKPSA 




ZEROES 


000119 


DMKACO 


DMKBLD 


DMKBSC 


DHKCCW 


DHKCDB 


DHKCDS 


DMKCFD 






DMKCPI 


DHKCPS 


DMKCPV 


DHKCQG 


DHKCQP 


DMKCCH 


DHKCSO 






DMKDMP 


DMKDRD 


DMKDSP 


DMKGRF 


DHKIOC 


DMKIOE 


DHKIOF 






DMKHSW 


DHKNET 


DHKPSA 


DMKPTB 


DHKRNH 


DMKBSE 


DHKSCH 






DHKUDB 


DMKDNT 


DHKUSO 


DMKVCA 


DHKVDB 


DHKVDB 


DMKVDS 



DMKFBE DMKHVC 
DHKEBH DHKHSG 



DHKBVD 
DHKOPB 



EHKPGS 
DHKBHH 



DHKPSA 
DHKSEV 



DHKCFP DMKCFS 

DHKCSP DHKCST 

EHKINK DMKLOG 

DHKSCN DHKSPL 

DHKVSP DBKWBM 



DMKCFT 
DHKCSD 
DHKMCC 
DMKTAP 



DHKCKS 

DMKDAS 
DMKHCB 
DHKTHR 



DHKCPB 
DMKDIA 
DHKMON 
DHKTRC 
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1 RSCS 


BALR to 


1 At 




1 Module 


Module 


Label 


CoaimeDts 


IDMTAKE 


DHTDSP 


TAKEXIT 


Resumes dispatching; processing of a TAKE request 
is complete. 




DMTEST 


TAKEMUTE 


Signals a task that it nust process a TAKE 
request. 




DMTCEC 


TAKEMOTE 


frees a GIVE element. 


IDMTASK 


DMTDSP 


TAEXIT 


Resumes dispatching; processing of a task request 
has completed. 




DMTPST 


TAGPURGE 


Signals the termination of a task. 




DMTQBC 


TAFREECK 


Frees a terminated task element. 




DMTQRQ 


TAGPURGE 


Frees a terminated GIVE element. 




DMTCEC 


TAMAKE 


Gets a queue element for a neM task. 




1 DMTQRQ 


TAQPTEST 


Frees requested elements for a terminated task. 




DMTCEC 


TASQTEST 


Frees an I/O element associated with a task being 
purged. 


IDMTASY 


DMTDSF 


ASEXIT 


Resumes dispatching; processing cf an asynchro- 
nous exit request has completed. 




DMTQRQ 


ASQEND 


Gets a free queue element; free a terminated 
queue element. 




DMTQRQ 


ASQGOT 


Gets a free queue element; free a terminated 
queue element. 


IDMTAXS 


DMTAKE 


AXSACCPT 


Takes a request for DMTAXS services from another 
task. 




DMTASY 


AXSIGSET 


Requests an asynchronous exit for task asynchro- 
nous alerts. 




DMTASY 


AXSIGSET 


Requests an asynchronous exit for reader X'001'. 




DMTCOM 


GETLINK 


Gets a link table entry. 




DMTCCM 


CPEHIRTY 


Gets a page of main storage. 




DMTCOM 


OPENOLNK 


Gets a page of main storage. 




DMTCCM 


TODEBCD 


Converts a S/370 format TOD to EBCDIC date and 
time. 




DMTGI? 


HSGDO 


Gives a message element to DMTHGX for processing. 




DMTPST 


AXSALRT1 


Signals acceptance of a command to process. 




DMTEST 


AXSASYIO 


Signals arrival of a request for an asynchronous 
exit. 



I» 

IW 

lo 

lEB 
lO 
lO 

la 
It- 

IM 

IC3 
IH 
l» 

In 
lo 

IH 
lO 
IW 
IK 



CO 

n 

m 

at 
o 





o 

ti 
(D 
O 
f+ 
O 



\ 



ft 

(D 

B 

t-^ 
O 

ua 

O 

a 
»a 

H 

o 

s 
o 

(D 
f+ 

a> 
n 

9 
H- 
3 
P) 
f+ 
H- 
O 

O 

H- 
Oi 



RSCS 
Module 



DHTAXS 
(cont) 



DHTCMX 



DHTCOM 



BALE to 
Module 



DMTSIG 

DHTSIG 
DHTWAT 
DM THAT 

DMTCCB 

DMTCCM 
DMTCBE 

DMTMGX 

DMTMGX 

DMTMGX 

DMTMGX 

DMTMGX 

DMTMGX 

DMTMGX 

DMTBEX 

DMTBEX 

DMTSIG 
DMTSIG 

DMTDSP 
DMTDSE 
DMTSTG 



At 
Label 



ACCEFIND 

CHANDONE 
AXSCYCLE 
MSGDO 

CYOLINK 

TODEECD 
STALBGOT 

CMXDCIT 

CMXM001 

CMXM003B 

DISCHABG 

QYM654 

QYM655 

QYSYMSG 

DISCCHH 

DISCBABG 

CMXALEDY 
STACREAT 

MFIXIT 
MFOXIT 
GETPTBY 



Comments 



Alerts a line driver task that a newly arrived 

file has been accepted. 

Alerts a line driver task. 

Haits for a request for DMTAXS services. 

Waits until processing by EMTGIV has completed. 

Finds a link table entry. 

Converts a S/370 TOD to EBCDIC date and time. 
Creates a line driver task, as specified in the 
START command. 

Writes a message resulting from command proces- 
sing. 

Writes a message shewing the number of free pages 
in storage. 

Writes a message showing the command currently 
being executed by RSCS. 

Writes a message resulting from DISCOHH command 
processing. 

Writes a message resulting from QUERY command 
processing. 

Writes a message resulting from QUERY command 
processing. 

Writes a message resulting from command proces- 
sing. 

DIAGHCSE instruction entry to CP console func- 
tion. 

DIAGHOSE instruction entry to CP console func- 
tion. 

Alerts a task for command processing. 
Alerts DMTLAX to validate a line address used in 
a STABT command. 

Bequests dispatching of a task for which a mes- 
sage has been stacked for transmission. 
Bequests dispatching of a task for which a mes- 
sage has been unstacked for transmission. 
Bequests main storage. 
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1 


1 nodule 


Hodule 


Label 


CoDients 


1 
1 


IDMTCBE 


DMTASK 


CBEQTASK 


_„, — _,.,,.., , ., . . J 

Bequests the supervisor to start a new task. | 




DMTIOH 


CFILDOIO 


Bequests the I/O aanager to read one DASD 
from a file on a CMS-type systeni disk. 


block 1 

1 




I DMTSTO 


CBETBYIT 


Bequests main storage for the creation of 


a task. 1 




DHTiAT 


CFILDOIO 


Waits for a read I/O request to conplete. 


1 


IDMTEXT 


DMTDSP 


EXTGC 


I 
Besuaes dispatching; processing of an external | 








interruption is coaplete. 




IDHTGIV 


DBTDSP 


GIVEXIT 


Besuaes dispatching; processing of a GIVE 
is coaplete. 


request 1 




DMTPST 


GIVESNIF 


Signals a task to begin processing a GIVE 
request. 






DMTQBQ 


GIVESCAN 


Gets a free queue eleaent. 




IDHTim 


DHTDSF 


IN IQ DONE 


Dispatches the first task. 






DMTQBQ 


IHIQEONE 


Initializes the queue of free elements. 




IDHTIOH 


DMTDSP 


lODISPCH 


Besuaes dispatching; processing of an I/O 
is coaplete. 


request 1 




DMTPST 


lONOBMAL 


Signals coapletion of an I/C event. 






DMTPST 


lOPONT 


Signals an error on a request for a queue 
element. 






DMTQBQ 


DMTICMBQ 


Gets an eleaent for an I/O request. 






DMTQBQ 


lODISMIS 


Frees an element used for a SENSE request. 






DMTQBQ 


lOHOBHAL 


Frees an element used in an I/O request. 






DMTQBQ 


lODNITCK 


Gets an element for a SENSE request. 




IDHTIAX 


DMTASY 


1 LAXINIT 


Sets up an asynchronous exit for DMTLAX. 






DMTSAT 


LAXHAHG 


Terminates DMTLAX. 




IDHTHGI 


DMTCOM 


MGXBOILT 


Gets a link table entry. 






DMTCOM 


1 MGXTOLOC 


Stacks a message. 






DMTBEX 


BGXHCPB 


Writes a message to a local VM/370 userid. 






DMTBEX 


MGXNOVM 


Writes a message to the VH/370 operator. 






DMTSIG 


MGXBOILT 


Alerts an originating task that a messa 
been handled. 
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RSCS 
Nodule 



DMTMPT 



BALE to 
Module 



DMTASY 
DMTCCH 

DMTCCM 

DMTCCH 
DMTCOM 
DMTGIV 
DMTGIV 
DMTGIV 

DMTGIV 
DMTGIV 
DMTGIV 
DMTGIV 

DMTGIV 
DMTGIV 
DMTGIV 

DMTIOM 
DMTICM 
DMTIOM 

DMTPST 
DMTiiAT 

DMTWAT 

DMTHAT 
DMTHAT 

DMTHAT 

DMTHAT 

DMTHAT 

I DHTRAT 



At 
Label 



BPTNOPAS 
AXSMEHC 

BSG2780 

MPTHCPAS 

TODEBCD 

AXSGET 

AXSPDRGE 

COMMANDS 

KLOGIT 
LINEDROP 
lOGCLOSE 
MSG1 

PDTCLSI 
PDTOEEH 
TASKILL 

L0GC0NT1 
LOGPBIHT 
XECDTE 

AXSALRT1 
AXSGET 

AXS PURGE 

COMMANDS 
KLOGIT 

LINEDROP 

LOGCLOSE 

L0GC0NT1 

I HSG1 



Comments 



Sets up an asynchronous interrupt for DMTNPT. 

Enqueues a message en the message stack fcr 

processing by DMTMGX. 

Unstacks a message for transmission to a remote 

station. 

Gets a page of storage for use as DMTNPT buffers. 

Converts S/370 TOD to EBCDIC date and time. 

Bequests EMTAXS to open a file. 

Requests DMTAXS to purge a file. 

Passes a command element to DMTREX for processing 

by DMTCMX. 

Bequests EMTAXS to open the LOG file for output. 

Requests DMTAXS to close a file. 

Bequests DMTAXS to close the LOG file fcr output. 

Passes a message element to DMTMGX for 

processing. 

Requests DMTAXS to close a file for output. 

Bequests DMTAXS to open a file fcr output. 

Requests DMTREX to terminate the requesting NPT 

line driver. 

Requests an I/O operation for the LOG routine. 

Prints a LOG message. 

Requests an I/O operation (qeneral usage by 

DMTHPT) . 

Signals that DMTNPT accepted a command. 

Waits for a request to open a file to complete 

processing. 

Halts for a request to purge a file tc complete 

processing. 

Haits for DMTCMX to process a command. 

Halts for completion of a request to open the LOG 

file for processing. 

Haits for a request to close a file to complete 

processing. 

Haits for a request to close the LOG file when 

processing is complete. 

Haits for an I/O operation to complete logging 
! processing, 
I Halts for message processing to complete. 
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Module 


Module 


Label 


Coaaents | 


DMTNPT 


DMTWAT 


P0TCLS1 


Halts fcr a request to close a file to coaplete | 


(cont) 






processing. | 




DBTHAT 


POTCEEH 


Halts for completion of a request to open a file | 
for processing. | 




DHTiiT 


TASKILL 


Halts for task termination processing to | 
complete. | 




DMTHAT 


XECQHAIT 


Halts for an I/O operation to complete. | 


DHTREX 


DMTAKE 


EEXACCPT 


Accepts a request to process a VM/370 file. | 




DHTASK 


QUIESE 


Requests task termination. | 




DHTASK 


TEBTKILL 


Bequests task termination. | 




DHTASY 


REXICGOT 


Initializes an asynchronous exit. | 




DHTCCB 


REXFLDSH 


Requests EMTMGX to write any queued messages. | 




DMTCOM 


REXODTRY 


Removes a message for the message stack and write | 
it to the console. | 




DMTCBE 


REXICGOT 


Creates the tasks DHTAXS and DMTLAX. | 




DMTDSP 


REXDQDIT 


Terminates dispatching due to program check. | 




DMTDSP 


REXHEXIT 


Resumes dispatching after program check proces- | 
sing. 1 




DMTIOH 


REXCONON 


Requests an I/O operation (console write) . | 




DMTICH 


BEXFCOSF 


Bequests an I/O operation (console write) . | 




DMTIOM 


REXQDERY 


Requests an I/O operation (console read) . | 




DHTHGX 


BSG 


Passes a message element to DMTHGX for | 
processing. | 




DHTHGX 


TERMSET 


Hrites a task terminated message. | 




DMTPSI 


REXASYN 


Signals a console attention. { 




DMTEST 


BEXHALT 


Signals that DMTREX is undispatchable due to | 
program check. | 




DBTHAT 


QUIESE 


Halts for a task to terminate. | 




1 DMTHAT 


QUICK 


Halts for task I/O to terminate. | 




DMTHAT 


REXSHAIT 


Halts for a console write to complete. | 




DMTHAT 


1 REXHAIT 


Halts for completion of an event. | 


DMTSIG 


DMTDSP 


ALSCAN 


Resumes dispatching; processing of an alerted | 






ALNC60 


task has completed. | 


DHTSHI 


DMTASY 


SETHCBUF 


Sets up an asynchronous exit for DMTSML. | 




DMTCOM 


ASYHENQ 


Stacks a message to be transmitted by DMTSML. | 




DMTCCM 1 


EUFSEOME 


Gets a page of storage for DMTSML I/O tasks. | 




DMTCOM 


IBLDBUFS 


Gets a page of storage for DMTSML TP buffers. | 
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RSCS 
Module 



DMKSHl 
(cont) 



DHTGIV 
DMTGIV 



BALR to 
Module 



DMTCCB 

DHTCOM 
DMTGIV 



DMTGIV 
DMTGIV 
DHTGIV 

DMTGIV 
DMTGIV 

DMTIOM 

DMTIOM 

DMTIOM 

DMTIOM 

DMTIOM 

DMTIOM 
DMTEST 
DMTHAT 

DMTHAT 
DHTWAT 
DMTHAT 
DMTHAT 



DM THAT 
DMTHAT 

DMTHAT 
DMTHAT 



At 
Label 



MSGPB0C1 

TODEBCD 
AXS 



KLOGIT 

LOGCLOSE 
AXSGET 
AXSPDRGE 
ECJ 

MSGI 
HGET1A 

I27XXIO 

J0DT1 

PC0NT2 

PLIME 

BSIO 

D0UT2 

HRL0G1 

ASYMBET 

ALLCHK 

AXS 

AXSGET 
AXSPDRGE 
EOJ 

KLOGIT 
LOGCLOSE 
MSGI 
RISIC1 

HGET1A 
HRL0G1 



Comaents 



Onstacks a message for traosmlssion tc a reaote 

station. 

Converts S/370 TOD to EBCDIC date and time. 

Requests services of DMTAXS for the SML line 

driver task. 

Requests DMTAXS tc open a LOG printer. 

Requests DMTAXS to close the LOG printer. 
Requests EMTAXS to give a file fcr transaission. 
Requests DMTAXS to purge a file. 
Requests termination of the SML line driver task. 



a start I/O 



Gives a message to DMTM 
Requests that a message 
console; pass a coaaand 
Performs the initial 
line driver task. 
Requests an I/O operati 
controls. 

Requests an I/O ope 
controls. 
Requests 
function. 

Requests an I/O operati 
controls) . 

Requests an I/O operati 
Posts the reader synch 
Halts for the DMTSML 
(waits for a request tc 
Halts fcr completion of 
Halts for DMTAXS to GIV 
Halts for DMTAXS to pur 
Terminates the SML line 
terminal HAIT request. 
Halts for DMTAXS to ope 
Halts for DMTAXS to clc 
Halts until GIVE to DMT 
Halts for initial SIO f 
to complete. 
Halts until message pro 
Halts for I/O logging t 



GX for processing. 

be written to the RSCS 

tc DMTREX. 
I/O operation for the SML 

on; set up job processing 

ration (set up printer 

for the DMTSML TRACE 

on (sets up punch 

on (log an I/O operation) . 
lock. 

synch lock to be posted 

process) . 

an event by DMTAXS. 
E a file for transmission, 
ge a file. 

driver task by issuing a 

n a LOG printer. 

se a LOG printer. 

HGX is complete. 

or the DMTSML line driver 

cessing has completed, 
o complete. 
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IRSCS I BALE to I At 
■Module i Module | Label 



I Comfflents 



|DMTSTC| DHTDSF | HAISDONE | Resuaes dispatching; a request for a page of 

111 I storage has been processed. 

Ill I 

|DMTWAT| DMTDSP | WAITGO | HesuBes dispatching; processing of a lAIT request 

III I has completed. 
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Module 
Naioe 



DHTAKE 



DHTASK 



DMTASY 



DMTAXS 



Entry 
Points 



DHTAKE 



DHTASK 



DHIASY 



DMTAXS 



AXSINIT 
AXSCYCIE 

BECXEQ 



CHDPROC 

OPENIN 

CICSECDT 

HSG 



Function 



Contains the supervisor service that supplies task 
prograns with the receiver interface to GIVE requests 
issued by other tasks. A single CALL causes EMTAKE to 
first respond to the previously supplied GIVE request 
and then supply a new GIVE request to the task for its 
processing. 

A service routine that creates new tasks and deletes 
existing tasks executed by the MSDP dispatcher. The 
entry to DHTASK is via a EAL instruction from task 
prograiaing. Any entry into DHTASK causes the calling 
task's execution to be suspended through the freeze 
SVC function. 

A supervisor service module that starts and ends 
asynchronous exit requests for task prcgrams. This 
routine handles asynchronous exit requests for 
asynchronous exit requests for I/O interruptions, 
and ALERT exit requests. 



Controls the interface of the 
VH/370 spool file systei, enqu 
transmission and processes com 
spool files. 

Initializes the AXS task. 
Looks for work to do by examin 
associated with the AXS task. 
Scans the request table for a 
to the appropriate subroutine, 
code. 

Executes AXS commands from the 
on by an ALERT exit from DHTRE 
Starts spool file processing. 
Ends processing for output fil 
Sets the HSG request element, 
passes the HSG request element 
The code associated with other 
module format the HSG element 
ways and exit finally to HSG. 



line drivers to the 

eues files for 

mands that manipulate 



ing the synch locks 

match and branches to the 
depending on the request 

command buffer passed 
X. 

es. 

A CALL GIVE instruction 
to the message manager, 
entry points in this 
variable areas in various 
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Module 
Naae 



DHTIXS 
(cont .) 



DHTCHX 



Entry 
Points 



HEXGEI 
DECGET 
DBCPUT 



TODS370 

TCDEBCD 

GSDCCES5 

ACCEPT 

ONPEND 

GETBODTE 

GEILINK 

GETSLCT 

FREESLOT 

lAGGEli 

TAGPLACE 



FILSELBC 
TAGFIND 

DEFINE 

DETACH 

VCBANGE 

VCLOSE 

VPUEGE 

VSPOOL 

VTAGD 

VTAGF 

DHTCHX 



CMXHIT 

CHSALERT 

KEYiDGET 



Function 



Converts and validates a hex string. 

Converts and validates a decinal string. 

Converts a hex fulluord to deciaal and generates an 

EBCDIC representation of it, suppresses leading zeroes 

to a niniiuB count, which is optionally supplied by the 

caller. 

Converts EBCDIC to the SysteB/370 TOD value. 

Converts Systeii/370 TOD to an EBCDIC date and time. 

Gets inactive successor spool file. 

Inspects newly arrived files. 

Brings in a link's pending tags. 

Gets a routing table entry. 

Gets link table entry. 

Gets a free tag queue element. 

Returns a tag queue eleoent. 

Builds a file tag from hyperviscr inf oroation. 

Sets a file tag into a link queue iamediately before 

the first tag of numerically higher priority (lower 

real priority) . 

Selects a file to be read fron a link queue. 

Locates a file with spoolid Batching the one supplied 

by the caller, within the internal file tag queues. 

Gets a virtual spool device. 

Dndefines a virtual spool device. 

Changes VH/370 file attributes. 

Issues the VH/370 CLOSE cciaand for a device. 

Purges an inactive reader file frci the VH/370 spool. 

Sets VH/370 virtual spool device options. 

Sets a VH/370 tag for a virtual spool device 

Sets a VH/370 tag for an inactive spool file. 

This Dodule is part of the REX system control task. 

DHTCHX is called in several places in DHTREX, which is 

the main REX control routine. DHTCHX accepts an EBCDIC 

string and executes the RSCS command that the string 

represents. 

Calls the necessary individual command proccessing 

routine. 

Passes a command element to another task via the ALERT 

task-to-task communications interface. 

Decodes the next keyword on the input command line. 
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Module 
Nane 



DHTCBX 
(cont . ) 



DBTCCH 



DHTCBE 



Entry 
Eoints 



ITABGET 



BEXGET 
DECPDT 



PILGET 

TCDEBCE 

FABHGET 

DBTCCH 
GETLINK 

GETPAGE 

F5EEFAGE 

MFI 



BFC 



GTODEBCD 



DBTCfiE 
CMSFILCH 
CHSCPEH 
CMSGET 



Function 



Finds the link tatle entry inplied by the first keyword 
in the coiiand line described by the calling routine's 
register paraaeters. 
Converts and validates a hex string. 

Converts a hex fullword to decimal and generates an 
EECEIC representation of it. It suppresses leading 
zercs to a ninimuni count, vhich is optionally supplied 
by the calling routine. 

Locates a file, within the internal file tag 
spoolid matching that supplied by the 



queues, 
calling 



a SysteB/370 format TOD to EBCDIC data and 



next parameter 



on 



with a 

routine. 

Converts 

time. 

Scans an EECEIC line and frames the 

the line. 

Contains various reentrant routines used by BSCS tasks. 

Scans the link table chain and returns a link table 

address. 

Gets a free page of main storage. 

Beturns a page of main storage. 

Stacks message elements in a LIFO stack for later 

processing. If no room is available in the current page, 

a new page is fetched if there are at least five free 

pages remaining. If five free pages are not remaining, 

an error condition is returned. 

All tasks except BEX are allowed only three pages of 

storage to stack messages. 

Onstacks message elements from the message queue for 

this task. If none are queued an error condition is 

returned. 

Converts a System/370 format TOD to EBCDIC data and 

time. 

Creates new tasks under MSDP. 

Beads one dASD block from a CHS disk. 

Does initial work prior to reading a CMS file. 

Gets the next CHS file item. 
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Module 
Name 



DMTBSP 



DHTEXT 



DMTGIV 



DMTIHI 



DHTICH 



DHTLAX 



Entry 
Points 



BMTDSP 



DHTEXT 



DHTGIV 



DMTIHI 



DKTICli 



DBTIAX 



Function 



This Bodule is the MSUP dispatcher. It is entered when 
an exit occurs fron supervisor functions that were 
entered following an interruption or that issued the 
freeze SVC function. 

DMTESP must be entered with all PSB masks off (except 
for the machine check mask) . 

This module is the MSOP external interruption handler. 
DMTEXT receives control directly on an external inter- 
rupt and saves the status of the executing task if one 
was interrupted. 

This is a supervisor service routine that engueues GIVE 
reguests from tasks to be delivered to other tasks by 
DMTiKE. 

Receives control after initial loading of BSCS, and per- 
forms general initialization functions that are common 
to all parts of RSCS. 

DMTINI writes a copy of the initial load to EASE, acor- 
ding to operator instructions, when RSCS is initial 
program loaded from the generation IPL deck. 

When ititial program loaded from disk, DMTINI finishes 
reading the saved RSCS load. 



fihen IPL disk reading or writing 
initializes RSCS storage areas. 
This module contains both the MSDP I/O 
and the task I/O service routine. The 
vided by EMTIOH to the task programs i 
subchannel scheduling, channel program 
matic sense execution on unit check 
return of all pertinent information re 
tion of the channel program, and notif 
upon completion of the channel program 
This routine is the line allocation ta 
major part of this routine functions 
exit being alerted by DMTREX. 



is comlete, DMTIHI 



interrupt 

I/O servic 

ncludes seg 

execution 

when reg 

garding the 

icaticn via 



handler 
e pro- 
uential 
, auto- 
uested , 
ex ecu— 
a POST 



sk for RSCS. The 
as an asynchronous 
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Module 
name 



DMTMAF 



DMTMGX 



DHTHSG 



DMTHPT 



Entry 
Points 



DMHJP 
DMTHGX 

DHTBSG 

DHTBPT 

BETGET 

SEMDOFF 

BDFFIHIT 

XECDTE 

LINEIO 

GETELOCK 
GETVEFY 
PDTBLOCK 
PDT¥RFY 



Function 



Describes the non— fixed address MSDP status storage 
areas in nain storage. 

This Module contains no executable code. 

Takes a message reguest buffer and constructs the 
message from the information in that buffer and the 
message text found in DHTHSG. 



Contains a list of error messages to be used externally 

by EMTHGX. 

This module contains no executable code. 

This module is a line driver that provides support for 
the 2770, 2780, 3770, and 3780 ncnprogrammable 
terminals . 

Haintains a cyclic control of the DHTPT task on both 
sending and receiving operations. 

Sends the ESC end-of-transmissicn character (EOT) on the 
line to the remote terminal. 

Initializes the line output buffer with the correct BSC 
character set, depending on the type of output file and 
and features available at the terminal. 

Reguests the supervisor to execute I/O operations. After 
starting the I/O operations, XECOTE waits fcr either a 
command to be entered or the completion of the reguested 
I/O operation. 

Executes (by calling XECDTE) I/O operations on the BSC 
line and checks the final state. LINEIO then sets the 
lOERR flag in the DEVFLAG byte. 

prepares the line output buffer to be transmitted to the 
remote terminal. 

Analyses the response obtained from each buffer trans- 
mission and takes the appropriate error action. 
Deblocks received TP buffers and writes the deblocked 
record to the VM/370 spool file system. 

Verifies the content of each received TP buffer and con- 
structs an appropriate reply if the buffer is found in 
error. 
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Hodule 
name 



DHTSET 
(cont .) 



DMTPST 



DHTQBQ 



Entry 
Points 



CCHEAliDS 
CHDPROC 

BSGEBOC 

HSG 
BEADPBIP 

HAKEBLOC 

VBSE2CP 

AXSGEI 

TODEBCD 
PABHGET 
NPTIHIT 
5PTIISK 
NPTEBEOR 

NPTTEBH 

DMTPST 



DMTQBQ 



Function 



Passes coDHands received froa the reaote card reader to 

the BSCS coiaand processor for execution. 

Executes conaands passed to it in the CHDBESP buffer 

after an ALEBT from DHTBEX indicates a command has been 

entered. 

Unstacks messages from the task HSG queue and transmits 

them to the remote terminal printer. Prepares and sends 

requests to the specialized task BEX to write console 

messages. 

Prepares and sends requests to the specialized task BEX 

to write console messages. 

Provides, one record after the other, the separator and 

header for print files and the header card for punch 

files. 

Saves the caller's registers for a call to VMSB2CP. 

Upon return from VMSB2CP, it sets the return code and 

returns to the original caller. 

Deblocks the VH/370 spool page buffers into an unpacked 

buffer (PACKBLK) . 

Requests the specialized task AXS to open, close, and 

delete the spool files that the HPT task is processing. 

Converts System/370 TOD to EBCDIC date and time. 

Scans character strings to find delimiter characters. 

Initialization routine for BET. 

HPT sign-on routine. 

Writes the terminal I/O error message and terminates tha 

task. 

Terminates the HPT task. 

A service routine that may be called from anywhere in 
BSCS. DMTPST signals the completion of an event by 
posting the event's associated synch lock. This routine 
is entirely reentrant and does not change the state of 
running PSW. 

Manages the MSDP supervisor status queue for other MSOP 
functions. DMTQBQ is for use within the supervisor and 
be entered with all PSIi masks off (except machine 
check) . 
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fiodule 
Baffle 



DBTREX 



DMTSIG 
DMTSHL 



Entry 
Points 



DBTBEX 



BEXIBIT 
REXCYCLE 

REXFCEEX 
BEXITERM 



REQXEg 

DEACT 
HSG 

TEBBIBAT 
QDIESCE 



DMTSIG 
DMTSMI 

SMLIBIT 

ISIO 
ASYBEXIT 



Function 



This routine is the controlling supervisor task and to- 
gether with DHTCMX, DMTMGX, DHTSYS, DMICOH, DKTMSG, and 
DMTCRE make up the REX supervisor task. 
Performs the initialization for the DMIREX task. 
Monitors a list of synch locks when looking for work for 
DMT BEX to perform. 
Processes program checks. 

Entered when RSCS initialization fails. Issues the in- 
itialization failure message, dumps the contents of main 
storage, types any remaining messages, and leads a dis- 
abled wait state PSH. 

Scans the function tatle and calls the appropriate 
routine based on that code (either DMTCMX or EMTM6X) . 
Deactivates the link tatle entry. 
Nrites messages. 
Terminates a specified task. 

Becomes the task code for a task in the process of 
termination. Looks for any outstanding I/O for the 
terminating task. If any outstanding I/O is found, 
issues HIO and waits for completion. When all I/O is 
completed, it terminates the task. 

Performs a task alert exit for a requesting task. 

Functions as an RJE work station into a remote system 

using the MDLTT-LEAVIBG transmission protocol. It can 

also function as a host to a remote programmable work 

station supporting a System/370, System/3, Model 20, 

1130, or a 2922. 

Initializes various parameters needed by DMTSML. Saves 

the link table address, initializes output tags, and 

constructs the sign-on card from information in the 

operand field of the START command. 

Performs the enable sequence on the communications line, 

analyzes the response received, and, if the response is 

correct, writes the line connected message. 

This is the alert exit entered by DMTSIG. Two tasks may 

alert this line driver: 

• DMTREX — When a command has been entered for pro- 
Processing by the DMTSML line driver. 

• DMTAXS — When DMTAXS must asynchronously notify 
DMSML that a file has arrived for transmission. 
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Module 
Name 



DBTSHL 
(cont .) 



Entry 
Eoints 



&STiET 

SCTRN1 

8EBTH1 

SDETN1 

SJBTBI 

&DSREXIT 
SPRTH1 

AXSGET 

VHDEBLOK 

HEADPREP 



TODEECE 
SHRTNI 



CMDPROC 



MSGPBOC 



Function 



This is the supervisor routine for DHTSBL. The coiau— 
tatcr cycles while looking for a routine to enter until 
all coiDUtator entries are closed. It then vaits for a 
synch lock list to be posted. 

Dequeues tasks fron its task queue and perforis the 
action requested by the control record in the dequeued 
task. 

Dequeues tasks from its task queue, obtains a new output 
spool device, if needed, from DUTAXS, and sends the task 
to a virtual printer. 

Dequeues tasks from its task queue, obtains a new output 
spool device, if needed, from DHTAXS, and sends the task 
to a virtual punch. 

Dequeues tasks from its task queue, obtains a new output 
spool device, if needed, from DHTAXS, and sends the task 
to a virtual device. 

Validates the ID card in the front of decks read in from 
a remote card reader. 

Reads in files from the ?M/370 spool file system, 
deblocks the files into 132 byte records, and issues 
a call to PUT to block the record into a transmission 
buffer. 

This routine is the interface to DHTAXS. It gets files 
ready to transmit and purges these files when transmis- 
sion is complete. 

This is the deblock routine for the VH/370 page spool 
buffers. It returns the deblocked record in the 
RDTTDTA1 buffer. 

Provides, one record after the other, the separator and 
header for print files and the header card fcr punch 
files. 

Converts System/370 TOD to EBCDIC data and time. 
Writes received messages to the BSCS operator, if in 
RJE mode. Passes commands to DHTREX for execution, if 
in HOST mode. These commands or messages are dequeued 
from console TCT. 

Executes commands passed to it in the CHEBESP buffer 
after an alert from DHTREX indicating a command was 
entered. 

Entered when the MSGECB is posted by this task's asynch- 
ronous exit indicating messages are in the message queue 
for this task. These messages are unstacked from the 
message queue by repeated calls to GHSGREQ and queued 
for transmission. 
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Module 
NaiD€ 



DHTSML 
(cont.) 



DMTSTO 



DMTSVC 



DHTSIS 



DMTVEC 



DMTWAT 



Entry 
Points 



MSG 

PABKGET 
STPPUT 



8TPGET 



COM SUP 



CERROR 



DMTSTO 



DMT SVC 



DHTSYS 



DMTVEC 



DMTWAT 



Function 



Prepares and sends requests to the specialized task REX 
to writes messages on the operator's console. 
Scans lines and tests for deliiiter characters. 
Takes a line and packs it into a teleprocessing buffer. 
When the buffer is filled, it is queued onto OOTBDF for 
processing by COMSDP. 

Deblocks received teleconKuoications buffers into tasks 
and queues the task onto the appropriate processors 
TCTTASK queue. 

Processes all I/O on the communications line. It deque- 
ues TP buffers from ODTBUF for transmission and queues 
received TP buffers onto the 8INBDF queue for deblocking 
by TPGET. 

Analyses all errors on the communications line. The ap- 
propriate corrective action is taken depending on the 
on the type of error. 

Reserves pages of free storage for use by calling task 
programs. Task programs free storage pages by clearing 
the associated map byte to zero in the main storage map. 

This module is the MSDP interrupt handler and receives 
control directly when an SVC interrupt occurs. 

The common system control information area that is 
shared by all task level functions of HSCS. All instal- 
lation variable information used by an RSCS system is 
reflected in the assembly of this module. This module 
is the only module that must be assembled as part of an 
RSCS system generation. 

Describes the fixed address storage utilization for 
MSDP, beginning at main storage address X*200'. 
System/370 architecture defies the first 512 bytes of 
main storage and MSDP uses this area as it is defined. 
This area is not included in the DMTVEC module to 
facilitate initial system loading. This area is ini- 
tialized by DMTIHI at IPL time. 

Called directly from task programs by a BAL instruction. 
It provides event synchronization by means of suspending 
a task's execution until some specified event is sig- 
nalled complete by another process in the system. 
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DMTCEE 



DMTDSE 



DHTEXT 



EMTGIV 



CHTINI 
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GTODEBCD 
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lONEXT 

lOREQ 

lOSBCHAN 
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lOSDBQ 

lOSINCB 

lOTABLE 

lOTABLEA 

IPLCCH1 
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lACTTHHE 

L ALERT 

1DEFC1S1 

LDEFDRVR 

LDEFLIBE 
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IDRAIN 

LERRCNT 

IFLAG 

LHALT 

IHOID 

LIMBO 

LIHKID 

LIHKLEN 

LIHKTABL 

LMSGQ 

lOCKLIST 

LPENDIHG 

IPOIHTER 

LRESERVD 

ISPABE 



000003 
000004 
000005 
000004 
000001 
000008 
000024 
000003 
000004 
000015 
000013 
000006 
000009 
000007 
000021 
000034 
000009 
000001 
000005 
000005 
000008 
000019 
000013 
000021 
000005 
000004 
000005 
000004 
000004 
000013 
000008 
000073 
000003 
000018 
000005 
000045 
000017 
000015 
000005 
000004 
000018 
000015 
000006 
000002 



DMTAXS 
DUTHPT 
DMTAXS 
DMTAXS 
DMTNPT 
DMTIOB 
DMTASK 
DMT ASK 
DMTASK 
DMTASK 
DMTCRE 
DMTIOM 
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DMTCMX 
DMTCMX 



DMTMGX 
DMTSML 
DMTSML 
DMTNPT DMTSML 



DMTREX 
DMTIOM 
DMTREX 
DMTREX 
DMTBEX 



DMTSML 
DMTCRE 



DMTSML 
DMTREX 
DMTCOM 
DMTCOM 
DMTCOM 

DMTHAT 



DMTSML 



DMTINI 



DMTIOM 



DMTREX 



DMTSML 



DMTREX 

DMTLAX DMTMGX 

DMTNPT DMTREX 

DMTCOM DMTCRE 



DMTREX 
DMTSML 
DMTMGX DMTREX 



DMTSML 

DMTLAX DMTMGX DMTHPT DMTREX DMTSML 



DMTLAX 
DMTLAX 
DMTCRE 



DMTMGX 
DMTREX 
DMTLAX 



DMTNPT 
DMTSYS 
DMTMGX 



DMTREX 



DMTHPT 



DMTSML 



DMTREX 



DMTSML 



» 
CO 

o 

CO 

tr 

(D 
M 

I 

f+ 

o 
I 

at 
o 
Pi 

c 



o 
l-J 
o 

CO 

w 
» 

(D 
Hi 
(D 
H 

» 
O 
(0 



< 

i3 
\ 

O 



•-< 
w 
(+ 

(D 
B 

t-< 
O 

ua 
o 

Qj 

fO 
M 
O 

cr 

H 
<D 

3 

O 
(D 
ft 
(D 
H 
S 
H- 
3 
» 
f+ 
H- 
O 


a 

c 

H- 
P> 



label 



LTAKEH 

ITOCHT 

LTRALL 

ITBEBB 

LTHNSCNT 

HAIHH&F 

HAINREQ 

H&INSIZE 

MCHEK 

HPXIOQ 

HESEXT 

HEilO 

HEHPBOG 

NERPSII 

HESSVC 

OLDEXT 

OLDIO 

CLDPBOG 

OLDSVC 

PCI 

PHSGBEQ 

POSTBEQ 

PBOGADEB 

QBEQ 

QOEOE 

fiOOTDEST 

BODTE 

BOOTBEIT 

BODTSIZE 

BO 

B1 

BIO 
B11 
B12 

B13 

B14 

B15 



Count 



000006 
000008 
000016 
000013 
000008 
000016 
000002 
000007 
000001 
000007 
000003 
000004 
000004 
000006 
000001 
000002 
000006 
000001 
000004 
000001 
000003 
000011 
000012 
000014 
000001 
000001 
000001 
000002 
000003 
000513 

001048 

000058 
000033 
000050 

000190 

001066 

000938 



Beferences 



DHTAXS 
DBTSPT 
DHTCMX 
DMTCBX 
DHTNPT 
DBTASK 
DMTCOM 
DHTASK 
DHTINI 
DHTASK 
DHTEXT 
DHTINI 
DHTBEX 
DHTDSP 
DHTSVC 
DHTEXT 
DHTIHI 
DHTBEX 
DHTSVC 
DHTIOH 
DHTHGX 
DHTAKE 
DHTAXS 
DHTAKE 
DHTIHI 
DHTAXS 
DHTAXS 
DHTAXS 
DHTAXS 
DHTASK 
DHTHGX 
DHTAKE 
DHTLAX 
DHTAXS 
DHTAKE 
DHTAKE 
DHTNPT 
DHTAKE 
DHTBEX 
DHTAKE 
DHTHGX 
DHTAKE 
DHTLAX 



DHTCHX 
DHTSHL 
DHTNPT 
DHTNPT 
DHTSHL 
DHTAXS 
DHTCRE 
DHTCHX 

DHTIOH 
DHTINI 
DHTIOH 

DHTSVC 



DHTIOH 



DHTNPT 
DHTASK 
DHTIOH 
DHTASK 



DHTSIS 
DHTASY 
DHTNPT 
DHTASK 
DHTHGX 
DHTCHX 
DHTAXS 
DHTASK 
DHTBEX 
DHTASK 
DHTSIG 
DHTASK 
DHTNPT 
DHTASK 
DHTHGX 



DHTSHL 
DHTSHL 

DHTCHX DHTCOH 

DHTCOH DHICBE 

DHTBEX 



DHTSHL 
DHTAXS 
DHTBEX 
DHTASY 



DHTAXS 
DHTPST 
DHTASY 
DHTNPT 
DHTCOH 
DHTCHX 
DHTASY 
DHTSHL 
DHTASY 
DHTSHL 
DHTASY 
DHTPST 
DHTASY 
DHTNPT 



DHTGIV 
DHTSHL 
DHTGIV 



DHTCHX 
DHTBEX 
DHTAXS 
DHTPST 
DHTIHI 
DHTCOH 
DHTAXS 

DHTAXS 
DHTSVC 
DHTAXS 
DHTQBQ 
DHTAXS 
DHTQBQ 



DHTCBE 
DHTIHI 



DHTIOH 
DHTIHI 



DHTCOH 
DHTSIG 
DHTCHX 
DHTQBQ 
DHTHGX 
DHTINI 
DHTCHX 



DHTIHI 
DHTBEX 



DHTNPT 
DHTIOH 



DHTCBE 
DHTSHL 
DHTCOH 
DHTBEX 
DHTHPT 
DHTHPT 
DHTCOH 



DHTCHX DHTCOH 



DHTBEX 



DHTBEX 



DHTCHX 
DHTBEX 
DHTCHX 
DHTBEX 



DHTCOH 
DHTSIG 
DHTCOH 
DHTSIG 



DHTDSP 
DHTSTO 
DHTCBE 
DHTSHL 
DHTSHL 
DHTSHL 
DHTCBE 

DHTEXT 

DHTCBE 
DHTSHL 
DHTCBE 
DHTSHL 



DHTSTO 



DHTSHL 



DHTEXT 
DHTSVC 
DHTDSP 
DHTSTO 



DHTGIV 

DHTGIV 

DHTEXT 
DHTSTO 
DHTDSP 
DHTSTO 



DHTGIV 



DHTEXT 
DHTIAT 



DHTIHI 

DHTIHI 

DHTGIV 
DHTSVC 
DHTEXT 
DHTSVC 



DHTIHI 
DHTGIV 



DHTIOH 

DHTIOH 

DHTIHI 
DHTHAT 
DHTGIV 
DHTHAT 



DHTIOH 
DHTIHI 

DHTLAX 
DHTHGX 
DHTIOH 
DHTIHI 



DHTLAX 
DHTIOH 

DHTHGX 
DHTHPT 
DHTLAX 
DHTIOH 
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Label 


Count 


Beferences 






















B2 


000739 


DMTAKE 


DMTASK 


DMTASY 


DMTAXS 


DMTCMX 


DMTCOH 


DHTCBE 


DMTDSP 


DMTEXT 


DHTGIV 


DHTINI 


DMTIOM 






DHTLAX 


DMTMGX 


DMTNPT 


DMTBEX 


DHTSIG 


DHTSHL 


DHTSTO 


DMTWAT 










B3 


000723 


DMTAKE 


DMTASK 


DMTASY 


DMTAXS 


DMTCMX 


DHTCOH 


DHTCBE 


DMTDSP 


DHTEXT 


DHTGIV 


DMTINI 


DMTIOM 






DMT LAX 


DMTMGX 


DMTNPT 


DMTBEX 


DHTSIG 


DHTSHL 


DHTSTO 


DHTWAT 










B4 


000620 


DMTAKE 


DMTASK 


DMTASY 


DMTAXS 


DMTCHX 


DMTCOH 


DHTCBE 


DMTDSP 


DMTEXT 


DHTGIV 


DMTINI 


DMTIOM 






DMTLAZ 


DMTMGX 


DMTNPT 


DMTBEX 


DMTSML 


DHTSTO 


DHTWAT 












B5 


000418 


DMTAKE 
DMTSML 


DMTASK 
DMTWAT 


DMTAXS 


DMTCMX 


DMTCOH 


DMTCBE 


DMTINI 


DMTIOM 


DMTLAX 


DMTMGX 


DMTNPT 


DMTBEX 


B6 


000460 


DMTAKE 
DMTWAT 


DMTASK 


DMTAXS 


DMTCHX 


DMTCOH 


DHTCBE 


DMTINI 


DMTIOH 


DMTLAX 


DMTMGX 


DHTNPT 


DMTSML 


B7 


000309 


DM TASK 


DMTAXS 


DMTCMX 


DHTCOH 


DHTCBE 


DMTINI 


DMTLAX 


DHTHGX 


DMTNPT 


DMTSML 






B8 


000368 


DMT ASK 


DMTAXS 


DMTCHX 


DMTCOH 


DHTIHI 


DHTLAX 


DMTHGX 


DMTNPT 


DMTSML 








B9 


000122 


DMTASK 


DMTAXS 


DHTCMX 


DHTCOM 


DMTCBE 


DHTIHI 


DHTLAX 


DMTHGX 


DMTNPT 


DMTSML 






SELIOQ 


000007 


DMT ASK 


DMTIOM 


DMTBEX 




















SENSING 


000003 


DMTIOM 
























SENSBEC 


000002 


DMTIOM 
























SFBCLAS 


000001 


DMTAXS 
























SFBCOPl 


000001 


DMTAXS 
























SFBDATE 


000001 


DMTAXS 
























SFBDIST 


000001 


DMTAXS 
























SFBFILID 


000010 


DMTAXS 
























SFBFLAG 


000002 


DMTAXS 
























SFBFLAG2 


000001 


DMTAXS 
























SFBFNAHE 


000001 


DMTAXS 
























SFBFTYPE 


000001 


DMTAXS 
























SFBIHDSE 


000001 


DMTAXS 
























SFBLOK 


000002 


DMTAXS 
























SFBOBIG 


000002 


DMTAXS 
























SFBSECNO 


000001 


DMTAXS 
























SFBBECSZ 


000001 


DMTAXS 
























SFBBEQOE 


000004 


DMTAXS 
























SFBSHOID 


000004 


DMTAXS 


DMTCMX 






















SFBTYPE 


000001 


DMTAXS 
























SFBDHOID 


000005 


DMTAXS 


DHTCMX 






















SILI 


000130 


DMTCBE 


DMTINI 


DMTNPT 


DMTBEX 


DHTSHL 
















SIOCOND 


000005 


DMTCBE 


DMTIOM 






















SKIP 


000002 


DMTNPT 


DMTSML 






















SH 


000001 


DMTIOM 
























SPLINK 


000006 


DMTNPT 


DMTSML 






















SPBECNDH 


000018 


DMTNPT 


DMTSML 






















SSAVE 


000011 


DMTEXT 


DMTIOM 


DMTBEX 


DHTSVC 


















SVECTOBS 


000022 


DMTAKE 


DMTASK 


DMTASY 


DMTAXS 


DMTCMX 


DHTCOM 


DMTCBE 


DHTDSP 


DMTEXT 


DHTGIV 


DMTINI 


DMTIOM 






DMTLAX 


DMTMGX 


DMTNPT 


DMTQBQ 


DMTBEX 


DHTSIG 


DHTSHL 


DHTSTO 


DMTSVC 


DMTWAT 






TAG 


000038 


DMTAXS 


DHTCMX 


DMTNPT 


DHTSHL 
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label 



TiGBLOCK 

TAGCLASS 

TAGCOPT 

lAGDEV 

TAGDIST 

TAGFLAG 

TAGFLAG2 

TAGID 

TAGINDEV 

TAGIHICC 

TAGIHTOD 

7AGIHVH 

TAGLEN 

TAG LINK 

TAGBAME 

TAGNEXT 

lAGPRICB 

TAGRECLN 

TAGBECBH 

TAGTOLOC 

lAGTOTM 

TAGTYPE 

lAKEBEQ 

TABEA 

TASKE 

TASKID 

TASKNAHE 

TASKNEXT 

TASKQ 

TASKBEQ 

TASKSAVE 

TASKSTAT 

TCOH 

TGREGO 

TGBEG1 

TGBEG12 

TGBEG13 

TGBEGm 

IGBEG15 

TGBEG2 

IGREG4 

TIMER 



Count 



000019 
000009 
000010 
000016 
000015 
000008 
000004 
000022 
000022 
000012 
000007 
000008 
000002 
000020 
000009 
000051 
000012 
000001 
000004 
000013 
000017 
000001 
000002 
000021 

000044 

000021 
000016 
000023 
000010 
000003 
000015 
000014 
000019 
000014 
000005 
000001 
000005 
000003 
000020 
000005 
000001 
000001 



Beferences 



DHTAXS 
DBTAXS 
DMTAXS 
DHTAXS 
DHTAXS 
DHTAXS 
DHTAXS 
DHTAXS 
DHTAXS 
DHTAXS 
DHTAXS 
DHTAXS 
DHTAXS 
DHTAXS 
DHTAXS 
DHTAXS 
DHTAXS 
DHTAXS 
DHTAXS 
DHTAXS 
DHTAXS 
DHTAXS 
DHTAXS 
DHTAKE 
DHTSVC 
DHTAKE 
DHTREX 
DHTAKE 
DHTAKE 
DHTAKE 
DHTAKE 
DHTCBE 
DHTASK 
DHTASK 
DHTAXS 
DHTASK 
DHTAKE 
DHTREX 
DHTASK 
DHTEXT 
DHTAKE 
DHTCOH 
DHTEEX 
DHTINI 



DHTCHX 
DHTCHX 
DHTCHX 
DHTHPT 
DHTCHX 
DHTCHX 

DHTCHX 
DHTHPT 
DHTCHX 
DHTCHX 
DHTCHX 
DHTSTS 
DHTCHX 
DHTCHX 
DHTCHX 
DHTCHX 

DHTCHX 
DHTCHX 
DHTCHX 

DHTBEX 
DHTASK 

DHTASK 
DHTSIG 
DHTASK 
DHTASK 
DHTASK 
DHTASK 
DHTREX 
DHTAXS 
DHTDSP 
DHTCHX 
DHTASY 
DHTCOH 

DHTBEX 
DMTIOH 
DHTASK 
DHTCBE 



DHTSHL 
DHTHPT 



DHTHPT 
DHTSHL 
DHTHPT 
DHTHPT 
DHTHPT 

DHTHPT 
DHTHPT 
DHTHPT 



DHTHPT 
DHTHPT 
DHTHPT 



DHTASI 

DHTAST 
DHTSHL 
DHTASY 
DHTCOH 
DHTCOH 
DHTCOH 

DHTDSP 
DHTIHI 
DHTHGX 
DHTCOH 
DHTCBE 

DHTSVC 
DHTSVC 
DHTASY 
DHTREX 



DHTSHL 



DHTSHL 

DHTSHL 
DHTSHL 
DHTSHL 

DHTSHL 
DHTSHL 



DHTSHL 
DHTSHL 
DHTSHL 



DHTCOH 

DHTAXS 
DHTSTO 
DHTCOH 
DMTGIV 
DHTDSP 
DHTDSP 

DHTEXT 
DHTPST 
DHTHPT 
DHTCBE 
DHTDSP 



DHTCOH 
DHTSIG 



DHTCBE 

DHTCOH 
DHTSVC 
DHTDSP 
DHTIHI 
DHTGIV 
DHTGIV 

DHTGIV 
DHTBEX 
DHTBEX 
DHTDSP 
DHTSTO 



DHTGIV 



DHTDSP 

DHTDSP 
DHTiAT 
DHTGIV 
DHTBEX 
DHTIHI 
DHTIHI 

DHTIHI 
DHTWAT 
DHTSHL 
DHTEXT 



DHTSIG 



DHTEXT 

DHTEXT 

DHTINI 
DHTSIG 
DHTBEX 
DHTBEX 

DHTIOH 



DHTIOH 



DHTSTO 



DHTGIV 



DHTGIV 



DHTIOH 



DHTHPT 



DHTBEX 



DHTIOH 



DHTBEX 



DHTIHI DHTIOH 



DHTSIG 



DHTHPT 



DHTSTO 



DHTPST 



DHTBEX 



DHTBEX 



DHTSVC 



DHTSTO 



DHTSHL 



DHTSVC 
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Label 



Count 



References 



TLIHKS 

TPORTS 

TPSH 

TREQLOCK 

TRODTE 

TTiGQ 

TYECTOBO 

TIPBSC 

ITPPBT 

TYPPDH 

TTP1403 

TIP23m 

IYP2540P 

TYP2700 

TTP3210 

TIP3211 

TTP3330 

TYP3340 

DC 

0£ 

i&IT 

14ITING 

iAITREQ 



000030 
000003 
000014 
000004 
000001 
000005 
000001 
000002 
000009 
000010 
000001 
000005 
000001 
000004 
000009 
000001 
000002 
000002 
000010 
000003 
000002 
000005 
000030 



DMTiXS 
DHTCHX 
DHTCOM 
DHTAKE 
DHTAXS 
DHTAXS 
DMT BEX 
DBTLAX 
DBTAXS 
DHTAXS 
DHTAXS 
DHTCRE 
DHTAXS 
DHTLAX 
DHTIHI 
DHTAXS 
DHTIBI 
DHTINI 
DHTIOH 
DHTNPT 
DHTIHI 
DHTDSP 
DHTAXS 



DHTCHX 
DHTLAX 
DHTDSP 
DHTGI? 

DHTCHX 



DHTHPT 
DHTHPT 



DHTIHI 



DHTHPT 
DHTHPT 



DHTHPT 
DHTREX 



DHTPST 
DHTCRE 



DHTCOH 
DHTREX 
DHTEXT 



DHTSHL 
DHTSHL 



DHTSHL 
DHTREX 



DHTSHL 
DHTSHL 



DHTREX 
DHTLAX 



DHTLAX 



DHTIOH 



DHTHGX DHTHPT 



DHTREX 



DHTSHL 



DHTREX 



DHTSVC 



DHTSHL 



DHTiAT 
DHTHPT 



DHTREX DHTSHL 
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CP INTERNAL TRACE TABLE 

CP has an internal trace table which records events that occur in the 
real machine. The events that are traced are: 

External interruptions 

SVC interruptions 

Program interruptions 

Machine check interruptions 

I/O interruptions 

Free storage requests 

Release of free storage 

Entry into scheduler 

Queue drop 

Run user requests 

Start I/O 

Onstack l/o interruptions 

Storing a virtual CSW 

Test I/O 

Halt device 

Unstack lOBLCK or TRQBLOK 

NCP BTU (Network Control Program Basic Transmission Unit) 

Use the trace table to determine the events that preceded a CP system 
failure. An ABEND dump contains the CP internal trace table and the 
pointers to it. The address of the start of the trace table, TRACSTRT, 
is a location X*OC». The address of the byte following the end of the 
trace table, TRACEND, is a location XMO'. The address of the next 
available trace table entry, TRACCURR, is at location X»1U'. Subtract 
16 (XMO*) bytes from the address stored at XM4» (TRACCURR) to obtain 
the trace table entry for the last event completed. 

The size of the trace table depends on the amount of real storage 
available at IPL time. For each 256K bytes (or part thereof) of real 
storage available at IPL time, one page (4096 bytes) is allocated to the 
CP trace table. Each entry in the CP trace table is 16 bytes long. 
There are 17 possible types of trace table entries; one for each type of 
event recorded. The first byte of each trace table entry, the 
identification code, identifies the type of event being recorded. 

The trace table is allocated by the main initialization routine, 
DMKCPI. The first event traced is placed in the lowest trace table 
address. Each subsequent event is recorded in the next available trace 
table entry. Once the trace table is full, events are recorded at the 
lowest address (overlaying the data previously recorded there) . Tracing 
continues with each new entry replacing an entry from a previous cycle. 

The CP internal trace table is initialized during IPL. If you do not 
wish to record events in the trace table, issue the MONITOR STOP CPTRACE 
command to suppress recording. The pages allocated to the trace table 
are not released and recording can be restarted at any time by issuing 
the MONITOR START CPTRACE command. If the VM/370 system should 
abnormally terminate and automatically restart, the tracing of events on 
the real machine will be active. After a VM/370 IPL (manual or 
automatic) , CP internal tracing is always active. 

Section 4. Diagnostic Aids U77 



There are 17 possible types of trace table entries, each uniquely 
identified by the value of the first byte. Figure 62 describes the 
format of each type of trace table entry. 



Identification 

Code 
(hexadecimal) 



Format of Trace Table Entry 



External interrupt 



Program interrupt 



Free Storage (FREEl 



Return storage (FRET) 



Enter Scheduler 



DMKCNS 
DMKIOS 
DMKVIO 



Unstack I/O interrupt 



/irtual CSW store 



DMKCNS 
DMKIOS 
DMKVIO 

DMKCNS 
DMKIOS 
DMKVIO 



Unstack 
lOBLOK or 
TROBLOK 

NOP BTU 
(See Note 2) 



x-or 




X'OOOOOOOOOO' 

1 


Interrupt 
g Code 


External Old PSW 
8 15 



X'02 



GRUor GR15 (See Note 11 

1 


4 Length Code 


Interrupt 
e Code 


SVC Old PSW 

8 15 



X'03' 



First 3 bytes 
, of VMPSW 


4 Length Code 


Interrupt 
6 Code 


Program Old PSW 
8 16 



X'04' 




Address of 
, VMBLOK 


First 4 bytes of 
BIjyte Interrupt 
4 Code 


Machine Check Old PSW 
8 16 



X'05' 



x-00- 


Device 
2 Address 


I/O Old PSW + 4 
4 


CSW 
8 16 



Address of 
1 VMBLOK 



X'08- 



Address of 
VMBLOK 

1 


Value ul VMRSTAT, 
VMOSTAT. VMOSTAT, 
4 and VMOSTAT 


VMQLEVEL ' 
VMTLEVEL 
8 


VMIOINT 
10 


VMPEND 

12 


13 IS 



Address of VMBLOK 



Current 

Page load 

(PSA) 



XOA' 




X'0(X)0(X)' 

1 


RUNUSER value 
4 from PSA 


RUNPSW value from PSA 
B 15 



X'OB' 



Condition 
Code 


Device 
Address 


Address of lOBLOK 
4 


CAW 

8 


ForCC' l,CSW + 4 

otherwise this field is 

12 not used 15 



x'oc 



xw 

1 


Virtual 

Device 

2 Address 


Address of VMBLOK 
4 


Virtual CSW 
8 16 



1 Code 



Addrass of VMBLOK 



X-OE- 



Condition 
1 Code 


Device 
2 Address 


Address of IOBLOK 
4 


CAW 
8 


Force- 1.CSW + 4 

othervt'ise this field is 

12 not used lb 



X'OF' 



Condition 
, Code 


Device 
2 Address 


Addrei'. of lOBLOK 
4 


CAW 
8 


Force- 1,eSW + 4 

otherwise this field is 

12 not used 15 



Address of VMBLOK 



Value of VMRSTAT, 

VMDSTAT, VMOSTAT, 

and VMOSTAT 



X-1V 



X'OO- 

1 


CONSRID 
2 


CONGEST 
4 


CONRTAG 
6 


CONSVSR 
CONEXTR 


CONTCMD 
10 


CONFUNC 
eONDFLG 


CONDCNT 
14 IB 



Notes: 1. If the interrupt code (bytes 6 and 7) is OC, the contents of GR 14 ate displayed. For all other interrupt codes, the contents of GR 15 are displayed. 

2. Bytes 2 through 15 of a code 1 1 trace record represent a Basic Transmission Unit, sent or received by a 3704/3705. If CONSYSR/CONEXTR are zero, the 
BTU was transmitted to the 3704/3706. If they are non-zero, the BTU was received. If CONTCMD equals X'7700', this is an unsolicited BTU response. 



Figure 62. CP Trace Table Entries 
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CP COMMANDS USED TO DEBUG THE VIRTUAL MACHINE 

The VM/370 Control Program has a set of interactive commands that 
control the VM/370 system and enable the user to control his virtual 
machines and associated control program facilities. The virtual machine 
operator using these commands can gather much the same information about 
his virtual machine that an operator of a real machine gathers using the 
CPU console. 

The CP commands are eight characters or less in length. The commands 
can be abbreviated by truncating them to the minimum permitted length 
shown in the format description. When truncation is permitted, the 
shortest acceptable version of the command is represented by capital 
letters, with the optional part represented by lowercase letters. Note, 
however, that you can enter any CP command with any mixture of uppercase 
and lowercase letters. 

The operands, if any, follow the command on the same line and must be 
separated from the command by a blank. Lines cannot be continued. 
Generally, the operands are positional, but some commands have reserved 
words and keywords to assist processing. Blanks must separate the 
command from any operands and the operands from each other. 

Several of these commands (for example, STORE or DISPLAY) examine or 
alter virtual storage locations. When CP is in complete control of 
virtual storage (as in the case of DOS, MFT, MVT, PCP, CMS, and RSCS) 
these commands execute as expected. However, when the operating system 
in the virtual machine itself manipulates virtual storage (OS/VSl, 
0S/VS2, or DOS/VS) , these CP commands should not be used. 

Each CP user has one or more privilege classes as indicated in his 
VM/370 directory entry. Class G commands useful for debugging are 
discussed in the following paragraphs. For a discussion of all the CP 
Class G commands and the CP command privilege classes, refer to the 
VMZ370: CP Command Reference for General Users. The remainder of this 
section discusses the CP Class G commands that provide material and 
techniques that are useful in debugging. 
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ADSTOP 

££ilii§3® Class: G 

Use the ADSTOP command to halt the execution of a virtual machine at a 
virtual instruction address. Execution halts when the instruction at 
the address specified in the command is the next instruction to be 
executed. The format of the ADSTOP command is: 



r- 



I ADSTOP I / hexloc ) I 

I I t OFF I I 



where : 

hexloc is the hexadecimal representation of the virtual instruction 
address where execution is to be halted. Since ADSTOP 
modifies storage, an address specified within a shared segment 
results in the virtual machine being placed in nonshared mode 
with its own copy of the shared segment. A fresh copy of the 
shared segment is then loaded for the use of the other users. 

OFF cancels any previous ADSTOP setting. 



1. When execution halts, the CP command mode is entered and a message 
is displayed. At this point, you may invoke other CP debugging 
commands. To resume operation of the virtual machine, issue the 
BEGIN command. Once an ADSTOP location is set, it may be removed 
by one of the following: 

• Reaching the virtual storage location specified in the ADSTOP 
command 

• Performing a virtual IPL or SYSTEM RESET 

• Issuing the ADSTOP OFF command 

• Specifying a different location with a new ADSTOP hexloc command 

2. since the ADSTOP function modifies storage by placing a CP SVC 
X'B3' at the specified location, you should not: 

• Examine the two bytes at the instruction address because CP does 
not verify that the location specified contains a valid CPU 
instruction. 

• Use the TRACE command with the INSTRUCT, BRANCH, or ALL operands 
if any traced instruction is located at the ADSTOP address. 

3. Address stops may not be set in an OS/VS or DOS/VS virtual 
machine's virtual storage; address stops may be set only in the 
virtual=real partitions or regions of those virtual machines. 
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4. If the SVC handling portion of the virtual machine assist feature 
is enabled on your virtual machine, CP turns it off when an ADSTOP 
is set. When the address stop is removed, CP returns the assist 
feature SVC handling to its previous status. 



Response 

ADSTOP AT xxxxxx 

The instruction whose address is xxxxxx is the next instruction 
scheduled for execution. The virtual machine is in a stopped 
state. Any CP command (including an ADSTOP command to set the next 
address stop) can be issued. Enter the CP command BEGIN to resume 
execution at the instruction location xxxxxx, or at any other 
location desired. 
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BEGIN 



PliYii§36 Class : G 



Use the BEGIM command to continue or resume execution in the virtual 
machine at either a specified storage location or the location pointed 
to by the virtual machine's current program status word (PSW) . The 
format of the BEGIN command is: 



I Begin | [hexloc] 



where: 
hexloc 



is the hexadecimal storage location where execution is to 
begin. 



^§.§3® M2t§§ 



When BEGIN is issued without hexloc, execution begins at the 
storage address pointed to by the current virtual machine PSH. 
Unless the PSW has been altered since the CP command mode was 
entered, the location stored in the PSW is the location where the 
virtual machine stopped. 

When BEGIN is issued with a storage location specified, execution 
begins at the specified storage location. The specified address 
replaces the instruction address in the PSW, then the PSW is 
loaded. 



ResEonses 



None. The virtual machine begins execution. 
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DISPLAY 



P£ivil§a® class: G 



Use the DISPLAY command to display the following virtual machine 
components at your terminal: 

• Virtual storage locations (1st level virtual storage only; see Usage 
Notes.) 
Storage keys 
General registers 
Floating-point registers 
control registers 
Program status word (PSW) 
Channel address word (CAW) 
Channel status word (CSW) 

J52i®* Use the NETWORK DISPLAY command to display the content of 
3704/3705 storage. 

The format of the DISPLAY command is: 



Display 



1 / r 

1 / 1 hexloc 
1 / IKhexloc 
1 1 ILhexloc 
1 1 IThexloc 
III 
1 1 *" 


T r r 11 

11 |/-\|hexloc2 1 1 
11 11 : flJO 1 1 
11 1 •- --I 
11 1 r 1 1 
1 l{ • ) 1 bytecounti | 
-" 1 |END 1 1 

L L ~ J J 


1 / r 
1 / Gregl | 
1 \ Yregl | 
1 1 Xregl I 


i-UTeq2] 
\:/|END 1 

L J 


1 


1 L 


r 1 

{ . } Iregcount 1 
IMD 1 

L J 


J 


1 Psw 






1 CAW 






1 \ CSW 







where: 



hexloci 

Lhexloci 

Thexloci 

Khexloci 





is the first, or only, hexadecimal storage location 
that is to be displayed at the terminal. If 
L or no letter prefix is specified, the storage 
contents are displayed in hexadecimal. If T is 
specified, the storage contents are displayed in 
hexadecimal, with EBCDIC translation. If K is 
specified, the storage keys are displayed in 
hexadecimal. 



If hexloci is not on a fullword boundary, it is rounded 
down to the next lower fullword. 

If hexloci is not specified, the display begins at 
storage location 0. If L, T, or K are entered either 
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without any operands, or followed immediately by a 
blank, the contents of all storage locations or all the 
storage keys are displayed. If L, T, or K are not 
specified and this is the first operand, then the 
default value of zero is assumed. The address, 
hexloci, may be one to six hexadecimal digits; leading 
zeros are optional. 

j-)hexloc2 is the last of the range of hexadecimal storage 
t:(END locations whose contents are to be displayed at the 

terminal. Either a — or a : must be specified to 
display the contents of more than one location by 
storage address. If hexloc2 is not specified, the 
contents of all storage locations from hexloci to the 
end of virtual storage are displayed. If specified, 
hexloc2 must be equal to or greater than hexloci and 
within the virtual storage size. (See Dsage Notes 
below for a discussion on discontiguous shared 
segments.) The address, hexloc2, may be from one to 
six hexadecimal digits; leading zeros are optional. 

{ . }bytecount is a hexadecimal integer designating the number of 
END bytes of storage (starting with the byte at hexloci) to 

be displayed at the terminal. The period (.) must be 
specified to display the contents of more than one 
storage location by bytecount. The sum of hexloci and 
bytecount must be an address that does not exceed the 
virtual machine size. (See Usage Notes below for a 
discussion on discontiguous shared segments.) If this 
address is net on a fullword boundary, it is rounded up 
to the next higher fullword. The value, bytecount, 
must have a value of at least one and may be from one 
to six hexadecimal digits; leading zeros are optional. 

Gregl is a decimal number from to 15 or a hexadecimal 

integer from to F representing the first, or only, 
general register whose contents are to be displayed at 
the terminal. If G is specified without a register 
number, the contents of all the general registers are 
displayed at the terminal. 

Yregl is an integer (0, 2, 4, or 6) representing the first, 

or only, floating-point register whose contents are to 
be displayed at the terminal. If Y is specified 
without a register number, the contents of all of the 
floating-point registers are displayed at the 
terminal. 

^regl is a decimal number from to 15 or a hexadecimal 

number from to F representing the first, or only, 
control register whose contents are to be displayed at 
the terminal. If X is specified without a register 
number, the contents of all of the control registers 
are displayed at the terminal. If Xregl is specified 
for a virtual machine without extended mode operations 
available, only control register is displayed. 



/ -\reg: 



is a number representing the last register whose 
contents are to be displayed at the terminal. Either a 
- or a : must be specified to display the contents of 
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more than one register by register number. If reg2 is 
not specified, the contents of all registers from regl 
through the last register of this type are displayed. 
The operand, reg2, must be egual to or greater than 
regl. If Gregl or Xregl are specified, reg2 may be a 
decimal number from 0-15 or a hexadecimal number from 
0-F. If Yregl is specified, reg2 may be 0, 2, U, or 
6, The contents of registers regl through reg2 are 
displayed at the terminal. 

{ . }regcount is a decimal number from 1 to 16 or a hexadecimal 
END number from 1 to F specifying the number of registers 

(starting with regl) whose contents are to be displayed 
at the terminal. If the display type G or X is 
specified, regcount can be a decimal number from 1 to 
16 or a hexadecimal number from 1 to F. If display type 
Y is specified, regcount must be 1, 2, 3, or U. The 
sum of regl and regcount must be a number that does not 
exceed the maximum register number for the type of 
registers being displayed. 

PSH displays the current virtual machine PSH (program 

status word) as two hexadecimal words. 

CAW displays the contents of the CAW (channel address word 

at hexadecimal location 48) as one hexadecimal word. 

CSW displays the contents of the CSW (channel status word 

at hexadecimal location 40) as two hexadecimal words. 



1 . Only first level storage (storage that is real to the virtual 
machine) can be displayed. Operating systems such as DOS/VS and 
OS/VS have virtual storage of their own. This second level virtual 
storage cannot be displayed directly. The user or the virtual 
operating system is responsible for converting any second level 
storage locations to first level storage locations before issuing 
the command. 

2. If a command line with an invalid operand is entered, the DISPLAY 
command terminates when it encounters the invalid operand; however, 
any previous valid operands are processed before termination 
occurs. Multiple storage locations, registers, and control words 
can be displayed using a single command line. 

3. When multiple operands are entered on a line for location or 
register displays, the default display type is the same as the 
previous explicit display type. The explicit specification of a 
display type defines the default for subsequent operands for the 
currant display function. Blanks are used to separate operands or 
sets of operands if more than one operand is entered on the same 
command line. Blanks must not be used to the right or left of the 
range or length delimiters (: or - or .) , unless it is intended to 
take the default value of the missing operand defined by the blank. 
For example: 

display 10 20 T40 80 G12 5 L60-100 
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displays the following, respectively: 

hexadecimal location 10 

hexadecimal location 20 

hexadecimal location 40 with EBCDIC translation 

hexadecimal location 80 with EBCDIC translation 

general register 12 

general register 5 

hexadecimal locations 60 through 100 

H. To terminate the DISPLAY function while data is being displayed at 
the terminal, press the Attention key (or its equivalent). When 
the display terminates, another command may be entered. 

5. The DISPLAY command does not distinguish between shared and 
non-shared storage; it displays any of the virtual machine's 
addressable storage whether shared or not. 

6. Use the DISPLAY command to display the contents of various storage 
locations, registers, and control words at the terminal. By 
examining this type of information during the program's execution, 
you may be able to determine the cause of program errors. Usually, 
an address stop is set to stop the program execution at a specified 
point. The system enters the CP environment and you may then issue 
the DISPLAY command. 

7. When you must examine large portions of storage, use the DUMP 
command rather than the DISPLAY command. Because the terminal 
operates at a much slower speed than the printer, only limited 
amounts of storage should be printed (via the DISPLAY command) at 
the terminal. 

8. When running with a discontiguous saved segment (DCSS) , you can 
display storage locations outside the range of your virtual machine 
size if they are within the DCSS. If there exist locations between 
the upper limit of your virtual machine and the address at which 
the DCSS was saved, an attempt to display those locations (or 
associated keys) will result in a "non-addressable storage" 
message. 

Responses 

One or more of the following responses is displayed, depending upon the 
operands specified. 



EisElaying Storage Locations 

xxxxxx wordi word2 word3 wordU [key] *EBCDIC TRANSLATION* 

This is the response you receive when you display storage 
locations; xxxxxx is the hexadecimal storage location of wordi. 
Wordi is displayed (word-aligned) for a single location 
specification. Up to four words are displayed on a line, followed, 
optionally, by an EBCDIC translation of those four words. Periods 
are represented by nonprintable characters. Multiple lines are 
used (if required) for a range of locations. If translation to 
EBCDIC is requested (Thexloc) , alignment is made to the next lower 
16-byte boundary; otherwise, alignment is made to the next lower 
fullword boundary. If the location is at a 2K page boundary, the 
key for that page is also displayed. 
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Displajfing Storaae Ke^s 



xxxxxx TO xxxxxx KEY = kk 



This is the response you receive when you display storage keys; 
xxxxxx is a storage location and kk is the associated storage key. 



JDisglajfina General Eegisters 

GPR n = genregl genreg2 genregS genreg4 

This is the response you receive when you display general 
registers; n is the register whose contents are genregl. The 
contents of the following consecutive registers are genreg2, 
genregS, and so on. The contents of the registers are displayed in 
hexadecimal. up to four registers per line are displayed for a 
range of registers. Multiple lines are displayed if reguired, with 
a maximum of four lines needed to display all 16 general 
re<jisters. 



JQi§£i9iliB3 Zl^^iiSS'^^iSi Bsaisters 



FPR n = xxxxxxxxxxxxxxxx .xxxxxxxxxxxxxxxxx E XX 

This is the response you receive when you display floating-point 
registers; n is the even-number floating-point register whose 
contents are displayed on this line. The contents of the requested 
floating-point registers are displayed in both the internal 
hexadecimal format and the E format. One register is displayed per 
line. Multiple lines are displayed for a range of registers. 



lis£layina Control Registers 

ECR n = ctlregl ctlreg2 ctlregS ctlregU 

This is the response you receive when you display control 
registers; n is the register whose contents are ctlregl. The 
contents of the following consecutive registers are ctlreg2, 
ctlregS, and so on. The contents of the requested control 
registers are displayed in hexadecimal. Up to four registers per 
line are displayed. Multiple lines are displayed if required. 



Displacing the PSW 

FSN = xxxxxxxx xxxxxxxx 

The contents of the PSW are displayed in hexadecimal. 
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Cis£laxing the CAW 



CAW = xxxxxxxx 



The contents of the CAW (hexadecimal location 48) are displayed in 
hexadecimal. 



Dis£la^ing[ the CSW 

CSW = xxxxxxxx xxxxxxxx 

The contents of the CSW (hexadecimal location 40) are displayed in 
hexadecimal. 
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DUMP 



PE.iS.ii§3e Class: G 



Use the DUMP command to print the contents of various components of the 
virtual machine on the virtual spooled printer. The following items are 
printed: 

Virtual program status word (PSW) 

General registers 

Floating-point registers 

Control registers (if you have the ECMODE option specified in your 
VM/370 directory entry) 

Storage keys 

Virtual storage locations (1st level virtual storage only; see Usage 
Notes.) 

Note: Use the NETWORK DUMP command to dump the contents of 3704/3705 
storage. This command is described in the VM/370: Operator's Guide. 

The format of the DUMP command is: 



DUMP 



r T r r i 

ILhexlocI I H-\ |hexloc2 | 

IThexlocll || : flEND | 

I hexlocll I *- J 

I II r T 
•- -■ l{. }|bytecount| 

I I END I 



[♦dumpid ] 



where: 

Lhexloci 
Thexloci 
hexloci 




is the first or only hexadecimal storage location to 
be dumped. If you enter L or T without operands, the 
contents of all virtual storage locations are dumped. 

The address, hexloci r may be one to six hexadecimal 
digits; leading zeros are optional. If hexlccl is not 
specified, the dump begins at storage location 0. 



If hexloci is not on a fullword boundary, 
down to the next lower fullword. 



it is rounded 



/-\hex 



xloc2 



is the last hexadecimal storage location whose contents 
are to be dumped to the printer. The operand, hexloc2, 
must be egual to or greater than hexloci and within the 
virtual storage size. To dump to the end of storage, you 
can specify END instead of hexloc2 or you can leave the 
field blank, since the default is END. If you specify 
:END or -END, the contents of storage from hexloci to END 
are dumped. The contents of storage locations hexloci 
through hexloc2 are printed with EBCDIC translation at 
the printer. The operand, hexloc2, may be from one to six 
hexadecimal digits; leading zeros are optional. 
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{.}bytecoant is a hexadecimal integer designating the number of bytes 
END of storage (starting with the byte at hexloci) to be 
dumped to the printer. The period (.) must be specified 
to dump the contents of more than one storage location by 
bytecount. The sum of hexloci and bytecount must be an 
address that does not exceed the virtual machine size. 
If this address is not on a fullword boundary, it is 
rounded up to the next highest fullword. The value, 
bytecount, must be one or greater and can be no longer 
than six hexadecimal digits. Leading zeros are 
optional. 

*dumpid can be entered for descriptive purposes. If specified, 
it becomes the first line printed preceding the dump 
data. Up to 100 characters, with or without blanks, may 
be specified after the asterisk prefix. No error 
messages are issued, but only 100 characters are used, 
including asterisks and embedded blanks. 

^sage Notes 

1. Only first level storage (storage that is real to the virtual 
machine) can be dumped. Operating systems such as DOS/VS and OS/VS 
have virtual storage of their own. This second level virtual 
storage cannot be dumped directly. The user or the virtual 
operating system is responsible for converting any second level 
storage locations to first level storage locations before issuing 
the command. 

2. The CP DUMP command executes in an area of storage separate from 
your virtual machine storage and does not destroy any portion of 
your storage. 

3. The DUMP command prints the virtual PSW and the virtual registers 
(general, floating-point, and control). If only this information 
is desired, at least one virtual address must be specified, such as 

DUMP 

4. The output format for the virtual storage locations is eight words 
per line with the EBCDIC translation on the right. Each fullword 
consists of eight hexadecimal characters. All the rest of the 
information (PSW, general and floating-point registers, and storage 
keys) is printed in hexadecimal. If you have the ECMODE option in 
your VM/370 directory entry, the control registers are also 
printed. To print the dump on the real printer, a CLOSE command 
must be issued for the spooled virtual printer. 

5. Normally, you should define beginning and ending dump locations in 
the following manner: 

dump Lhexloc1-hexloc2 

dump Lhexlocl .bytecount 

dump Lhexloc1-hexloc2 hexloci. bytecount * dumpid 

If, however, a blank follows the type character (L or T) or the 
character and the hexloc, the default dump starting and ending 
locations are assumed to be the beginning and/or end of virtual 
storage. Blanks are used to separate operands or sets of operands 
if more than one operand is entered on the same command line. 
Blanks must not be used to the right or left of range or length 

490 VM/370: System Logic and Problem Determination Guide 



delimiters ( : or — or .) » unless it is intended to take the 
default value of the missing operand defined by the blank. Thus, 
all of the following produce full storage dumps: 



dump 


1 


dump 


t: 




dump 


0-end 


dump 


t 


dump 


1. 




dump 


l:end 


dump 


— 


dump 


t. 




dump 


t : end 


dump 


• 


dump 


0- 




dump 


0:end 


dump 


. 


dump 


0: 




dump 


Lend 


dump 


1- 


dump 


0. 




dump 


t.end 


dump 


t- 


dump 


1- 


end 


dump 


O.end 


dump 


1: 


dump 


t- 


end 







The following produces three full dumps: 

dump 1 . t 
dump - . : 

When running with a discontiguous saved segment (DCSS) , you can 
dump storage locations outside the range of your virtual machine 
size if they are within the DCSS. If there exist locations between 
the upper limit of your virtual machine and the address at which 
the DCSS was saved, an attempt to dump those locations (or 
associated keys) will result in a "non-addressable storage" message 
appearing in the printer output. 



Responses 

As the dump progresses, the following message is displayed at the 
terminal; indicating that the dump is continuing from the next 64k 
boundary: 

DUMPING LOG hexloc 

where hexloc is the segment (6UK) boundary address for the dump 
continuation, such as 020000, 030000, or 040000. 

If you press the Attention key, or its equivalent, on the terminal 
while the message is being displayed, the dump function is 
terminated. 

COMMAND COMPLETE 

is the response indicating normal completion of the dump function. 
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SET 



Ptilile^e Class: G 



Use the SET command to control various functions within your virtual 
system. The format of the SET command is: 



SET 



TON ) 
I OFF/ 



ACNT 

MSG 

WNG 

IMSG 

RUN 

LINEDit 

ECmode 

ISAM 

NOTRans 

PAGEX 

EMSG 



TIMER 



r T r T 

Assist I I ON I I SVC I 

I I INOSVCI 

L J L J 

OFF 



r 1 

PFnn lIMMed | [ pf data1#pfdata2# 

I J51If aye d I 

L J 

PFnn [TAB n1 n2 ... ] 
PFnn COPY [ resid ] 
PFnn COPY [cuu] 




pfdatan " 



where 



ACNT /ON ) 
toFF/ 



MSG ( ON 1 
\0] 



IFF/ 



controls whether accounting information is displayed at 
the terminal or not (ON and OFF, respectively) when the 
operator issues the CP ACNT command. When you log on 
VM/370, ACNT is set on. 

controls whether messages sent by the MSG command from 
other users are to be received at the terminal. If ON is 
specified, the messages are displayed. If OFF is 
specified, no messages are received. In addition to 
controlling messages generated by the MSG command, 
spooling messages generated by users sending punch. 
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printer or reader files to another virtual machine are 
also suppressed if OFF is specified. When you log on 
VM/370, MSG is set on. 

HNG Ton \ controls whether warning messages are displayed at the 

(off/ terminal. If ON is specified, all warning messages sent 
via the CP WARNING command from the system operator are 
received at the terminal. If OFF is specified, no 
warning messages are received. When you log on VM/370, 
HNG is set on. 



rON ) 
I OFF/ 



IMSG (ON ) controls whether certain informational responses issued 
by the CP CHANGE, DEFINE, DETACH, ORDER, PURGE, and 
TRANSFER commands are displayed at the terminal or not. 
The descriptions of these CP commands tell which 
responses are affected. If ON is specified the 
informational responses are displayed. If OFF is 
specified, they are not. The SET IMSG ON or OFF command 
line has no effect on the handling of error messages set 
by the SET EMSG command. When you log on VM/370, IMSG is 
set on. 



RON jON ) controls whether the virtual machine stops when the 
I OFF/ Attention key is pressed. ON allows you to activate the 
Attention key (causing a read of a CP command) without 
stopping your virtual machine. When the CP command is 
entered, it is immediately executed and the virtual 
machine resumes execution. OFF places the virtual 
machine in the normal CP environment, so that when the 
Attention key is pressed, the virtual machine stops. 
When you log on VM/370, RUN is set off. 



rON ^ 
\ OFF j 



LINEDIT (ON \ controls the line editing functions. ON specifies that 

the line editing functions and the symbols of the VM/370 

system are to be used to edit virtual CPU console input 

reguests. This establishes line editing features in 

systems that do not normally provide them. OFF specifies 

that no character or line editing is to be used for the 

virtual machine operating system. When you log on 
VM/370, LINEDIT is set on. 



I ON ^ 
)^OFF I 



ECMODE (ON \ controls whether the virtual machine operating 
system may use System/370 extended control mode and 
control registers 1 through 15. Control register zero may 
be used with ECMODE either ON or OFF. When you log on 
VM/370, ECMODE is set according to the user's directory 
option; ON if ECMODE was specified and OFF if not. 

Note: Execution of the SET ECMODE {ON|OFF) command always 
causes a virtual system reset. 

ISAM rON ) controls whether additional checking is performed 

I OFF / on virtual I/O reguests to DASD in order to support the 

OS Indexed Sequential Access Method (ISAM) . When you log 

on VM/370, ISAM is set according to the user's directory 

options; ON if ISAM was specified and OFF if not. 
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NOTRANS 



TON I 
\OFFi 



controls CCH translation for CP. NOTRANS can be 
specified only by a virtual machine that occupies the 
virtual =real space. It causes all virtual I/O from the 
issuing virtual machine to bypass the CP CCW translation 
except under the following conditions: 

SIO tracing active 
1st CCW not in the V=R region 
I/O operation is a sense command 
I/O device is a dial-up terminal 
I/O is for a non-dedicated device 
Pending device status 

Any of the above conditions will force CCW translation. 

To be in effect in the virtual=real environment, SET 
NOTRANS ON must be issued after the virtual=real machine 
is loaded via the IPL command. (IPL sets the NOTRANS 
option to an OFF condition.) 



PAGEX TON \ controls the pseudo page fault port 
I OFF) VM/VS Handshaking feature. PAGEX ON or OFF 
issued for an 0S/VS1 virtual machine that 
Handshaking feature active. It can only be 
a virtual machine that has the extended 
(ECMODE) option. PAGEX ON sets on the pse 
portion of handshaking; PAGEX OFF sets it 
log on to VM/370, PAGEX is set OFF. Also, 
IPL VS1 in your virtual machine PAGEX is se 
want to use the pseudo page fault handli 
handshaking you must issue SET PAGEX ON 
VS1. 



ion of the 

should only be 

has the VM/VS 

specified for 

control mode 

udo page fault 

off. When you 

each time you 

t off. If you 

ng portion of 

after you IPL 



EMSG 




controls error message handling. ON specifies that both 
the error code and text are displayed at the terminal. 
TEXT specifies that only text is displayed. CODE 
specifies that only the error code is to be displayed. 
OFF specifies that no error message is to be displayed. 
When you log on VM/370, EMSG is set to TEXT. 

If the console is being spooled, the OFF setting is 
ignored for the spooled output and the full error message 
appears in the spooled output. The other three settings 
result in spooled output that matches the console 
printout. 

Note: CMS recognizes EMSG settings for all error (E) , 
information (I) , and warning (W) messages, but ignores 
the EMSG setting and displays the complete message (error 
code and text) for all response (R) , severe error (S) , 
and terminal (T) messages. 



TIMER 



ON ^ 


control 


OFF ( 


virtual 


realC 


is runn 


J 


to be u 




to be u 




virtual 




in your 




you log 



s the virtual timer. ON s 

timer is to be updated only 
ing. OFF specifies that the v 
pdated. REAL specifies that 
pdated during virtual CPU run 
wait time. If the REALTIMER 
VM/370 directory entry, TIMER 
on; otherwise it is set to ON 



pecifies that the 

when the virtual CPU 

irtual timer is not 

the virtual timer is 

time and also during 

option is specified 

is set to REAL when 

when you log on. 
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r T r T 

ASSIST \ ION I I SVC I 

I I INOSVCI 

L J L J 



OFF 



controls the availability of the virtual machine assist 
feature for your virtual machine. The assist feature is 
available to your virtual machine when you log on if (1) 
the real CPU has the feature installed and (2) the system 
operator has not turned the feature off. The SVC handling 
portion of the assist feature is invoked when you log on 
unless your VM/370 directory entry has the SVCOFF option. 
Issue the QUERY SET command line to see if the assist 
feature is activated and whether the assist feature or 
VM/370 is handling SVC interruptions. All SVC 76 
requests are passed to CP for handling, regardless of the 
SVC and NOSVC operands. If you issue the SET ASSIST 
command line and specify SVC or NOSVC while the virtual 
machine assist feature is turned off, the appropriate 
bits are set. Later, if the feature is turned on again, 
the operand you specified while it was off becomes 
effective. ON sets the assist feature on for the virtual 
machine; OFF turns it off. SVC specifies that the assist 
feature handles all SVC interruptions except SVC 76 for 
the virtual machine; NOSVC means VM/370 handles all the 
SVC interruptions. See the VM/370: S^jstem Proc[rammer^s 
Guide for information on how to use the assist feature. 



r T 

PFnn IIMMED | [ pf data1#pf data2#. . .pf datan ] 
I DELAYED | 

L J 

defines a program function for a program function key on 
a 3277 Display Station and indicates when that function 
is to be executed. See the VM/370: Terminal User^s Guide 
for a description of how to use the 3277 program function 
keys. 

nn is a number from 1 (or 01) to 12 that corresponds to 

a key on a 3277. The program function is a 
programming capability you create by defining a 
series of VM/370 commands or data you want executed. 
This series of commands executes when you press the 
appropriate program function key. 

IMMED specifes that the program function is executed 

immediately after you press the program function 
key. 

DELAYED specifies that execution of the program function is 

delayed for a display terminal. When the program 
function is entered, it is displayed in the input 
area and not executed until you press the Enter key. 
DELAYED is the default value for display terminals. 

pfdatal #pfdata2#. . .pf datan 

defines the VM/370 command or data lines that 
constitute the program function. If more than one 
command line is to be entered, the pound sign (#) 
must separate the lines. If you use the pound sign 
(#) to separate commands that you want executed with 
the designated PF key, you must precede the command 
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line with #CP, turn line editing off^ or precede 
each pound sign with the logical escape character 
(") . For further explanation, see the "Usage Notes" 
section that follows. If no comiand lines are 
entered, PFnn is a null command. Program functions 
cannot be embedded within one another. 

PFnn TAB n1 n2 ... 

specifies a program function number to be associated with 
tab settings on a terminal. The number of the PF key, nn 
can be a value from 1 (or 01) to 12. For examples of how 
this feature is used, see the VM/370: CMS UserJ^s Guide. 

TAB is a keyword identifying the tab function. The tab 

settings (n1 n2 ...) may be entered in any order. 

PFnn COPY [resid] 

specifies that the program function key, numbered nn, 
performs a COPY function for a remote 3270 terminal, nn 
must be a value from 1 (or 01) to 12. The COPY function 
produces a printed output of the entire screen display at 
the time the PF key is actuated. The output is printed on 
an IBM 3284, 3286 or 3288 printer connected to the same 
control unit as your display terminal. 

resid may be specified if more than one printer is 

connected to the same control unit as your display 
terminal. It is a three-character hexadecimal 
resource identification number assigned to a 
specific printer. If resid is entered, the printed 
copy is directed to a specific printer x if not, the 
copy is printed on the printer with the lowest resid 
number. The resid numbers of the printers available 
to your display terminal can be obtained from your 
system operator. If only one printer is available, 
as with the 3275 Display Station, resid need not be 
specified . 

PFnn COPY [cuu] 

specifies that the program function key, numbered nn, 

performs a COPY function for a local 3270 terminal. nn 

must be a value from 1 (or 01) to 12. When the PF key is 

actuated, the COPY function produces a printed output of 
the entire local screen display except for the status 
field which is replaced with blanks. 

cuu is the real hardware address of the 3284, 3286, or 

3288 printer, and may specify a printer that is on a 
different control unit than the one to which your 
3270 is attached. If you do not specify cuu, the 
printer with the lowest cuu that is available on the 
same control unit as your 3270 will be selected. 

Note: For both remote and local COPY functions: 

You will receive a NOT ACCEPTED message, displayed in the screen 
status field of your 3270, if any of the the following situations 
occur: 

• The printer is already busy, or all printers are busy. 

• The printer is turned off. 

• The printer is out of paper or is in any other intervention 
required condition. 
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• The designated device is not a 328X type printer. 

• The SET PFnn COPY command is invalid. 

You may include your own identification on the printed output by 
entering the data into the user input area of the screen before you 
press the PF key. The identification appears on the last two lines 
of the printed copy. 



Usage Notes 

1. Both SET PFnn TAB and SET PFnn COPY are immediate commands: their 
function is executed immediately upon pressing the appropriate 
program function key. If you insert the keyword DELAYED after the 
PFnn operand, the command will be accepted, however, the program 
function will still be executed immediately. 

2. If you use the SET PFnn command to set up a series of concatenated 
commands, you should be aware of the following situation: 

If you enter one of the following commands while in CMS mode: 

SET PF02 IMMED Q RDR#Q PRTtQ PON 
— or — 

CP SET PF02 IMMED Q RDR#Q PRT#Q PUN 
and then press the Enter key: 

1. The Enter key causes immediate execution, 

2. Only the Q PRT and Q PUN commands execute, and 

3. Q PRT and Q PUN are stripped from the PF02 key 
assignment leaving Q RDR, which was not executed. 

The following examples demonstrate two methods for avoiding the 
problem. 



Example X 

Enter one of the following commands while in CMS mode: 
#CP SET PF02 IMMED Q HDR#Q PRT#Q PUN 

— or — 

CP SET PF02 IMMED Q RDR"#Q PRT"#Q PUN 

— or -- 

SET PF02 IMMED Q RDR"#Q PHT"#Q PUN 

Now press the Enter key. 

CP assigns the three QUERY commands as functions of the PF02 key. 
Pressing the PF02 key executes the three QUERY commands. 
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Example 2 

Enter the following command while in CMS mode: 

SET LINEDIT OFF 
and press the Enter key. 
Then enter: 

SET PF02 IMMED Q RDR#Q PRT#Q PUN 
— or — 

CP SET PF02 IMBED Q RDR#Q PRT#Q PUN 
and press the Enter key. 

CP assigns the three QUERY commands as functions of the PF02 key 

Then enter: 

SET LINEDIT ON 
and press the Enter key. 

Pressing the PF02 key executes the three QUERY commands. 

Res£onses 



Hone 
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STORE 



Privilege Class: G 



Use the STORE command to alter the contents of specified registers and 
locations of the virtual machine. The contents of the following can be 
altered : 

• Virtual storage locations (1st level virtual storage only; see Usage 
Notes) 

• General registers 

• Floating-point registers 

• Control registers (if available) 

• Program status word 

The STORE command can also save virtual machine data in low storage. 
The format of the STORE command is: 



STore 



hexloc 
Lhexloc 

Shexloc 

/Greg I 
|xreg/ 

{Yreg} 

Psw 

STATUS 



hexwordi [ hexword2. . . ] 
hexdata . . . 

hexwordi [ hexword2 . . . ] 
hexdwordi [ hexdword2 . . . ] 
[hexwordi] hexword2 



where: 

hexloc 

Lhexloc hexwordi [ hexword2 . . . ] 

stores the specified data (hexwordi [ hexword2. . . ]) in 
successive fullword locations starting at the address 
specified by hexloc. The smallest group of hexadecimal values 
that can be stored using this form is one fullword. Either 
form (hexloc or Lhexloc) can be used. 

If hexloc is not on a fullword boundary, it is rounded down to 
the next lower fullword. 

hexwordi [ hexword2 . . . ] 

each represents up to sixteen hexadecimal digits, if the 
value being stored is less than a fullword (eight 
hexadecimal digits) , it is right— ad justed in the word and 
the high order bytes of the word are filled with zeros. 
If two or more hexwords are specified, they must be 
separated by one or more blanks. 

Shexloc hexdata... 

stores the data specified (hexdata...) in the address 
specified by hexloc, without word alignment. The shortest 
string that can be stored is one byte (two hexadecimal 
digits) . If the string contains an odd number of characters, 
the last character is not stored, an error message is sent, 
and the function is terminated. 
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hexdata. . . 

is a string of two or more hexadecimal digits with no 
embedded blanks. 

Greg hexwordi [hexword2. . . ] 

stores the hexadecimal data (hexwordi [ hexword2. . . ]) in 
successive general registers starting at the register 
specified by reg. The reg operand must be either a decimal 
number from 0-15 or a hexadecimal digit from 0-F. 

hexwordi [ hexword2. . . ] 

each represents up to eight hexadecimal digits. If the 
value being stored is less than a fullword (eight 
hexadecimal digits) , it is right-adjusted in the word and 
the high order bytes of the word are filled with zeros. 
If two or more hexwords are specified, they must be 
separated by one or more blanks. 

Xreg hexwordi [hexword2. . . ] 

stores the hexadecimal data (hexwordi [ hexword2. . . ]) in 
successive control registers starting at the register 
specified by reg. The reg operand must either be a decimal 
number from 0-15 or a hexadecimal digit from 0-F. If the 
virtual machine is in basic control mode, you can store data 
in register only. 

hexwordi [ hexword2. . . ] 

each represents up to eight hexadecimal digits. If the 
value being stored is less than a fullword (eight 
hexadecimal digits) , it is right-adjusted in the word and 
the high order bytes of the word are filled with zeros. 
If two or more hexwords are specified, they must be 
separated by one or more blanks. 

Yreg hexdwordi [ hexdword2. . . ] 

stores the hexadecimal data (hexdwordi [ hexdword2. . . ]) in 
successive floating-point registers starting at the register 
specified by reg. The reg operand must be a digit from 0-7. 
If reg is an odd number, it is adjusted to the preceding even 
number. 

hexdwordi [hexdword2. . . ] 

each represents up to sixteen hexadecimal digits. If the 
value being stored is less than a doubleword (sixteen 
hexadecimal digits) , it is left justified in the 
doubleword and low order positions are filled with zeros. 
If two more more hexdwords are specified, they must be 
separated by one or more blanks. 

PSH [hexwordi] hexword2 

stores the hexadecimal data in the first and second words of 
the virtual machine's program status word (PSW) . If only 
hexword2 is specified, it is stored into the second word of 
the PSW. 

[hexwordi] hexword2 

each represents up to eight hexadecimal digits. These 
operands must be separated by one or more blanks. If the 
value being stored is less than a fullword (eight 
hexadecimal digits) , it is right-adjusted in the word and 
the high order bytes of the word are filled with zeros. 

STATUS stores selected virtual machine data in certain low storage 
locations of the virtual machine, simulating the hardware 
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store status facility. These locations are permanently 
assigned locations in real storage. To use the STATUS 
operand, your virtual machine must be in the extended control 
mode. The STATUS operand should not be issued for CMS virtual 
machines or for DOS virtual machines generated for a CPU 
smaller than a System/360 Model 40. The STATUS operand stores 
the following data in low storage: 

Decimal Hexadecimal Length 

AMress Ad^i^^ss ifi_SY.tes Data 

216 D8 ~ 8 CPU Timer 

224 EO 8 Clock Comparator 

256 100 8 Current PSW 

352 160 32 Floating-point registers 0-6 

384 180 64 General registers 0-15 

448 ICO 64 Control registers 0-15 



Lls^a® Notes 

1 . Only first level storage (storage that is real to the virtual 
machine) can be stored into. operating systems such as DOS/VS and 
OS/VS have virtual storage of their own. This second level virtual 
storage cannot be stored into directly. The user or the virtual 
operating system is responsible for converting any second level 
storage locations to first level storage locations. 

2. The operands may be combined in any order desired, separated by one 
or more blanks, for up to one full line of input. If an invalid 
operand is encountered, an error message is issued and the store 
function is terminated. However, all valid operands entered, 
before the invalid one, are processed properly. 

3. If you combine the operands for storing into storage, registers, 
the PSW, or the status area on a single command line, all operands 
must be specified; default values do not apply in this case. 

4. If the STORE command is used by your virtual machine to alter the 
contents of a shared segment, your virtual machine will be placed 
in non-shared mode with your own copy of the shared segment. A 
fresh copy of the shared segment is then loaded for use by the 
other users. 

5. With the STORE command, data is stored either in units of one word 
with fullword boundary alignment or in units of one byte without 
alignment. 

6. The STORE STATUS command stores data in the extended logout area. 
The STORE STATUS command stores CPU Timer and Clock Comparator 
values that may then be displayed at the terminal via the DISPLAY 
command. The procedure is the only way to get timer information at 
the terminal. 



Response 

STORE COMPLETE 

is the response at the successful completion of the command. 
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SYSTEM 



£li3?ii§a6 Class: G 



Use the SYSTEB command to simulate the action of the RESET and RESTART 
buttons on the real computer console, and to clear storage. The format 
of the SYSTEM command is: 



I SYStem I (CLEAR 
I I {RESET 

I I ( RESTART 



where: 

CLEAR clears virtual storage and virtual storage keys to binary 
zeros. 

RESET clears all pending interruptions and conditions in the virtual 
machine. 

RESTART simulates the hardware system RESTART function by storing the 
current PSW at virtual location eight and loading, as the new 
PSH, the doubleword from virtual location zero. Interrupt 
conditions and storage remain unaffected. 

1. The RESET function and the CLEAR function leave the virtual machine 
in a stopped state. 

2. After issuing the SYSTEM command with RESET or CLEAR specified, 
either STORE a PSW and issue BEGIN or issue BEGIN with a 
hexadecimal storage location specified, to resume operation. The 
virtual machine automatically restarts at the location specified in 
the new PSW (which is loaded from the doubleword at location zero) 
after the SYSTEM RESTART command is processed. 



Responses 

STORAGE CLEARED - SYSTEM RESET 

is the response given if the command SYSTEM CLEAR is entered. 

SYSTEM RESET 

is the response given if the command SYSTEM RESET is entered. 

If the command SYSTEM RESTART is entered, no response is given; the 
virtual machine resumes execution at the address in the virtual PSW 
loaded from virtual storage location zero. 



502 



VM/370: System Logic and Problem Determination Guide 



TRACE 



££i5Liie3§. Class: G 



Use the TRACE command to trace specified virtual machine activity and to 
record the results at the terminal, on a virtual spooled printer, or on 
both terminal and printer. The format of the TRACE command is: 



I 

TSace 



SVC 

I/O 

PEOgram 

EXTernal 

PRIV 

SIO 

CCH 

BRanch 

INSTruct 

ALL 

CSW 

END 



i I PRINter 

I r T r T 

I ITERMinall lIORunI 

I I BOTH I IRON I 

I L J L J 



OFf 



*More than one of these activities may be traced by using a single 
TRACE command. For example: 

TRACE SVC PROGRAM SIO PRINTER 



where: 

SVC 

I/O 

PROGRAM 

EXTERNAL 

PRIV 

SIO 

CCW 

BRANCH 
INSTRUCT 
ALL 
CSW 



traces virtual machine SVC interruptions. 

traces virtual machine I/O interruptions. 

traces virtual machine program interruptions. 

traces virtual machine external interruptions. 

traces all virtual machine non-I/0 privileged instructions. 

traces TIO, CLRIO, HIO, HDV, and TCH instructions to all 
virtual devices. Also traces SIO and SIOF instructions for 
nonconsole and nonspool devices only. 

traces virtual and real CCWs for nonspool nonconsole device 
I/O operations. When CCW tracing is requested, SIO and TIO 
instructions to all devices are also traced. 

traces virtual machine interruptions, PSW instructions, and 
successful branches. 

traces all instructions, virtual machine interruptions, and 
successful branches. 

traces all instructions, interruptions, succesful branches, 
privilege instructions, and virtual machine I/O operations. 

provides contents of virtual and real channel status words at 
I/O interruption. 
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END terminates all tracing activity and prints a termination 
message. 

PRINTER directs tracing output to a virtual spooled printer. 

TERMINAL directs tracing output to the terminal (virtual machine 
console) . 

BOTH directs tracing output to both a virtual spooled printer and 
the terminal. 

OFF halts tracing of the specified activities on both the printer 
and terminal. 

:5055^ stops program execution after the trace output to the terminal 
and enters the CP command environment. 

Note: If a Diagnose code X'008' is being traced, NORUN has no 
effect and program execution does not stop. 

RON continues the program execution after the trace output to the 
terminal has completed and does not enter the CP command 
environment. 



M§age Notes 

1. If your virtual machine has the virtual=real option and NOTRANS set 
on, CP forces CCH translation while tracing either SIO or CCW. When 
tracing is terminated with the TRACE END command, CCH translation 
is bypassed again. 

2. If the virtual machine assist feature is enabled on your virtual 
machine, CP turns it off while tracing SVC, PRIV, BRANCH, INSTRUCT, 
or ALL activities. After the tracing is terminated with the TRACE 
END command line, CP turns the assist feature on again. 

3. If trace output is being recorded at the terminal, the virtual 
machine stops execution and CP command mode is entered after each 
output message. This simulates the instruction step function. 

However, all processing associated with the event being traced will 
be completed and, therefore, execution may have stopped after an 
instruction has executed and the PSH has been updated. 

For example, a privileged instruction traced with the PRIV operand 
will stop after the privileged instruction executes, whereas the 
same instruction traced with the ALL operand will stop before the 
instruction executes. 

To determine whether the traced instruction has executed, display 
the virtual machine PSW. 

To resume operation of the virtual machine, the BEGIN command must 
be entered. If the RON operand is specified, the virtual machine is 
not stopped after each output message. 

4. If trace output is being recorded .on a virtual spooled printer, a 
CLOSE command must be issued to that printer in order for the trace 
output to be printed on the real printer. 

5. Successful branches to the next sequential instruction and 
branch-to-self instructions are not detected by TRACE. 

SOU VM/370: System Logic and Problem Determination Guide 



6. Instructions that modify or examine the first two bytes of the next 
sequential instruction cause erroneous processing for BRANCH and 
INSTRUCT tracing. 

7. When tracing on a virtual machine with only one printer, the trace 
data is intermixed with other data sent to the virtual printer. To 
separate trace information from other data, define another printer 
with a lower virtual address than the previously defined printer. 
For example, on a system with OOE defined as the only printer, 
define a second printer as OOB. The regular output goes to OOE and 
the trace output goes to OOB. 

8. If the BRANCH, INSTRUCT, or ALL activities are being traced by a 
virtual machine using a shared system, the virtual machine is 
placed in nonshared mode with its own copy of the shared segment. 
A fresh copy of the shared segment is then loaded for use by the 
other users. 

9. I/O operations for virtual channel-to-channel adapters, with both 
ends connected to the same virtual machine, cannot be traced. 

10. Use the TRACE command to trace specified virtual machine activity 
and to record the results at the terminal, at a virtual printer, or 
at both. This command is useful in debugging programs because it 
allows you to trace only the information that pertains to a 
particular problem. 

11. If your virtual machine is doing I/O that results in program 
controlled interruptions (PCIs) , and you are tracing I/O or CSW 
activity, some of the PCIs may not be traced. This situation 
arises when the system is extending its free storage area and the 
additional demand on available free storage would cause a system 
abend. 



Responses 



The following symbols are used in the responses received from TRACE: 

Symbol MeasiliJS 

www virtual storage address 

tttttt virtual transfer address or new PSH address 

rrrrrr real storage address 

xxxxxxxx virtual instruction, channel command word, CSW status 

yyyyyyyy real instruction, CCW 

ss argument byte (SSM-byte) for SSM instruction 

ns new system mask after execution of STOSM/STNSM 

zz low order byte of Rl register in an execute instruction 

(not shown if Rl register is register 0) 

zzzzzzzz referenced data 

type virtual device name (DASD, TAPE, LINE, CONS, RDR, 

PRT, PUN, GRAF, DEV) 

V vadd virtual device address 

R radd real device address 

mnem mnemonic for instruction 

int interruption type (SVC, PROG, EXT, I/O) 

code interruption code number (in hexadecimal) 

CC n condition-code number (0, 1, 2, or 3) 

IDAL Indirect data address list 

*♦* virtual machine interrupt 

::: privileged operations 

==> transfer of control 
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TRACE STARTED 

This response is issued when tracing is initiated. 

TRACE ENDED 

This response is issued when tracing is suspended. 

TCH, TIO, CLRIO, HIO, HDV, SIO, or SI OF 

TCH 

I/O vvvvvv TCH xxxxxxxx type vadd CC n 

TIO, CLRIO, HIO, or HDV 

I/O vvvvvv mnem xxxxxxxx type vadd CC n type radd CSH xxxx 

Sig or SIOF 

I/O vvvvvv mnem xxxxxxxx type vadd CC n type radd CSW xxxx CAW vvvvvvvv 

CCW: 

ccw vvvvvv xxxxxxxx xxxxxxxx rrrrrr yyyyyyyy yyyyyyyy 
ecu IDAL vvvvvvvv vvvvvvvv IDAL OOrrrrrr OOrrrrrr 
ccH SEEK xxxxxxxx xxxxxx SEEK yyyyyyyy yyyy 

The IDAL or SEEK line is included only if applicable. The virtual IDAL 
is not printed if the real CCW operation code does not match the real 
CCH. 



INSTRUCTION TRACING: 



lEiliiea®^ Isstruction : 



vvvvvv 


SSM 


xxxxxxxx 


ss 




vvvvvv 


SSM 


xxxxxxxx 


ss 


tttttt 


vvvvvv 


STOSM 


xxxxxxxx 


ns 




vvvvvv 


STOSM 


xxxxxxxx 


ns 


tttttt 


vvvvvv 


STMSM 


xxxxxxxx 


ns 




vvvvvv 


STNSM 


xxxxxxxx 


ns 


tttttt 


vvvvvv 


LPSH 


xxxxxxxx 




tttttttt 


vvvvvv 


LPSW 


xxxxxxxx 


==> 


tttttttt 


vvvvvv 


mnem 


xxxxxxxx 







(normal SSH) 

(switch to/from translate mode) 

(normal STOSM) 

(switch to translate mode) 

(normal STNSM) 

(switch from translate mode) 
tttttttt (WAIT bit on) 
tttttttt (WAIT bit not on) 
(all others) 



Executed Instructions: 

vvvvvv EX xxxxxxxx zz vvvvvv mnem xxxx xxxxxxxx 

For an executed instruction, where zz (see preceding explanation of 
symbols) is nonzero, the mnemonic for the executed instruction is given 
as if the zz byte had been put into the instruction with an OR 
operation. 

All Other Instructions: 

vvvvvv mnem xxxxxxxx xxxx 
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SUCCESSFUL BRANCH: 

vvvvvv mneiB xxxxxxxx ==> tttttt 

INTERBUPTION (SVC, PROGRAM, or EXTERNAL) 
♦♦* vvvvvv int code ==> tttttt 

IZO INTERRUPTION (First line given only if "CSH" was specified) 

csw V vadd xxxxxxxx xxxxxxxx R radd yyyyyyyy yyyyyyyy 
♦** vvvvvv I/O vadd ==> tttttt CSM xxxx 

^M^^li TRACE: (ALL option selected) 
Entry for 'branch from* instruction 
vvvvvv mnain xxxxxxxx tttttt 
Entry for 'branch to' instruction 
==> vvvvvv mnem xxxxxxxxxxxx 



Section H. Diagnostic Aids 507 



CP COMMANDS FOR SYSTEM PROGRAMMERS AND SYSTEM ANALYSTS 

CP real machine debugging is reserved for Class C users (system 
programmers) and Class E users (system analysts). CP has facilities to 
examine data in real storage (via the DCP and DMCP commands) and to 
store data into real storage (via the STCP command) . There is no 
facility to examine or alter real machine registers, PSW, or storage 
words. 

Remember, real storage is changing even as you issue the CP commands 
to examine and alter it. 

System programmers and analysts may also want to use the CP internal 
trace table. This table records events that occur on the real machine. 
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DCP 



REili2:^3§ Classes: C and E 



Dse the DCP command to display the contents of real storage locations at 
the terminal. 

If an invalid operand is entered, the DCP command terminates. 
However, any previous valid operands are processed before termination 
occurs. The format of the DCP command is: 



DCP 



iLhexlocI M |-H hexloc2 | 
: /I END I 



IThexlodl |\ 
hexloci I I 



I I 
-"I 

I 

l{ 

I 

L 



r T 

} Ibytecount | 
I END I 

L J 



w her e : 

Lhexloci 
Thexloci 
hexloci 




specifies the first storage location to be displayed. If 
hexloci is the only operand, it specifies the only storage 
location to be displayed. If hexloci is not specified, L 
or T must be specified and the display begins with storage 
location 0. If hexloci is specified and L or T is not 
specified, the display is in hexadecimal. T specifies 
that an EBCDIC translation is to be included with the 
hexadecimal display. L specifies that the display is to 
be in hexadecimal only. If hexloci is followed by a 
period and is not on a full word boundary, it is rounded 
down to the next lower fullword. 



{=} 



r T 

I hexloc2| 
I I^D I 



specifies that a range of locations is to be displayed. 
To display the contents of one or more storage 
locations by specified storage address location the "-" 
or ":" must be used. The hexloc2 operand must be 1- to 
6-hexadecimal digits; leading zeroes need not be 
specified. In addition. The hexloc2 operand must be 
egual to hexloci and it should not exceed the size of 
real storage. If END is specified, real storage from 
hexloci through the end of real storage is displayed. If 
hexloc2 is not specified, END is the default. Note that 
this occurs only if "-" or ":" follows the first 
operand. 



{ . }| bytecount i is a hexadecimal integer designating the number of 
I l^D I bytes of real storage (starting with the byte at 
«- J hexloci) to be displayed on the terminal. The sum of 
hexloci and the bytecount must be an address that does 
not exceed the size of real storage. If this address is 
not on a fullword boundary, it is rounded up to the next 
higher fullword. The bytecount operand must be a value 
of 1 or greater and may not exceed six hexadecimal 
digits. 
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Usage : 



Mormally, a user will or should define the beginning and ending 
locations of storage In the following manner: 

dcp Lhexlocl-hexloc2 

dcp Thexloc1-hexloc2 

dcp hexloci :hexloc2 

dcp hexloci .bytecount 

dcp hexloci :hexloc2 hexloci. bytecount 

Note that no blanks can be entered between the Unit or range symbols 
(: or - r .) or any of the operands except for the blank or blanks 
between the command name and the first operand. A blank Is also 
required between each set of operands when more than one set of operands 
are entered on one command line. 

However, if a blank immediately follows the designated type character 
(T or L) , DCP displays all of real storage. If the next operand is 
either a colon (:) , a hyphen (-) , or a period (.) followed by a blank 
character, the system again defaults to a display of all storage 
locations as this operand assumes a second set of operands. 

Mote: Blanks separate operands or sets of operands if more than one 
operand is entered on the same command line. Blanks should not occur on 
the right or left of range or length symbols, unless it is intended to 
take the default value of the missing operand defined by the blank. 



The following are 
displays. 



examples of DCp entries that produce full storage 



dcp 1 




dcp 1- 






dcp 0- 


dcp t:end 


dcp t 




dcp 1: 






dcp 0: 


dcp t:end 


dcp - 




dcp t : 






dcp 1-end 


dcp 0:end 


dcp : 




dcp 1. 






dcp t-end 


dcp Lend 


dcp . 




dcp t. 






dcp 0-end 


dcp O.end 


The foil 


owing 


displays 


all 


of 


storage three 


times because of 


embedded bl 


anks: 













the 



dcp 1 



Response 

Requested locations are displayed in the following format: 

xxxxxx = wordi word2 word3 word4 [key] *EBCDIC translation* 

where xxxxxx is the real storage location of wordi. "wordi" is 
displayed (word aligned) for a single hexadecimal specification. 
Up to four words are displayed on a line. If required, multiple 
lines are displayed. The EBCDIC translation is displayed aligned 
to the next lower 16-byte boundary if Thexloc is specified. 
Nonprintable characters display as a ".". If the location is at a 
2K page boundary, the key for that page is also displayed. The 
output can be stopped and the command terminated by pressing the 
ATTN key (or its equivalent) . 
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DMCP 



PEiSlii§3§. Classes: C and E 



Use the DMCP command to print the contents of real storage locations on 
the user's virtual spooled printer. The output format is eight words 
per line with EBCDIC translation. Multiple storage locations and ranges 
may be specified. To get the output printed on the real printer, the 
virtual spooled printer must be terminated with a CLOSE command. The 
format of the DMCP command is: 



DMCP 






ILhexlocI I 

IThexlocI I 

I hexlocl I 

I I 

L J 



- ) I hexloc2 I 
I 



(-\\ hex 
I : / 1 END 



r 1 

{ . }|bytecount| 

I END I 

L J J 



[*dumpid] 



where: 



Lhexloci 
Thexloci 
hexlocl 




specifies the first storage location to be dumped. If 
hexlocl is the only operand, it specifies the only 
storage location to be dumped. If hexlocl is not 
specified, L or T must be specified and dumping starts 
with storage location 0. An EBCDIC translation is 
included with the dump contents. If hexlocl is followed 
by a period and is not on a fullword boundary, it is 
rounded down to the next lower fullword. 



\:\ I END 



r T 

|hexloc2| is a range of real storage locations to be dumped. 
I To dump to the end of real storage, hexloc2 may be 
J specified as END or not specified at all, in which case 
END is assumed by default. 



r 1 

{ . }| bytecount | 
I END I 

L J 



♦dumpid 



is a hexadecimal integer designating the number of 
bytes of real storage (starting with the byte 
at hexlocl) to be typed at the printer. The sum of 
hexlocl and the bytecount must be an address that does 
not exceed the size of real storage. If this address is 
not on a fullword boundary, it is rounded up to the next 
higher fullword. If the "." is used for a range, hexloc2 
is defined as the number of hexadecimal storage locations 
(in bytes) to be dumped starting at hexlocl. If hexloc2 
is specified as a length in this way, it must have a 
value such that when added to hexlod it will not exceed 
the storage size. 

is specified for identification purposes. If specified, 
it becomes the first line printed preceding the dump 
data. Up to 100 characters with or without blanks may be 
specified after the asterisk prefix. If dumpid is 
specified, hexloc2 or bytecount must be specified. The 
asterisk (*) is required to identify the dumpid. 
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Usa^e: 

normally, a user would define beginning and ending dump locations in the 
following manner: 

dmcp Lhexloc-hexloc 

— or — 

dmcp hexloc.bytecount 

Note that there are no blanks between length or range symbols (: or - 
or .) or between any of the operands except for the blank (s) between 
the command and the first operand. A blank is also required between 
each set of operands when more than one set of operands are entered. 
Note, only one period (.) , colon (:) , dash (-) or no delimiter may be 
used within each set of operands. 

If, however, a blank immediately follows the designated type 
character, the default dump starting and ending locations are assumed to 
be the beginning and/or end of virtual storage. Similarly, if the range 
or length symbol separates the first character from a blank or END, all 
of real storage is dumped. 

Note: Blanks separate operands or sets of operands if more than one 
operand is entered on the same command line. Blanks should net occur on 
the right or left of the range or length symbol, unless it is intended 
to take the default value of the missing operand defined by the blank. 
Thus, all of the following produce full storage dumps. 

dmcp 1 dmcp 1- dmcp t. dmcp t-end 

dmcp t dmcp t- dmcp 0- dmcp 0:end 

dmcp - dmcp 1: dmcp 0: dmcp Lend 

dmcp : dmcp t: dmcp 0. dmcp Lend 

dmcp . dmcp 1. dmcp 1-end dmcp O.end 

Each of the following produces three full dumps because of the 
embedded blanks: 

dmcp 1 . t 
dmcp - : . 

Note: In cases where multiple storage ranges or limits are specified on 
one command line and the line contains errors, command execution 
successfully processes all correct operands to the encountered error. 
The encountered error and the remainder of the command line is rejected 
and an appropriate error message is displayed. 

ResEonses 

As the dump proceeds, the following message appears at the terminal 
indicating that the dump is continuing from the next 64K boundary: 

DUMPING LOG hexloc 

where "hexloc" is the segment (64K) address for the dump continuation, 
such as 020000, 030000, 040000. 

If the user signals attention on the terminal whii® ^h© above message 
is displayed, the dump ends. 

COHMAND COMPLETE 

indicates normal completion of the dump. 
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LOCATE 



l£iZ,ii§3e classes: C and E 



Use the LOCATE command to find the addresses of CP control blocks 

associated with a particular user, a user's virtual device, or a real 

system device. The control blocks and their use are described in the 

VM/370: Data Areas and Control Block Logic . The format of the LOCATE 
coininand is: 



I Locate 



I" 

(r 



serid [vaddr] 
raddr 



where: 
userid 

vaddr 
raddr 



is the user identification of the logged on user. The address 
of this user's virtual machine block (VmbloK) is printed. 

causes the virtual channel block (VCHBLOK) , virtual control 
unit block (VCUBLOK) , and virtual device block (VDEVBLOK) 
addresses associated with this virtual device address to be 
printed with the VMBLOK address. 

causes the real channel block (RCHBLOK) , real control unit 
block (RCUBLOK) , and the real device block (RDEVBLOK) 
addresses associated with this real device address to be 
printed. 



Responses 

I;OCATE userid 
VMBLOK = xxxxxx 

LOCATE userid vaddr 



VMBLOK 
XXXXXX 



VCHBLOK 
XXXXXX 



VCUBLOK 
XXXXXX 



VDEVBLOK 
XXXXXX 



LOCATE raddr 



RCHBLOK 

XXXXXX 



RCUBLOK 

XXXXXX 



RDEVBLOK 

XXXXXX 
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MOHITQR 

£E.iZ.ii§a6 Classes: A or E 

Use the MONITOR comnand to initiate or terminate the recording of events 
that occur in the real machine. This recording is always active after a 
VM/370 IPL (manual or automatic) . The events that are recorded in the 
CP internal trace table are: 

External interruptions 

SVC interruptions 

Program interruptions 

Machine check interruptions 

I/O interruptions 

Free storage reguests 

Release of free storage 

Entry into scheduler 

Queue drop 

Run user reguests 

Start I/O 

Unstack I/O interruptions 

Storing a virtual CSW 

Test I/O 

Halt device 

Unstack lOBLOK or TRQBLOK 

NCP BTU (Network Control program Basic Transmission Unit) 

Use the trace table to determine the events that preceded a CP system 
failure. The format of the MONITOR command for tracing events in the 
real machine is: 



I MONxtor I f STArt CPTRACE 1 I 

I I \STOP CPTRACE j I 



where : 

START CPTRACE 

starts the tracing of events that occur on the real machine. 
The events are recorded on the CP internal trace table in 
chronological order. When the end of the table is reached, 
recording continues at the beginning of the table, overlaying 
data previously recorded. 

STOP CPTRACE 

terminates the internal trace table event tracing. Event 
recording ceases but the pages of storage containing the CP 
internal trace table are not released. Tracing can be 
restarted at any time by issuing the MONITOR START CPTRACE 
command. 

R es£onse : 
COMMAND COMPLETE 

The MONITOR command was processed successfully. 
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QUERY 

Pfivileje Classes: A, B, C, D, E, andF 

Use the QUERY command to request system status and machine configuration 
information. (For 3704 or 3705 Communication Controllers and remote 
3270 resources see the Class A and B NETWORK command.) Not all operands 
are available in every privilege class. 

Operands available to the specified privilege classes are given below. 
The format of the Class A and E QUERY command is: 

I Query | ( PAGing ) I 

I I < ERIORity userid J. I 

I I (sA.Ssist ( I 

L i . I 

where : 

PAGING displays the current system paging activity. 

PRIORITY userid displays the current priority of the specified 

userid. This is established in the VM/370 directory 

but can be overridden by the SET PRIORITY nn 
command. 

SASSIST displays the current status of the Virtual Machine 

Assist feature for the VM/370 system. 



5§s£onses to the Class A and J Quer^ Commands 

QUERY PAGING 

PAGING nn, SET mm, RATE nnn/SEC INTERVAL=xx: xx:xx 

where : 

nn specifies the percentage of time the system was in 
page wait during this time interval. 

mm is the system paging activity index (threshold 
value). This value affects the paging rate and degree 
of multiprogramming that VM/370 tries to attain. The 
value mm is normally 16. 

nnn/SEC is the current CP paging rate in pages per second. 

xx:xx:xx is the time interval between the issuance of QUERY 
PAGING commands. 
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QMM PRIORITY userid 



userid PRIORITY = nn 



nn is the the assigned priority of the specified user, 
lower the value, the higher the priority. 



The 



j20ERy SASSIST 

S&SSIST /ON \ 
toFFj 



ON or OFF is indicates that the Virtual Machine Assist feature 
is enabled or disabled from the system. 



The format of the Class B QUERY command is: 



Query 



DAsd 

TApes 

LINESI 

UR 

GRaf 

ALL 



r T 

I AC live I 
lOFFline | 
IFREe i 
lATTach I 
I ALL I 

L J 



DAsd volid 

TDsk 

STORage 

raddr 

SYStem raddr 

DUMP 



iQuery LINES is not effective for 3704/3705 resources unless the 
3704/3705 is operating in 2701, 2702, 2703 Emulation Program (EP) 
mode. For 3704/3705 Communications Controllers operating in Network 
Control Program (NCP) or Partitioned Emulator Program (PEP) mode use 
the NETWORK QUERY command. 



w her e : 

DASD displays the real addresses of disk or drum devices. 

TAPES displays the real addresses of magnetic tape units. 

LINES displays the real addresses of communication lines. 

UR displays the real addresses of unit record devices (card 

reader, card punches, printers) . 

GRAF displays the locally attached display devices. 

ALL (used as a first operand) displays all devices and the 

size of real storage. 

DASD volid displays the active or free status of the specified DASD 
volume. 
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TDSK 



displays all the currently allocated temporary disk space 
(TDSK) from all available system owned volumes assigned 
to virtual machine users. 



STORAGE 



displays the size of real storage. 



raddr 



displays the status of the device 
address. 



at the specified 



SYSTEM raddr 



DUMP 



ACTIVE 



OFFLINE 



FREE 



ATTACH 



displays the userid , virtual address, and access mode of 
virtual disks which reside on the specified channel and 
control unit address raddr belonging to logged on users. 

displays at the operator's terminal the type of device 
and device address of the unit designated to receive 
abnormal termination dumps. 

displays the status of only the active devices within the 
group specified. This is the default. Active devices do 
not include devices that are "free" or "offline". An 
active device is one that is in use by a user or the 
system. 

displays only the devices in an "offline" status within 
the group specified. An offline device is one that is 
not available for access by any user or the system. 

displays all the devices that are not currently in use by 
the system or a user on the system. Free devices do not 
include "offline" devices. A free device is one that is 
not in use by a user or the system. 

displays all the devices that are dedicated to any user 
on the system. An attached device is also an active 
device. 



ALL 



(as the second operand) displays the status of all 
devices within the group specified. The status is typed 
in the order of "active", "free" and "offline" and is 
eguivalent to the response from entering 

QUERY type ACTIVE 
QUERY type FREE 
QUERY type OFFLINE 



Bes£onses to the Class B fiUERY Cominand 



20II hltk 



Produces the same results as if the following commands were issued: 

QUERY STORAGE 

QUERY UR 

QUERY LINES 

QUERY DASD 

QUERY TAPES 

QUERY GRAF 
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QUERY DASD 

DiSD raddr ATTACH TO userid vaddr 

is displayed if the real device specified by raddr is attached 
to a user's (userid) virtual aachine at virtual address vaddr. 

DASD raddr CP SYSTEM volid nnn 

is displayed if the real device designated by raddr is allocated 
to the system for use as user's minidisks, nnn is the number of 
active user's minidisks on the physical disk and volid is the 
volume serial number of the real disk. 

DASD raddr CP OWNED volid nnn 

is displayed if the real device designated by raddr is used by 
the system for paging and spooling activity. nnn is the number 
of active user's minidisks (if any) on the physical disk and 
volid is the volume serial number of the real disk. 



QUmY TAPES 

TAPE raddr CP SYSTEM 

is displayed if the real tape device designated by raddr is 
attached to CP for its exclusive use. 

TAPE raddr ATTACH TO userid vaddr 

is displayed if the real tape device designated by raddr is 
attached to a user's (userid) virtual machine at virtual address 
vaddr. 



QUERY UR 

jPRT)^ / STARTED )^ /SEP \ 

\PUN / raddr \ DRAINED ] SYSTEM CLASS = a. . . ( NOSEP / 

/ STARTED ) 
RDR raddr 1 DRAINED/ SYSTEM 

is displayed for each unit record device assigned to the system 
for spooling activity. 

where : 

raddr is the real device address (cuu) . 

DRAINED indicates that the device is not currently available 
for processing. A START command must be issued to 
activate the device. 
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STARTED indicates that the device is available for spooling 
activity. 

a... specifies the classes serviced by the output device. 
Up to four classes aay be serviced by an output 
device. No blanks or commas are allowed between 
classes. 

NOSEP indicates the device was started with the NOSEP 
option. 

SEP indicates the device was started without the NOSEP 
option. 

Note: The separator (SEP) option applies to printer 
output where the edge of the fanfolded continuous 
forms are heavily printed. This indicates to the 
spooling operator the beginning and end of adjacent 
spool files. 

PRT ) 

PUN \ raddr ATTACH TO userid vaddr 

RDR j 

is displayed if the device is attached to a user's virtual 
machine at vaddr. 

If the unit record device is currently active with a spool file, the 
following additional response is also given: 



( PRT ) ( PRINTING) 
\ PUN j raddr \ PUN 



CHING/ userid FILE = file RECDS = norecs COPY = nn a typ 

RDR raddr READING userid FILE = file 

whe re : 

userid is the name of the spool file owner. 

file is the spool file spoolid number. 

norecs is the total file logical record count. 

nn is the number of copies remaining for output, where 01 
indicates the last copy. 

a is the spool file class. 

typ is the originating device type (PRT, PUN, CON) . 

QUERY LINES 
LINE ) raddr LOGON AS userid 



r LINE )^ 
\ CONS I 



indicates that the user represented by userid is currently 
logged on at the terminal located at the address raddr. 
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LINE raddr ATTACH TO userid vaddr 

indicates that the coawunication line at raddr is attached to 
the virtual machine represented by userid at virtual address 
vaddr. 



QUEEY GRAF 

GRAF raddr LOGON AS userid 

indicates that the user represented by userid is currently 
logged on at the terainal located at real address raddr. 

GRAF raddr ATTACH TO userid vaddr 

indicates that the display device at real address raddr is 
attached to the virtual machine represented by userid at the 
virtual address vaddr. 



QMM iiee OFFLINE 

This command produces a response for each offline device in the 
following format: 

type raddr OFFLINE 

Multiple responses are displayed in the following format: 

type raddr OFFLINE, ... 



Note: In the above responses the term type refers to one or more of the 
following device types: 

Tjfie Meaning 

DASD Direct access device 

TAPE Magnetic tape units 

LINE Communication line 

RDR Card reader 

PRT Line printer 

PUN Card punch 

GRAF Graphics device 

CONS Console 

CTCA Channel to channel adapter 

CTLR 3704/3705 communications controller 

DEV Any other device 



QUERY tiEe FREE 

This command produces a response for each device that is not active or 
offline in the following format: 

type raddr FREE 
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For unit record devices the response is: 

type raddr DRAINED 

Note: This response implies that no spool files are queued for this 
device. 

For communication devices the response is: 

/ENABLED \ 
type raddr (DISABLED j 

For DASD devices with mounted volumes the response is: 

type raddr /FREE ^ 
I volid| 

Multiple responses are displayed in the following format: 
type raddr FREE, ... 



QUERY DASD volid 

The command response is given in either the "active" or "free" format 
depending upon the device status. 



QUERY TDSK 

This command displays all the currently allocated user TDSK space from 
all available system-owned volumes. One entry of the following format 
is produced for each TDSK: 

userid vaddr nnn 

where : 

userid is the virtual machine identification. 

vaddr is the user's virtual device address. 

nnn is the number of cylinders allocated. 

Note: If the operator does a QUERY to any real device or group of 
devices (such as QUERY DASD) the following message occurs for all 
devices in a not-ready status and the CPU alarm rung: 

type raddr INT REQ 
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QMM STORAGE 



STORAGE = XXXXXK 



displays the size of real storage (xxxxx) in multiples of 1024 
bytes. 



fiUERY raddr 

The response to this command depends upon the type of device located at 
raddr. 

See the QUERY DASD, TAPES, UR, GRAF, and LINES responses. 



^UERY SYSTEM raddr 

This command requests the number of user minidisks residing on the 
physical disk located at raddr. The response for each minidisk is given 
in the following format: 

userid vaddr mode, ... 



where: 

userid is the identification of the user who owns the minidisk. 

vaddr is the virtual address by which the user refers to the 
minidisk. 

mode is the type of access the user has: either R/0 or R/H, or 
nnn for the number of cylinders of TDSK space allocated. 



QU JII PUMP 

type raddr DUMP UNIT ( C^ \ 

\ ALL I 

indicates that the device of device type "type" located at raddr 
is the system dump unit. 
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The format of the Class D QUERY command is: 



Query 



r T 

Files [Class c] |userid| 

I * I 

L J 

Reader rr i i 
Printer | | ALL | [userid]| 
punch I jCLass a| 1 

I*- -• I 

I spoolid I 

L J 

Hold 



where : 
FILES 

CLASS C 
userid 



READER 
RDR 

PRINTER 
PRT 

PUNCH 
PCH 



HOLD 



ALL 



displays the number of spooled input and output files. The 
Class D user receives the total count in the system. Files 
that are currently being processed are not included in the 
totals. 

displays only the spool files of the specified class. If 
CLASS is omitted then all spool classes are examined. 

displays only the spool files owned by the specified userid. 
If userid is omitted then spool files owned by all users are 
examined. 

displays only the spool files of the logon user who issued the 
QUERY command. 

displays basic information concerning reader spool files, 
displays basic information concerning printer spool files, 
displays basic information concerning punch spool files. 

Note: The basic information displayed is: 

• Userid of the owner of the spool file. If examining files 
for a specific user (userid option) , the userid indicates 
the originator of the spool file. 

• Spool file spoolid number 

• Class and originating device type 

• Number of logical records in the file 

• Number of copies specified for the file 

• File hold status 

displays a list of users whose output is being held by the 
HOLD command. 

displays additional information for all spool files examined. 
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spoolid displays additional information for the specified spool file. 
The spool identification (spoolid) is a VM/370 generated 
sequential number assigned to each spool file. 

The additional information displayed is: 

• Date and time the file was created 

• Filename and filetype of the file (if any) 

• Distribution code of the file 



Responses to the Class D QUERY Command 



fiOERY FILES [ CLass c] [userid] 



FILES 



: /NO 1^ RDR,j NO 1 PRT, / NO ^ 
|nnn/ \ nnn j | nnn j 



PUN 



displays the total number of spool files in the system, of a 
particular class, or for a particular userid. 



READER 
iQUJKY { PRINTER 
PUNCH 



r T 

I ALL I 

I Class a I [userid] 

L J 



spoolid 
—Basic Information- 



r n 

OHNERIDi FILE CLASS RECDS CPY HOLD |DATE TIME NAME TYPE DIST | 

userid file a typ norecs nn stat | mm/dd hh: mm: ss name type code | 

L J 



Only one file is listed for a QUERY READER, QUERY PRINTER, or 
QUERY PUNCH command if the spoolid operand is specified. 

The DATE, TIME, NAME, TYPE, and DIST information is displayed 
only when the following commands are issued: 

QUERY (READER ) f ALL ) 
<J PRINTER } (spoolid / 
( PUNCH 



where : 
userid 
file 



is the identification of the user who owns the file. 

is a unique, system assigned number which is used by 
VM/370 to identify the file. 

is the spool file class. 



lOMNERID heading the title li'ne for the spool file data is altered to 
ORIGINID when the userid operand is used. In that event, ORIGINID 
represents the originator of the file. 
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typ is the originating device type (PRT, PUN, CON, or 
BDR) . 

norecs is the number of logical records contained in the 
file. 

nn is the number of copies specified for the file. (Has 
no effect for reader files.) 

Stat is the file hold status and is either 

NONE - no hold 
USER - user hold 

mm/dd is the date the file was created in month/day. 

hh:mm:ss is the actual time of the creation of the file in 
hours: minutes: seconds. 

filename is the filename assigned to the file (if any) . If the 
file has a 24-character data set name (dsname) , only 
20 characters are displayed. These characters extend 
from the "name" field through the "type" field. 

f iletype is the f iletype assigned to the file (if any) . 

distcode is the distribution code of the file. 



QUERY HOLD 

HOLD : /NO IRDR, (NO ) PRT, j NO ) PUN 



,D : I NO I RDR, (NO I PSTr I ^'^ I 
\ nnn / ( nnn / ( nnn j 



ALL\ 
userid -) RDR ( , ... 
PRT / 
PUN) 



The first response displays the total number of files within the 
system which are retained in the SYSTEM HOLD status. The second 
response indicates the type of hold (if any) for any user in the 
system for which HOLD is in effect. The user who issues QUERY 
HOLD may receive, depending upon the status of his spooled 
files, the first response, the second response, or both 
responses. 
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The format of the Class A, B, C, D, E, F, and G QUERY connand is: 



I Query | { LOGmsg \ I 

I I ) Names ' I 

i I J Users [userid] 

I I ( userid 

I 



where: 

LOGHSG displays the log messages of the day. 

HAMES displays a list of all the users logged on and the real 

address of the line to which each is connected. If the user 

is disconnected, DSC is displayed instead of the line 
address. 

USERS displays the number of logged on users and the number of users 
dialed to other virtual machines. if userid is specified, the 
userid and device address of the user's terminal are displayed 
if he is logged on. If the specified user is not logged on, a 
message to that effect occurs, use the USERS operand if the 
userid is the same as an operand (or its minimum truncation) 
of the QUERY command. 

Note: It is possible for the number of users logged on as 
indicated by the 'NAMES' operand to differ from the number 
logged on as indicated by the 'USERS' operand. The number of 
users in the process of logging on and logging off accounts 
for this difference. 

userid displays the userid and the device address of the user's 
terminal if he is logged on. If the user is not legged on, a 
message to this effect occurs. 



le§£OI}ses to the A, B, C, D, E, F, and G fiUERY Command 
fiUERY LOGMSG 

* logmsg text line 1 

* logmsg text line n 

logmsg additional text lines 



All lines (both those with and without an asterisk) in the log 
message file are displayed. 
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(QUERY NAMES 
userid - 



userid 



(DSC U ... 
\ raddr j 

I DSC ), ... 

(raddr j 



Lists all logged on users. If the user is currently connected, 
the real address to which he is connected is displayed (raddr) . 
If he is not connected to the system, DSC is displayed. 



QUERY USERS 

nnn USERS, mmm DIALED 

nnn is the total number of logged on users. 

mmm is the total number of users logically attached via the 
DIAL command to virtual machines. 

Mote: The term DIALED means that the line is not available to CP because 
it is logically attached to a logged-on user and is a part of that 
user's virtual machine operation. 



userid - raddr 

displays the real address (raddr) to which the specified user is 
connected. 
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STCP 

££4z.i:l§^§ Class: C 

Use the STCP comaand to alter the contents of real storage. The real 
PSW or real registers cannot be altered with this command. The format 
of the STCP command is: 



I STCP I / ( hexloc) hexwordi [hexword2. . . ] ) I 

I I ) (Lhexloc/ 



Shexloc hexdata ; I 



w her e : 

hexloc stores the data given in hexwordi [ hexword2. . . ] in successive 
Lhexloc fullword locations starting at the address specified by 
hexloc. The smallest group of hexadecimal values that can be 
stored using this specification is one fullword. Data is 
aligned to the nearest fullword boundary. If the data being 
stored is less than a fullword (8-hexadecimal digits) , it is 
right-adjusted in the word and the high order bytes of the 
word are filled with zeros. Either specification (hexloc or 
Lhexloc) may be used. 

Shexloc stores the data given in hexdata in the address specified by 
hexloc without word alignment. The shortest string that can 
be stored is one byte (2-hexadecimal digits) . If the string 
contains an odd number of characters, the last character is 
not stored. An error message occurs and the function ends. 

hexword specifies up to 8-hexadecimal digits. If less than eight 
digits are specified, the string is right justified in a 
fullword and left-filled with zeros. If two or more hexwords 
are specified, they must be separated by at least one blank. 

hexdata specifies a string of two or more hexadecimal digits with no 
embedded blanks. 



Res£onse 



STORE COMPLETE 
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DASp DUMP RESTORE (DDR) SERVICE PROGRAM AND HOH TO USE IT 

Use the DASD Dump Restore (DDR) program to dump, restore, copy, or print 
VM/370 user minidisks. The DDR program may run as a standalone program, 
or under CMS via the DDR command. 

The DDR program has five functions: 

1. Dumps part or all of the data from a DASD device to tape. 

2. Transfers data from tapes created by the DDR dump function to a 
direct access device. The direct access device must be the same as 
that which originally contained the data. 

3. Copies data from one device to another of the same type. Data may 
be reordered, by cylinder, when copied from disk to disk. In order 
to copy one tape to another, the original tape must have been 
created by the DDR DUMP function. 

4. Prints selected parts of DASD and tape records in hexadecimal and 
EBCDIC on the virtual printer. 

5. Displays selected parts of DASD and tape records in hexadecimal and 
EBCDIC on the terminal. 

TO generate the VM/370 starter system from the distribution tape, the 
standalone RESTORE function must be used. 



INVOKING DDR UNDER CMS 



The format of the DDR command is 



I I r 1 I 

I DDR I [fn ft |fm| ] I 

111*1 I 

I I •- -• I 
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where : 

r T 

fn ft |£ia| is the identification of the file containing the control 

I* I statenents for the DDR program. If no file 

•- J identification is provided, the DDE program attempts to 

obtain control statements from the console. The filemode 

defaults to * if a value is not provided. 

Note: If you use the CMS DDE command, CHS ignores the SYSPRINT control 
statement and directs the output to the CMS printer OOE. 

INVOKING DDR AS A STANDALONE PROGRAM 

To use DDR as a standalone program, the operator should IPL it from a 
real or virtual IPL device as he would any other standalone program. 
Then indicate where the DDR program is to obtain its control statements 
by responding to prompting messages at the console. 

Note: Be aware that DDR when run as a standalone program does not have 
error recovery support. However, when DDR is invoked in CMS, in a 
virtual machine environment, the I/O operation is performed by CP (CP 
has built-in error recovery facilities) . 



DDR CONTROL STATEMENTS 

DDR control statements describe the intended processing and the needed 
I/O devices. I/O definition statements must be specified first. 

All control statements may be entered from either the console or the 
card reader. Only columns 1 to 71 are inspected by the program. All 
data after the last operand in a statement is ignored. An output tape 
must have the DASD cylinder header records in ascending sequences; 
therefore, the extents must be entered in sequence by cylinder. Only 
one type of function — dump, restore, or copy — may be performed in 
one execution, but up to 20 statements describing cylinder extents may 
be entered. The function statements are delimited by an INPUT or OUTPUT 
statement, or by a null line if the console is used for input. If 
additional functions are to be performed, the sequence of control cards 
must be repeated. If you do not use INPUT or OUTPUT control statements 
to separate the functions you specify when the input is read from a card 
reader or CMS file, an error message (DMKDDR702E) is displayed. 
However, the remainder of the input stream will be checked for proper 
syntax, but no further DDR operations will be performed. Only those 
statements needed to redefine the I/O devices are necessary for 
subsequent steps. All other I/O definitions remain the same. 

To return to CMS, enter a null line (carriage return) in response to 
the prompting message (ENTER:) . To return directly to CP, key in #CP. 

The PRINT and TYPE statements work differently from other DDR control 
statements in that they operate on only one data extent at a time. If 
the input is from a tape created by the dump function, it must be 
positioned at the header record for each step. The PRINT and TYPE 
statements have an implied output of either the console (TYPE) or system 
printer (PRINT) . Therefore, PRINT and TYPE statements need not be 
delimited by an INPUT or OUTPUT statement. 
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I/O DEFINITION STATEMENTS 



The I/O definition statements describe the tape, DASD, and printer 
devices used while executing the DASD Dump Restore program. 



INPUT/OUTPUT Control Statemeut 



An INPUT or OUTPUT statement describes each tape and DASD unit used, 
The format of the INPUT/OUTPUT statement is: 



INput 
OUTput 



r T 

cuu type |volser| [(options...)] 
laltape | 



O£tions: 

r 1 r 

ISKip nn I IMOde 

|SKi£ I IMOde 

L J I MOde 

L 



T r 1 

6250 I |REHind| 

1600 I iMloadl 

800 I ILEave | 

J L J 






where : 

INPUT 

OUTPUT 

cuu 

type 



volser 



altape 



indicates that the device described is an input device. 

indicates that the device described is an output device. 

is the unit address of the device. 

is the device type (2314, 2319, 3330, 3330-11, 3340-35, 
3340-70, 3350, 2305-1, 2305-2, 2400, 2420, or 3420) (no 
7-track support for any tape devices). Specify a 3410 device 
as a 3420, a 3340-70F as a 3340-70, and a 3333 as a 3330. 
Specify a 3350 that is in 3330-1 or 3330-11 compatibility mode 
as a 3330 or 3330-11. Specify a 3344 as a 3340-70, and 
specify 3350 for a 3350 operating in native mode (as opposed 
to compatibility mode) . 

Note: The DASD Dump Restore (DDR) program, executing in a 
virtual machine, uses I/O DIAGNOSE 20 to perform I/O 
operations on tape and DASD devices. DDR under CMS reguires 
that the device type entered agree with the device type of the 
real device as recognized by VM/370. If there is a conflict 
with device types, the following message is issued: 

DBKDDR708E INVALID OPTION 

However, if DDR executes standalone in a virtual machine, DDR 
uses DIAGNOSE 20 to perform the I/O operation if the device 
types agree. If the device types do not agree, error message 
DMKDDR708E is issued. 

is the volume serial number of a DASD device. If the keyword 
"SCRATCH" is specified instead of the volume serial number, no 
label verification is performed. 

is the address of an alternate tape drive. 
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J?2i§- If multiple reels of tape are required and "altape" is 
not specified, DDR types the following at the end of the reel: 

END OF VOLDME CYL XXX HD xxx, MOUNT NEXT TAPE 

After the new tape is mounted, DDR continues automatically. 

Options : 

SKIP nn forward spaces nn files on the tape. nn is any number 

up to 255. The SKIP option is reset to zero after the 
tape has been positioned. 

r T 

MODE 1 6250 1 causes all output tapes that are opened for the first 

1 16001 time and at the load point to be written or read in 
I 800 1 the specified density. All subsequent tapes mounted 
t- J are also set to the specified density. If no mode 

option is specified, then no mode set is performed and 
the density setting remains as it previously was. 

REWIND rewinds the tape at the end of a function. 

UNLOAD rewinds and unloads the tape at the end of a function. 

LEAVE leaves the tape positioned at the end of the file at 
the end of a function. 

Note: When the wrong input tape is mounted, the message DMKDDR709E 
is displayed and the tape will rewind and unload regardless of 
options REWIND, UNLOAD, or LEAVE being specified. 



SYS PRIM Control Statement 

Use the SYSPRINT control statement (in the standalone DDR virtual 
machine only) to describe the printer that is to print data extents 
specified by the PRINT statement. It also can print a map of the 
cylinder extents from the DUMP, RESTORE, or COPY statement. If the 
SYSPRINT statement is not provided, the printer assignment defaults to 
OOE. CMS ignores the SYSPRINT statement when you invoke DDR as a 
command under CMS, and CMS always directs the output to OOE. The format 
of the SYSPRINT control statement is: 



r- 

I SYsprint I cuu 
I 



whe r e : 

cuu specifies the unit address of the device. 

liSction Statements 

The function statements tell the DDR program what action to perform. 
The function commands also describe the extents to be dumped, copied, or 
restored. The format of the DUMP/COPY/RESTORE control statement is: 
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DUmp 
copy 
REstore 


r 
1 Icyll [ To] 

ICPvol 
1 lALL 

1 Nucleus 

L 


L 







[cyl2 [Reorder] [To] [cyl3]] | 

I 
I 



where: 

DUMP requests the program to move data from a direct access volume 
onto a magnetic tape or tapes. The data is moved cylinder by 
cylinder. Any number of cylinders may be moved. The format 
of the resulting tape is: 



Record J: a volume header 
describing the volumes. 



record, consisting of data 



COPY 



Record 2: a track header record, consisting of a list of count 
fields to restore the track, and the number of data records 
written on tape. After the last count field the record 
contains key and data records to fill the UK buffer. 

1§22E^ 3: track data records, consisting of key and data 
records packed into 4k blocks, with the last record 
truncated. 

Record U: either the end-of-volume (EOV) or end-of— job (EOJ) 
trailer label. The end-of-volume label contains the same 
information as the next volume header record, except that the 
ID field contains EOV. The end-of-job trailer label contains 
the same information as record 1 except that the cylinder 
number field contains the disk address of the last record on 
tape and the ID field contains EOJ. 

requests the program to copy data from one device to another 
device of the same or equivalent type. Data may be recorded 
on a cylinder basis from input device to output device. A 
tape-to-tape copy can be accomplished only with data dumped by 
this program. 

requests the program to return data that has been dumped by 
this program. Data can be restored only to a DASD volume of 
the same or equivalent device type from which it was dumped. 
It is possible to dump from a real disk and restore to a 
minidisk as long as the device types are the same. 

cyll [TO] [cyl2 [REORDER] [TO] [cyl3]] 

Only those cylinders specified are moved, starting with the 
first track of the first cylinder (cyll) , and ending with the 
last track of the second cylinder (cyl2) . The REORDER operand 
causes the output to be reordered, that is, moved to different 
cylinders, starting at the specified cylinder (cyl3) or at the 
starting cylinder (cyll) if "cylS" is not specified. The 
REORDER operand must not be specified unless specified limits 
are defined for the operation; the starting and, if required, 
ending cylinders (cyll and cyl2) must be specified. 



RESTORE 



CPVOL specifies that cylinder and all active directory and 
permanent disk space are to be copied, dumped, or restored. 
This indicates that both source and target disk must be in CP 
format, that is, the CP Format/Allocate program must have 
formatted them. 
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ALL specifies that the operation is to be performed on all 
cylinders. 

NUCLEUS specifies that record 2 on cylinder 0, track and the nucleus 
cylinders are dumped, copied, or restored. 

l§§iric tions : 

• Each track must contain a valid home address, containing the real 
cylinder and track location. 

• Record zero must not contain more than eight key and/or data 
characters. 

• Flagged tracks are treated just as any other track for all 231 U, 
2319, 3340, and 2305 devices. That is, no attempt is made to 
substitute the alternate track data when a defective primary track is 
read. In addition, tracks are not inspected to determine whether 
they were previously flagged when written. Therefore, volumes 
containing flagged tracks should be restored to the same cylinders of 
the volume from which they were dumped. The message DHKDDR715E occurs 
each time a defective track is dumped, copied or restored, and the 
operation continues. 

• Flagged tracks for 3330 and 3350 devices are handled automatically by 
the control unit and may never be detected by the program. The 
program may detect a flagged track if, for example, no alternate 
track is assigned to the defective primary track. If a flagged track 
is detected by the program, the message DIIIKDDB715E occurs and the 
operation terminates. 

Ex am£l e : 

INPUT 191 3330 SYSRES 

OUTPUT 180 2400 181 (MODE 800 

SYSPRINT OOF 

DUMP CPVOL 

INPUT 130 3330 MINI01 

DUMP 1 TO 50 REORDER 51 

60 70 101 

This example sets the density to 800 bpi, then dumps all pertinent 
data from the volume labeled SYSRES onto the tape that is mounted on 
unit 180. If the program runs out of space on the first tape, it 
continues dumping onto the alternate device (181). A map of the dumped 
cylinders is printed on unit OOF while the program is dumping. When the 
first function is complete, the volume labeled MINI0 1 is dumped onto a 
new tape. Its cylinder header records are labeled 51 to 100. A map of 
the dumped cylinders is printed on unit OOF. Next, cylinders 60 to 70 
are dumped and labeled 101 to 111. This extent is added to the cylinder 
map on unit OOF. When the DDR processing is complete, the tapes are 
unloaded and the program stops. 

If cylinder extents are being defined from the console, the following 
is displayed: 

ENTER CYLINDER EXTENTS 
ENTER: 
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For any extent after the first extent, the message 

ENTER NEXT EXTENT OR NULL LINE 
ENTER: 

is displayed. 

The user may then enter additional extents to be dumped, restored, or 
copied. A null line causes the job step to start. 

Note: When a cylinder map is printed on the virtual printer (OOF as in 
the previous example) a heading precedes the map information. Module 
DMKDDR controls the disk, time and zone printed in the heading. Your 
installation must apply a local modification to DMKDDR to insure that 
local time, rather than GMT (Greenwich Meridian Time) , is printed in the 
heading. 



EEIM-T^TYPE Function Statement 

Use the PRINT and TYPE function statement to print or type (display) a 
hexadecimal and EBCDIC translation of each record specified. The input 
device must be defined as direct access or tape. The output is directed 
to the system console for the TYPE function, or to the SYSPRINT device 
for the PRINT function. (This does not cause redefinition of the output 
unit definition.) The format of the PRINT/TYPE control statement is: 



I PRint I cyll [hhl [rrl]] [To cyl2 [ hh2 [rr2 ]]] [ (options. ..[)] ] | 

I TYpe ! I 

I I 2£iioiis: I 

I I [Hex] [Graphic] [Count] | 



t. 



w her e : 

cyll is the starting cylinder. 



hhl 



hh2 



is the starting track. If present, it must follow the cyll 
operand. The default is track zero. 

rrl is the starting record. If present, it oust follow the hhl 
operand. The default is home address and record zero. 

TO cyl2 is the ending cylinder. If more than one cylinder is to be 
printed or typed "TO cyl2" must be specified. 

is the ending track. If present, it must follow the cyl2 
operand. The default is the last track on the ending 
cylinder. 

rr2 is the record ID of the last record to print. The default is 
the last record on the ending track. 

Options : 

HEX prints or displays a hexadecimal representation of each 
record specified. 

GRAPHIC prints or displays an EBCDIC translation of each record 
specified. 
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COUNT prints or displays only the count field for each record 
specified. 



Examples: 
PRINT TO 3 

Prints all of the records from cylinders 0, ^, 2, and 3. 
PRINT 1 3 

Prints only one record, from cylinder 0, track 1, record 3. 

PRINT 1 10 3 TO 1 15 4 

prints all records starting with cylinder 1, track 10, record 3, and 
ending with cylinder 1, track 15, record U. 

The example in Figure 63 shows the information displayed at the 
console (TYPE function) or system printer (PRINT function) by the DDR 
program. The listing is annotated to describe some of the data fields. 

Responses 

DMKDDR725R ORIGINAL INPUT DEVICE WAS (IS) LARGER THAN OUTPUT DEVICE. 
DO YOU WISH TO CONTINUE? RESPOND YES OR NO: 

S3££l§Ii§;tion : 

RESTORE function - The number of cylinders on the original 
DASD input unit is compared with the number of cylinders on 
the output device. 

COPY function - The input device contains more cylinders 
than the output device. 

OE§Eator Action: The operator must determine if the COPY or 
RESTORE function is to continue. The response is either 
yes or no. 

DMKDDR711R VOLID READ IS volid2 [NOT volid 1 ] 

DO YOU WISH TO CONTINUE? RESPOND YES NO OR REREAD;: 

Exfii^nation: 

volidi - The volume serial number from the input or output 
control statement; volidi is displayed only if it 
was entered. 

volid2 - is the volume serial number from the V0L1 label on 
the DASD device specified by the control 
statement. 

System Action: The system waits for a response. 

If you respond "yes", the operation will continue. 

If you respond "no", and the input is from cards or a CMS 
file, the program is terminated after scanning the 
remaining statements for syntax. Otherwise, the next 
statement is solicited from the console. 
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If you respond "reread", the volume specified will be read 
again. 

Note: A new volume may have been mounted in the interim. 

User Action: Respond "yes", "no", or "reread." 

DMKDDR7 16R NO VOL 1 LABEL FOUND FOR volser 

DO YOU WISH TO CONTINUE? RESPOND YES NO OR REREAD: 

i2[Elanation : The program was unable to find a record with 
the key of VOLl on cylinder track and was not able to 
read record 3 on cylinder track for the specified 
volume serial number (volid) . The volume serial number is 
displayed only if specified in the INPUT or OUTPUT control 
statement. 

Sistem Action: The system waits for a response. 

If you respond "yes", the system will continue with the job 

steps. 

If you respond "no" and the input is from cards or a CMS 
file, the program will be terminated after scanning the 
remaining statements for syntax. Otherwise, the next 
statement will be solicited from the console. 

If you respond "reread", the program will attempt to reread 
the specified device. 

User Action: Respond to the message as indicated. 

DMKDDR717R DATA DUMPED FROM volidi TO BE RESTORED to volid2 

DO YOU WISH TO CONTINUE? RESPOND YES NO OR REREAD: 

Exfilanation : 

volidi - The volume serial number of the input tape. 

volid2 -- The volume serial number of the output DASD 
device that is to receive the data from volidi. 

System Action: The system waits for a response. 

If you respond "yes", the restore function will continue. 

If you respond "no" and the input is from cards or a CMS 
file, the program will be terminated after scanning the 
remaining statement for syntax. Otherwise, the correct 
statement will be solicited from the console. 

If you respond "reread", the input tape will be backspaced 
to the start of the file, and the volume header label will 
be reread. 

User Action: If the wrong input tape is mounted, replace 
the tape and respond REREAD. Otherwise, respond in the 
appropriate manner. 

ENTER CYLINDER EXTENTS 
ENTER: 

This message is received only if you are entering input from your 
terminal. 
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END OF VOLUME CYL XXX HD XX, MOUNT NEXT TAPE 

DDR continues processing, after the mounting of the next tape 
reel . 

RESTORING volser 

whera: 

volser is the volume serial number of the disk dumped. The 
RESTORE operation has begun. 

COPYING volser 

where: 

volsar is the volume serial number described by the input unit. 
The COPY operation has begun. 

DUMPING volser 

where: 

volsar is the volume serial number described by the input unit. 
The dumping operation has begun. 

PRINTING volser 

whera : 

volser is the volume serial number described by the input unit. 
The PRINT opration has begun. 

END OF DUMP 

The DUMP operation has ended. 
END OF RESTORE 

The RESTORE operation has ended. 
END OF COPY 

The COPY operation has ended. 
END OF PRINT 

The PRINT operation has ended. 
END OF JOB 

All specified operations have completed. 

ENTER: 

Prompts input from the terminal. A null line (Press the Enter key 
or equivalent) causes control to return to CMS, if the virtual 
machine is in the CMS environment. 
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Homo AddiC! 
Record 



1st lUilfof- 
Rocord : 



Homo Addios 
Record 

:nd Hair of • 
Record : 



CYL 019 HD 00 I HOME ADDRESS 0000130000 IRECORD ZERO 0013000000 



CMindoi .indhojd 
iilonlilicalion loi 
Record 



Home Addioss of (rack 
III liexadecinuil lorinal 



RecoulOlDlrom iIk 
coiiiil held 




CYL 019 HD 00 REC 001 ICOUNT 0013000001 



Cyliiidei, liejd, and 


Rocoid ID 


Key 


Da la 


locoid iiiimbeis in 


(hoxddecimal) 


ton 


Longlli 


decimal 




(hoxac 


ecimal) 



04096 1000 DATA LENGTH ■ 




If llic data Icnglh field is not zero I 

A headiii); is primed conlaining llie I 

dala Icnglh from llie connl field firsl in I 
decimal, then in hexadecimal . 

The data is Ihen prinled in hexadecimal 
wilh graphic inlcrpreialion to the right 
(not shown here). - 1 



00000 0000 00000000 00000000 00000000 00000000 00000000 00000000 00000000 00000000 
SUPPRESSED CHARACTERS SAME AS A80VE . . . 



Nitic: Dala Length field repeated 
in heading. 



- CYL 019 HD 00 REC 002 COUNT 013000002 gp|09A8| 

02472 [09A8l DATA LENGTH 

00000 0000 00000000 00000000 00000000 00000000 00000000 00000000 00000000 00000000 
SUPPRESSED CHARACTERS SAME AS ABOVE . . . 



ABOVE RECORD WRITTEN USING RECORD OVERFLOW 



r©" 



This slulement indicates that this portion 
of Record 1 was written using the Write 
Special Count, Key. and Data command. The 
remainder of Record 2 is fonnd on the next 
track as the first record after Record 0. 



. CYL 019 HD 01 HOME ADDRESS 0000130001 RECORD ZERO 0013000100 00 0008 00000000 00000000 

-CYL 019 HD 01 REC 002 COUNT 0013000102 00 0658-* 

01624 0658 DATA LENGTH 

00000 0000 00000000 00000000 00000000 00000000 00000000 00000000 00000000 00000000 
SUPPRESSED CHARACTERS SAME AS ABOVE . . . 



• CYL 019 HD 01 REC 003 COUNT 0013000103 80 0F80 
00128 0080 KEY LENGTH-^ " 




If the key length field is not zero 

A heading is printed conlaining the key length 
first in decitrial. Ihen in hexadecimal. 
• The key is then printed in hexadecimal with 

graphic interpretation to the right (not shown hero). 



00000 0000 00000000 00000000 00000000 00000000 00000000 00000000 00000000 00000000 
SUPPRESSED CHARACTERS SAME AS ABOVE . . . 

03968 0F80 DATA LENGTH 

00000 0000 00000000 00000000 00000000 00000000 00000000 00000000 00000000 00000000 
SUPPRESSED CHARACTERS SAME AS ABOVE . . . 



CYL 019 HD 01 REC 004 COUNT 0013000104 00 0000 
END OF FILE RECORD. 



Whenever the dala length field is zero I 

an end-of-file prints next. I 



Figure 63. Annotated Sample of Output from the TYPE and PRINT Functions 
of the DDR Program 



Section 4. Diagnostic Aids 539 



CP WAIT STATE CODES 

A wait state is produced by one of the following modules: 

DMKCCH DMKMCH 

DMKCKP DMKPAG 

DMKCPI DMKSAV 

DMKDMP DMKWRM 

When a wait state occurs, the Program Status Word (PSW) is displayed at 
the operator's console in the following format: 

xxyyyyyyzzzzzwww 

where: 

xxyyyyyy is the left half of the program status word. This half may be 
either : 

Oiyyyyyy valid wait condition. The system is waiting for 
work. 

OOyyyyyy system wait caused by an error condition. 

zzzzzwww is the right half of the program status word. The wait state 

code is found in the right half of the PSW when the CPU is in 

the wait state. The wait state code, www, indicates the error 
condition. 

Wait 

Code lX£lanation 

001 The machine check handler found an unrecoverable failure. 
Probable hardware error. 

002 The channel check handler found an unrecoverable failure. 
Probable hardware error. 

003 A system failure occurred before a valid warm start was 
performed. 

004 This wait state code is loaded by DMKDMP when a console, or an 
output device is not operational, or when a console or output 
device produces an inexplicable error status. Probable hardware 
error. 

005 DMKCPI could not find an operational primary or alternate 
console. Probable hardware error. 

006 This is a normal wait when a system shutdown is completed. 

007 A program check, a machine check, or a permanent I/O error was 
found by the checkpoint program. 

008 Checkpoint and system shutdown are complete. If the system is 
running under an alternate console, error messages DMKCKP910I, 
DMKCKP911W, DMKCKP960I, and DMKCKP961I are not displayed. 

009 An error condition occurred that prevents a warm start. 

If the system is running under an alternate console, error 
messages DMKCKP910I and DMKCKP911W are not displayed. 
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OOA A machine check occurred while DMKSAV was attempting to save or 
restore a page image copy of the nucleus on a SYSRES device. 
Probable hardware error. 

OOB A machine check occurred before initialization was complete. 

OOC An attempt was made to IPL from a disk that did not contain a 
system. Thus, the wait state code OOC entered on disk by the 
Format/Allocate program is encountered. 

OOD The machine size defined during system generation is greater than 
the real machine size, or a hardware error has occurred which 
inhibits VM/370 from using the required storage. 

OOF Hardware errors are being received on VM/370 paging device (s). 
The wait state that causes this code is preceded by message 

DMKPAG415E CONTINUOUS PAGING ERRORS FROM DASDxxx 

010 The SYSRES device, on which DMKSAV is attempting to write a page 
image copy of the nucleus, is not mounted or not ready. 

Oil An unrecoverable error, other than a machine check, occurred while 
DMKSAV attempted to write a page image copy of the nucleus on the 
SYSRES device. 

012 The normal wait state code loaded by DMKSAV when it has completed 
loading the nucleus. 
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CP ABEND CODES 

Figure 6U lists the CP ABEUD, their cause and required action. 



ABEND 1 1 1 
Code 1 Reason for ABEND | Action | 


BLD001 1 Register 8 should con- I Verify that general register 8 | 
1 tain a pointer to the | points to an RDEVBLOK for a ter- | 
1 RDEVBLOK for the user's | minal. If it does not, there is | 
1 terminal. This routine | probably an error in the calling | 
1 (DMKBLDVM) attempts to | program. Identify the calling | 
1 create and partially | program by means of the return | 
1 initialize a VMELOK for | address and the base register in | 
1 a user. DMKBLDVM abnor- | the save area pointed to by | 
1 mally terminates if | general register 13. Then, at- 1 
1 general register 8 does 1 tempt to identify the source of | 
1 not contain a pointer | the incorrect RDEVBLOK address. | 
1 to the user. | 1 


BLD002 1 Pages are being re- | Examine the dump and determine | 
1 leased but the page | why the page was released without | 
1 invalid bit is not on | the page invalid bit turned on. | 
1 in the page table entry. | I 


CFG010 1 DMKCFGCL was called to | Identify the caller by the return I 
1 perform an unsupported | address and base register in the | 
1 function. The function | SAVEAREA pointed to by register I 
1 request may be found in | 13 to identify the source of the | 
1 SAVEW0RK1, byte 2. | unsupported function request. | 
1 Supported values are: | 1 
1 X'01' LOAD SYS 1 1 
1 X'02' FIND SYS 1 1 
1 X'OU' PURGE SYS | | 

CKS001 1 The map for dynamic | The map should be allocated via a | 
1 checkpoint has not been | call to entry points DMKCKSIN or | 
1 allocated prior to a | DMKCKSWM fro-a DMKWRM. Check that | 
1 call to DMKCKSPL. | DMKWRM does, in fact, call one of | 
1 1 these entry points and that they | 
1 1 do allocate a map. | 


CKS002 1 The spool file identi- | In this case, (1) DMKCKSWM or | 
1 fication in the map and | DMKCKSIN did not set up the map | 
1 on the checkpoint cyl- | properly, (2) a call to DMKCKSPL | 
1 inder do not match. | caused the mismatch, or (3) the | 
1 1 SFBLOK was released but the map 1 
1 1 was not updated. | 


CKS003 1 No function was speci- | Check location SAVERTN in the | 
1 fied in the call to | save area pointed to by general | 
1 DMKCKSPL. 1 register 13. This indicates | 
1 1 which routine called DMKCKSPL | 
1 1 with insufficient data. | 


CKSOOU 1 A spool file to be de- | The SFBLOK for the file should | 
1 leted cannot be found | have been queued previously on | 
1 on the system printer, | either the printer, punch, or | 
1 punch, or reader file | reader file chain by DKMCKSWM | 
1 chains. | when performing a CKPT start, j 
1 1 Check for an error in this logic. | 



Figure 64, 
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1 ABEND 1 1 1 
1 Code 1 Reason for ABEND | Action | 


1 CPI001 1 The RDEVBLOK for the | Verify that the volume serial | 
1 1 DASD on which the | number on the SYSRES volume from | 
1 1 SYSRES volume is mount- | which the IPL was attempted, is | 
1 1 ed cannot be located, | the same as that specified in the | 
1 1 or the IPL volume is | field DMKSYSVL. If the volume | 
1 1 not the SYSRES volume. | serial number is not the same, it | 
1 1 The SYSRES volume is | may have been altered by the CLIP | 
1 1 specified in the | utility. Or, the image of the | 
1 1 SYSRES macro in the | same nucleus saved on the SYSRES | 
1 1 DMKSYS module. | may have been partially de- | 
1 1 1 stroyed and the SYSRES specifica- | 

I 1 1 tion altered. Load or restore | 

II 1 the nucleus from a backup copy | 
II 1 to the SYSRES volume and try | 
II 1 to IPL again. | 


1 CPI002 1 A valid system direc- | Display the volume labels for all | 
1 1 tory file could not be | owned volumes. If the volumes do | 
1 1 located. | not contain an active directory | 
1 1 1 pointer, run DMKDIR (the stand- | 
1 1 1 alone directory program) to re- | 
1 1 1 create the system directory on an | 
1 1 1 owned volume. If an active | 

I 1 1 directory pointer is present in | 

II 1 at least one volume label, verify | 
1 1 1 that the device on which the vol- j 
1 1 1 ume is mounted is online and | 

I 1 1 ready before trying to IPL the | 

II 1 system. I 


1 CPI003 1 The system TOD clock is | Call IBM for hardware support | 
1 1 not operational. | to fix the clock. | 

1 CVT001 1 The system TOD clock is | I 
1 1 in error or is not op- | I 
1 1 erational. | 1 


1 DRD001 1 The device code index | Verify that the contents and or- | 
1 1 in the compressed DASD | der of the owned list have not | 
1 1 address for the system | been altered since the dump was | 
1 1 dump file points to an | taken. If these fields have not | 
1 1 RDEVBLOK for an invalid | been altered, the SFBLOK for the | 
1 1 DASD. The valid DASDs | dump file may have been destroyed. | 
1 1 are 2305 series, 3330 | The owned list is specified by | 
1 1 series, 33U0 series, | the SYSOWN macro in the DMKSYS | 
1 1 3350 series or 231^*/ | module. 1 
1 1 2319. 1 1 


1 DSP001 1 During I/O interrup- | The integrity of the user's vir- | 
1 1 tion, unstack and re- | tual I/O configuration has prob- | 
1 1 flection, DMKSCNVU | ably been violated. The unit | 
1 1 could not locate all of | addresses or indexes in the vir- | 
1 1 the virtual control | tual control blocks are in error, | 
1 1 blocks for the inter- | or the virtual configuration has | 
j 1 rupting unit. | been altered by ATTACH/DETACH | 
1 1 1 while I/O was in progress. Check I 
1 1 1 for a device reset failure in | 
1 1 1 DMKCFPRD. * 1 



Figure 6H, CP ABEND Codes (Part 2 of 15) 
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ABEND 
Code 

DSP002 



Reason for ABEND 

The dispatcher (DMKDSP) 
is attempting to dis- 
patch a virtual relo- 
cate user whose shadow 
segment tables or vir- 
tual extended control 
register are invalid. 



Action 

Most likely, a free storage vio- 
lation has occurred. First look 
at the DMKPRV and DMKVAT modules. 
Examine the real, virtual, and 
shadow translation tables for 
consistency of entry size and 
format. Also compare page and 
segment size. 



DSP003 



The interval timer was 
not incremented proper- 
ly. This is most like- 
ly a hardware error. 
The dispatcher tests 
for interval timer er- 
rors and abnormally 
terminates if such an 
error occurs. Results 
would be unpredictable 
if CP continued when 
the interval timer was 
in error. 



Check the timer fields in real 
storage. The value of the real 
interval timer is at real storage 
location X«50'. The dispatcher 
loads the value of the real in- 
terval timer in real storage lo- 
cation X'54' when a user is dis- 
patched. The value of the real 
interval timer is loaded into 
real storage location X*Uc» when 
an interrupt occurs. If the value 
stored at X'UC is not less 
than the value stored at X»54', 
the dispatcher abnormally ter- 
minates. Check the routines that 
control the value of the time 
fields at X»4C», X»50«, and 
X«5U». 



DSPOOU 



While tracing SIOs or 
I/O interrupts, the 
virtual device was de- 
tached. Now, the 
VDEVBLOK cannot be 
found. 



Examine the operator's console 
sheet and the user's terminal 
sheet to see who detached the 
device. Warn the person re- 
sponsible that devices should not 
be detached during I/O tracing. 



FRE001 



The size of the block 
being returned (via GR 
0) is less than or 
equal to 0. 



FRE002 



The a 
stora 
retur 
addre 
ready 
stora 



ddress of the free 
ge block being 
ned matches the 
ss of a block al- 
in the free 
ge chain. 



Using FREER14 and FREER12 in the 
PSA, identify the CP module 
releasing the storage. Check for 
an error in calculating the size 
of the block or for a modifica- 
tion to the stored block size for 
variable-size blocks. 

Identify the program returning 
the storage by means of the re- 
turn address and base registers 
(FREE14 and FREE12 in DMKFRE's 
save area in PSA) . The most com- 
mon cause of this type of failure 
is a module that returns a free 
storage block but fails to clear 
a pointer to the block that has 
been saved elsewhere. All mod- 
ules that return blocks via a 
call to DMKFRET should first 
verify that the saved pointer is 
nonzero; after returning the 
block, any saved pointers should 
be set to zero. 
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I 

ABEND 
Code 



Reason for ABEND 



FRE003 



The address of the free 
storage block being 
returned overlaps the 
next lower block on the 
free storage chain. 



FREOOU 



The address of the free 
storage block being 
returned overlaps the 
next higher block on 
free storage chain. 



FRE005 I A module is attempting 
to release storage in 
the resident VM/370 
nucleus. 



FRE006 I A module is reguesting 
a block of storage 
whose size (contained 
in GR 0) is less than 
or equal to zero. 



Action 

A free storage pointer may have 
been destroyed. Also, the module 
releasing the lower (overlapped) 
block may have returned too much 
storage. Examine the lower block 
and determine its use and former 
owner. Or, identify the program 
returning the storage by means of 
the return address and base 
registers stored (FREER14 and 
FREER12 in DMKFRE's save area in 
PSA) . The most common cause of 
this type of failure is a module 
that returns a free storage block 
but fails to clear a pointer to 
the block that has been saved 
elsewhere. All modules that re- 
turn blocks via a call to DMKFRET 
should first verify that the 
saved pointer is nonzero; after 
returning the block, any saved 
pointers should be set to zero. 

A free storage pointer may have 
been destroyed. Also, the module 
releasing the higher (overlapped) 
block may have returned too much 
storage, or the module may be 
attempting to release storage at 
the wrong address. 



A module is probably attempting 
to release location 0. Check for 
the module picking up a pointer 
to the free storage block without 
first testing the pointer for 0. 
Use FREER 14 and FREER12 in the 
PSA to identify the module. 



Using FREER1U and FREER12 in the 
PSA, identify the module. Check 
for an error in calculating the 
block size. Improper use of the 
halfword instructions ICM and 
STCM can cause truncation of high 
order bits that results in a cal- 
culation error. 



FRE007 



A module is attempting 
to release a block of 
storage whose address 
exceeds the size of 
real storage. 



A free storage pointer may have 
been destroyed. Attempt to iden- 
tify the owners of the free stor- 
age blocks adjacent to the one 
containing the pointer that was 
destroyed. Check for moves and 
translation where initial counts 
of zero have been decremented to 
minus 1, thus generating an 
executed length code of X»FF», or 
an effective length of 256 bytes. 



Figure 64, 
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ABEND 
Code 

FRE008 



FRE009 



FRE010 



FRE011 



HVD001 



Reason for ABEND 



The address of the free 
storage block being 
returned matches the 
address of the first 
block in the subpool 
for that size. 



The address of the free 
storage block being 
returned matches the 
second block in the 
subpool for that size. 



A program is attempting 
to extend free storage 
while storage is being 
extended. This can be 
I/O inter- 
or channel 
involving 
other than 



caused by 
ruptions 
programs 
channels 
channel 0. 



A CP module has at- 
tempted to return a 
block of storage that 
is in the user dynamic 
paging area. 



The user pointed to by 
GR 11 issued a DIAGNOSE 
instruction while at- 
tempting to format the 
I/O error, channel 
check, or machine check 
recording areas: the 
SYSRES device type is 
unrecognizable. 



Action 

Identify the program returning 
the storage by means of the re- 
turn address and stored base reg- 
isters (FREER1U and FREER12 in 
DMKFRE's save area in the PSA). 
The common cause of this type of 
failure is a module that returns 
a free storage block but fails to 
clear a pointer to the block that 
has been saved elsewhere. All 
modules that return blocks via a 
call to DMKFRET should first 
verify that the saved pointer is 
nonzero; after returning the 
block, any saved pointers should 
be set to zero. 



If the storage requests that 
caused the ABEND are due to chan- 
nel activity, place the device 
involved on channel 0, which is 
disabled during free storage ex- 
tension. 



Identify the program returning 
the storage by means of the re- 
turn address and stored base reg- 
isters (FREER 14 and FREER 12 in 
DMKFREE's save area iii the PSA). 
The common cause of this type of 
failure is a module that returns 
a free storage block but fails to 
clear a pointer to the block that 
has been saved elsewhere. All 
modules that return blocks via a 
call to DMKFRET should first 
verify that the saved pointer is 
nonzero; after returning the 
block, any saved pointers should 
be set to zero. 

The RDEVBLOK for the SYSRES de- 
vice was probably destroyed, or a 
volume with the same serial num- 
ber as the SYSRES volume was 
mounted. If a volume with the 
same serial number was mounted, 
check the ATTACH processing in 
the DMKVDB routine. 
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ABEND 1 1 1 
Code I Reason for ABEND | Action | 

lOSOOl 1 The caller is trying | The lOBLOK may have been returned | 
1 to reset an active | (via DMKFRET) or destroyed. | 
1 lOBLOK from the RCHBLOK | Verify that the lOBLOK was valid | 
1 gueue, but that lOBLOK | and use the lOBLOK and RDEVBLOK | 
1 contains an invalid | to determine the last operation. | 
1 address. | I 


IOS002 1 DMKIOS is attempting to | I 
1 restart an lOBLOK from | I 
1 the RCHBLOK gueue, but | j 
1 that lOBLOK contains | I 
1 an invalid address, | | 


IOS003 1 DMKIOS is attempting to | Register 2 points to the RCHBLOK, | 
1 remove an lOBLOK from a | RCUBLOK, or RDEVBLOK from whose | 
1 queue, but that lOBLOK | queue the lOBLOK is being re- | 
1 contains an invalid | moved. Register 10 points to the | 
1 address. | lOBLOK. Use the CP internal | 
1 1 trace table to determine which I 
1 1 module called DMKIOS twice to | 
1 t start the same lOBLOK. I 


NLD001 1 During execution of a 1 Correct the RDEVICE macro speci- | 
1 NETWORK DUMP command, | fying the 3704 or 3705, reassem- | 
1 or during an automatic | ble the DMKRIO module, and regen- j 
1 dump of a 3704 or 3705, | erate the VM/370 CP nucleus with | 
1 VM/370 detected that it | the corrected module. I 
1 had not allocated suf- | 1 
1 ficient DASD spool | 1 
1 space to contain the | 1 
1 information from the | 1 
1 3704 or 3705. The MODEL | 1 
1 operand of the RDEVICE | 1 
1 macro describing the | 1 
1 3704 or 3705 was not | 1 
1 specified correctly. | 1 
1 VM/370 determines the | 1 
1 storage size Of a 3704 | 1 
1 or 3705 by the model | 1 
1 specified on the | 1 
1 RDEVICE macro. | 1 


PGS001 1 The user page count in | A module has attempted to release I 
1 the VMBLOK (VMPAGES) | more pages than it originally re- I 
1 became negative. | ceived. The module that last | 
1 1 called DMKPGS is probably the | 
i 1 module in error. | 



I 

Figure 64. 
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ABEND 
Code 

PGT001 



PGT002 



PGT003 



PGTOOU 



Reason for ABEND 

The number of cylinders 
in use stored in the 
allocation block 
(ALOCBLOK) is less than 
the maximum but the 
DMKPGT module was un- 
able to find available 
cylinders. 



Action 



The count of pages 
in a page allocation 
block (RECBLOK) is less 
than the maximum but 
the DMKPGT module was 
unable to find avail- 
able pages. 



The DASD page slot 
being released is not 
marked allocated. 



The dummy RECBLOK indi- 
cating the spooling 
DASD pages on the cyl- 
inder that are to be 
released contains a 
page count greater than 
the number of pages al- 
located on the cyl- 
inder. 



Inspect the chains of paging and 
spooling allocation blocks an- 
chored at RDEVPAGE and RDEVRECS 
on the RDEVBLOK for the device in 
guestion, and verify that a 
cylinder allocation block 
(RECBLOK) exists for each cylin- 
der marked and allocated in the 
ALOCBLOK. If RECBLOKs for some 
cylinders are missing, it is 
possible that the bit map in the 
ALOCBLOK has been destroyed. If 
all cylinders are accounted for, 
the updating of the count field 
is in error. 



If the RECBLOK in 
use for paging, 
SHPTABLE entry for 
located on the cyli 
if the cylinder 
spooling, it is pos 
RECBLOK itself 
stroyed or that the 
the use count is fa 



guestion is in 
then locate a 
each page al- 
nder. However, 
is in use for 
sible that the 
has been de- 
updating of 
ulty. 



Identify the module attempting to 
release the page by means of the 
caller's return address and base 
register stored in BALR14 and 
BALR12 in the BALRSAVE save area 
in PSA. Locate the source 
(control block or SWPTABLE entry) 
of the DASD address being re- 
leased to verify that they have 
not been destroyed. If the 
DASD page is in a spool file, it 
is possible that the file or the 
RECBLOK chain has been incorrect- 
ly checkpointed and warmstarted 
after a system shutdown or a 
system crash. 



The spool file pointers may have 
been destroyed while the file was 
being processed, or the alloca- 
tion chain may be in error. A 
cold start may be necessary. If 
feasible, use the DASD dump 
restore program to print the DASD 
areas containing the affected 
file, and try to locate the in- 
correct pointers. 
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r ~ 1 

1 ABEND 1 1 1 
1 Code 1 Reason for ABEND | Action | 

1 PGT005 1 A module is trying to | Use BALR14 and BALR12 in the | 
1 j release a DASD page | BALRSAVE area of the PSA to | 
1 1 slot on a cylinder for | identify the module attempting to | 
1 1 which no page alloca- | release the page. Verify that the | 
1 1 tion block (RECBLOK) | DASD cylinder address is valid | 

I 1 exists. 1 for the device in question. If it | 

II 1 is and the rest of the DASD ad- | 
1 1 1 dress is valid, verify that the | 
1 1 1 cylinder is in the dynamically | 
1 1 1 allocatable area. If these re- | 
1 1 1 strictions are met, the DASD page | 
1 1 1 must have been used by more than | 
1 1 i one user. | 

1 PGT006 1 The last DASD page slot | The ALOCBLOK has probably been | 
1 1 in a RECBLOK has been | destroyed, or the chain pointer | 
1 1 deallocated but the bit j in the RDEVBLOK is in error. | 
1 1 representing the cylin- | | 
1 1 der in the cylinder | j 
1 1 allocation block | I 
1 1 (ALOCBLOK) is not cur- j I 
1 1 rently set to one, in- j 1 
1 1 dicating that the cyl- | j 
1 1 inder was not allocated. | 1 


1 PGT007 1 A module is trying to j Use BALR14 and BALR12 in the | 
1 1 release a page of vir- | BALRSAVE area of the PSA to iden- | 
1 j tual storage in use by | tify the module attempting to re- | 
1 1 the VM/370 control pro- | lease the page. Locate the con- | 
1 1 gram that has not been | trol block containing the virtual j 
1 1 marked allocated. | page address that is being re- I 
j 1 1 leased. It is possible that the | 
1 1 1 address has been destroyed, or a | 
1 1 1 pointer to a virtual page has | 
1 1 1 been retained after the page was | 
1 1 1 destroyed. I 


1 PGT008 1 The system's virtual | Request users to close all spool | 
1 1 storage buffers have | files that are no longer active. j 
1 1 been exhausted because I 1 
1 1 of an excessive number | I 
1 1 of open spool files. | I 

I PRG001 1 Program check (opera- I Examine the ABEND dump. In par- 1 
1 1 tion) in the control J ticular, examine the old PSH and | 
1 1 program. | identify the module that had the | 


1 PRG002 1 Program check (privi- j I 
1 1 leged operation) in the j 1 
1 1 control program. | j 


1 PRG003 1 Program check (execute) | 1 
1 1 in the control program. | I 

1 PRG004 1 Program check (protec- j 1 
1 1 tion) in the control | I 
1 1 program. | 1 



Figure 64, 
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ABEND 
Code 



PRG005 



PRG006 



PBG007 



PRG008 



PRG009 



PRG010 



PRG011 



PRG012 



PRG013 



PRG014 



PRG015 



PRG016 



PRG017 



PRG018 



PHG019 



Figure 64. 



Reason for ABEND 



Program check (address- 
ing) in the control 
program. 



Program check (specifi- 
cation) in the control 
program. 

Program check (data) in 
the control program. 

Program check (fixed- 
point overflow) in the 
control program. 

program check (fixed- 
point divide) in the 
control program. 

program check (decimal 
overflow) in the con- 
trol program. 



program check (decimal 
divide) in the control 
program. 

program check (exponen- 
tial overflow) in the 
control program. 



Program check (exponen- 
tial underflow) in the 
control program. 

Program check (signifi- 
cance) in the control 
program. 

Program check 
(floating-point di- 
vide in the control 
program. 



Program check (segment) 
in the control program. 

Program check (paging) 
in the control program. 



Program check (transla- 
tion) in the control 
program . 

Program check (special 
operation) in the con- 
trol program. 



Action 

Examine the ABEND dump. In par- 
ticular, examine the old PSW and 
identify the module that had the 
program check. 
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ABEND 1 1 1 
Code 1 Reason for ABEND | Action | 


PRG254 1 A translation specifi- | If the set of translation tables | 
1 cation exception has | pointed to by R0NCR1 is correct, | 
1 been received for a | a hardware failure has occurred, | 
1 virtual machine that is | possibly with dynamic address | 
1 not in extended control | translation. Otherwise, call IBM | 
1 mode. 1 for software support. | 


PRG255 1 A PER (program event | Retry the program causing the er- | 
1 recording) has been re- | ror; if the problem persists, | 
1 ceived for a virtual | call IBM for software support. | 
1 machine that is running | | 
1 with PER disabled in | | 
1 its virtual PSH. | I 

PSA001 1 No free storage is | Try to identify the extreme load | 
1 available for save | condition that caused the prob- | 
1 areas. | lem. Verify that a routine has | 
1 1 not requested an inordinate | 
1 1 amount of storage. If the storage | 
1 1 requests are valid and the prob- | 
1 1 lem occurs regularly, alter the | 
1 1 DMKCPI module to allocate more | 
1 1 than six pages of free storage | 
1 1 per 256K bytes of storage. | 


PSA002 1 The "PSW Restart* con- | Examine the resulting ABEND dump | 
1 sole key was pressed | for a dynamic picture of the sys- | 
1 and caused this ABEND. | tern's status. | 
1 The operator normally | | 
1 takes this action when | | 
1 an unusual system con- | 1 
1 dition occurs, such as | I 
1 a system loop or slow | | 
1 machine operation. | I 


PSA003 1 An unrecoverable DAsD | Check the unit address in the I/O | 
1 I/O error occurred on a | old PSW to find the paging device | 
1 paging device. | in error. This is a hardware er- I 
1 1 ror. Call IBM for hardware | 
1 1 support. 1 

PTR001 1 A segment exception or | Inspect the contents of control | 
1 translation specif ica- | registers and 1, and the format | 
1 tion has occurred while | of the segment table pointed to | 
1 executing a LOAD REAL | by CR 1. One or more of these ( 
1 ADDRESS (LRA) instruc- | tables and registers may contain | 
1 tion in the DMKPTR mod- | invalid data. If CH 1 is | 
1 ule. 1 invalid, check the contents of | 
1 1 the VMBLOK pointed to by GR 11, | 
1 1 especially the address in the | 
1 1 VMSEG field. | 


PTR002 1 A program is attempting | Use BALR14 and BALR12 in the | 
1 to unlock a page frame | BALRSAVE area of the PSA to iden- | 
1 whose address exceeds | tify the module attempting to un- | 
1 the size of real stor- | lock the page frame. Check for | 
1 age. | the source of the invalid ad- | 
1 1 dress. I 



Figure 64. 
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ABEND 
Code 

PTR003 



PTROOa 



PTR005 



PTR007 



PTR008 



PTR009 



Reason for ABEND 



A program is attempting 
to unlock a real stor- 
age page frame whose 
CORTABLE entry is not 
flagged as locked. 



The lock count in the 
CORTABLE entry for the 
page frame being un- 
locked has been decre- 
mented to a value that 
is less than 0. 

The user page count in 
the VMBLOK (VMPAGES) is 
negative. 



DMKFRE requested a page 
for fixed free storage 
but DMKPTR determined 
that there were no 
pages left in the dy- 
namic paging area. 



A CORTABLE entry on the 
free list points to a 
valid PTE (page table 
entry) , but the page is 
allocated. 



The count of the number 
of resident shared 
pages was incorrectly 
decremented making the 
count now less than 
zero. 



Action 



Use BALRI14 and BALR12 in the 
BALRSAVE area of the PSA to iden- 
tify the module attempting to un- 
lock the page frame. Check for 
the source of the invalid ad- 
dress. 

Check the routines that update 
the lock count field and CORTABLE 
entry. 



A module attempted to release 
more pages than it originally re- 
ceived. The last module that 
called DMKPTR is probably the 
module that caused the error. 

Examine the dump for one of the 
following conditions: 

1 . Excessive amounts of free 
storage have been allocated by 
CP and not released via 
DMKFRET. Look for blocks of 
identical data and determine 
which modules built that data. 

2. A block of storage greater 
than U096 bytes was requested. 
Requests for large blocks of 
free storage require contig- 
uous pages from DMKPTR and as 
a result have a higher prob- 
ability of failure than re- 
quests for one page or less. 
If possible, change the appli- 
cation to reduce the size of 
storage requests. Otherwise, 
schedule the application when 
storage is less fragmented. 

Pages on the free list should not 
contain valid PTEs. Examine the 
dump to determine which module 
called DMKPTRFR. The module that 
called DMKPTRFR probably contains 
an error. 

The field DMKPTRSC contains the 
number of resident shared pages 
and the field DMKDSPNP contains 
the number of pageable pages. 
DMKDSPNP must always be greater 
than DMKPTRSC. Check the routines 
that update these two count 
fields. 
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ABEND 
Code 



PTR010 



PTR011 



PTR012 



PTR013 



RGA001 



RGA002 



RNH001 



Reason for ABEND 



The count of the number 
of resident reserved 
pages was incorrectly 
decremented so that the 
count is now less than 
zero. 



A CORTABLE entry to be 
placed on the free list 
points to a valid PTE 
(page table entry) , but 
the page is allocated. 
An abend occurs trying 
to honor a deferred re- 
quest. 



A CORTABLE entry to be 
placed on the free list 
points to a valid PTE 
(page table entry) , but 
the page is allocated. 



DMKFRE requested a page 
for fixed free storage 
but there were no DASD 
page slots left to 
write out the selected 
page. 

The reflected device 
status in the CSH is 
not supported for cer- 
tain 3270 remote device 
and line protocol I/O 
operations. Specifi- 
cally, the returned CSW 
contains a device sta- 
tus other than CE, DE, 
and UE; and, the ending 
CCW contains an embed- 
ded teleprocessing code 
of 02, 03, or 06. 



The status flag 
BSCFLAG in the BSCBLOK 
indicates a condition 
that is not valid for a 
3270 line reset func- 
tion (Teleprocessing 
code 09) . 

An unrecoverable I/O 
error occurred during 
read or write for the 
3704 or 3705. Status 
indicates program 
failure. 



Action 



The field DMKPTRRC contains the 
number of reserved pages. 
DMKPTRRC must always be less than 
DMKDSPNP. Check the routines that 
update these two count fields 
(DMKDSPNP and DMKPTRRC) . 



Pages to be put on the free list 
should not contain valid PTEs. 
Examine the dump to determine why 
the page was not marked invalid 
before the call to DMKPTRPT. 



Pages to be put on the free list 
should not contain valid PTEs. 
Examine the dump to determine why 
the page was not marked invalid 
before the call to DMKPTRPT. 



Examine the dump to determine 
what was using all the TEMP 
space. Excessive space may be 
consumed by large spool files or 
not enough TEMP space exists for 
paging. 

IPL to restart the system. If the 
problem persists, call IBM for 
system support. 



Retry. If the problem persists, 
ensure that the 3704/3705 and 
channel hardware are functioning 
correctly. 



Figure 64. 
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ABEND 1 1 1 
Code 1 Reason for ABEND | Action | 

RNH002 1 A response that should | Verify that the 3704/3705 NCP is | 
1 not occur was received | operating correctly. Use the | 
1 from the 3704/3705 | NETWORK TRACE command to deter- | 
1 control program. | mine the exact cause of the re- | 
1 1 sponse. 1 

RPA001 1 The virtual address | The virtual storage belongs ei- | 
1 supplied to DMKRPAGT is | ther to the user whose VMBLOK is | 
1 outside of the virtual | pointed to by GR 11 or, if GR 2 | 
1 storage being refer- | in the SAVEAREA indicates a PARM | 
1 enced. | of SYSTEM, to the system VMBLOK. | 
1 Identify the calling program by | 

RPA002 1 The virtual address | means of the return address and | 
1 supplied to DMKRPAPT is | base register saved in the | 
1 outside of the virtual | SAVEAREA pointed to by GR 13. If | 
1 storage being refer- | the virtual address was obtained | 
1 enced. | from the system's virtual stor- | 
1 1 age, examine the virtual page I 
1 1 allocation routine, DMKPTRVG. If | 
1 1 the virtual page refers to a | 
1 1 user's storage, attempt to iden- | 
1 1 tify the routine that has gener- | 
1 1 ated the incorrect address. Ver- | 
1 1 ify that the VMSIZE in the rele- | 
1 1 vant VMBLOK reflects the correct | 
1 1 storage size for the system or | 
1 1 user being referenced. | 


RPA003 1 The user page count in | A module has attempted to release | 
1 the VMBLOK became nega- | more pages than it originally | 
1 tive. 1 received. The module that last | 
1 1 called DMKHPA is probably the | 
1 1 module in error. | 

SCH001 1 The total number of | The field SCHN1 is the count of | 
1 interactive users plus | the number of interactive users | 
1 batch users in the | and the field SCHN2 is the count | 
1 scheduler's gueue is | of the number of batch users. | 
1 less than zero. A | Check the routines that update | 
1 counter was probably | these two count fields (SCHNI and I 
1 decremented incorrect- | SCHN2) to determine why their sum | 
1 ly. 1 was negative. I 


SCN001 1 The VDEVLINK chain is | IPL to restart. If the problem | 
1 invalid. A VDEVBLOK | persists, examine the VDEVbLOKs | 
1 has a link field that | in the link chain as well as the | 
1 points to another | one whose link field points into | 
1 VDEVBLOK associated | the chain but is not in the | 
1 with the same real | chain. Determine what the owner | 
1 device. The first | of the VDEVBLOK was doing at the | 
1 VDEVBLOK is not pointed | time. 1 
1 to by any other link | I 
1 field in the chain. | I 
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ABEND 
Code 

TDK001 



TDK002 



UDR001 



VDB002 



VDR003 



VI0002 



Reason for ABEND 

A program is attempting 
to deallocate a cylin- 
der of T-disk space for 
which no cylinder 
allocation block 
(ALOCBLOK) exists. 

A program is attempting 
to deallocate cylin- 
der (s) of T-disk space 
that are not marked al- 
located. 



The user directory mod- 
ule is looping trying 
to read all of the 
UDIRBLOK page buffers 
from the directory de- 
vice. Or, a directory 
containing over 10,816 
users was loaded. 



The system-owned list 
has an invalid format. 



The DASD link chain is 
invalid. In the case of 
minidisks, attaching a 
minidisk that points to 
an RDEVBLOK whose count 
of users is already ze- 
ro causes this ABEND. 

DMKSCNVU was unable to 
locate all of the vir- 
tual I/O control blocks 
for the virtual unit 
address associated with 
the interrupt just 
stacked. 



Action 

Verify that GR 8 points to a 
RDEVBLOK for a CP-owned volume. 
If it does not, the error may 
originate in the calling program. 
Identify the caller by the return 
address and base register in the 
SAVEAREA pointed to by GR 13, and 
try to identify the source of the 
incorrect RDEVBLOK address. If 
the RDEVBLOK is valid, it may be 
that the cylinder number passed 
is incorrect. The VDEVELOK for 
the device for which the T-disk 
was defined may have been de- 
stroyed. If the cylinder number 
appears valid, examine the allo- 
cation record on the real volume 
by running DMKFMT (VM/370 Format 
program) , invoking the ALLOCATE 
option without allocating any new 
space. If the output shows that 
deallocated cylinder falls within 
an area defined for T-disk allo- 
cation, the ALOCBLOK chained to 
the RDEVBLOK may be destroyed. 



Use the DASD Dump Restore program 
to print the UDIRBLOK page buf- 
fers from the directory device. 
Determine if the chain pointers 
are valid. 



IPL to restart. If the problem 
persists, check the SYSOHN macro 
in DMKSYS for validity. If the 
macro is good, print the dump and 
examine it. 



IPL to restart. If the problem 
persists, examine the RDEVSYS 
flag. If the RDEVSYS flag is off, 
the problem is especially seri- 
ous; print and examine the dump. 
Examine the VDEVBLOK and RDEVBLOK 
checking the link chain. 

Verify that the unit address in 
the field lOBVADD in the lOBLOK 
pointed to by GR 10 is valid for 
the user who initiated the I/O. 
The field lOBHSER contains the 
address of the user's VHBLOK. If 
the address is valid, the integ- 
rity of the user's virtual I/O 
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ABEND 
Code 

VI0002 
(cont. ) 



VIO003 



VMA001 



VMA002 



VMA003 



VHA004 



VSP001 



Reason for ABEND 



DMKICS has returned an 
lOBLOK indicating a 
condition code of 2 was 
received from the START 
I/O for the operation. 



DMKVMASH was called to 
check if any shared 
pages were altered. A 
VMABLOK associated with 
a shared named system 
could not be found. 



DMKVMA was called to 
make a shared named 
system unshared. How- 
ever, the SHRTABLE as- 
sociated with the 
shared page that was 
changed could not be 
located. 

A shared page was 
changed and a named 
system could not be 
found for the virtual 
machine. 



A shared page was 
changed and the corres- 
ponding VMABLOK could 
not be found. 



The virtual spooling 
manager could not lo- 
cate all virtual con- 
trol blocks for an in- 
terrupting unit. 



Action 



configuration has probably been 
been destroyed. If the address is 
not valid, the lOBLOK has been 
altered, or was built incorrectly 
in the first place. 

Condition code 2 should never be 
returned to the virtual I/O in- 
terrupt handler. Its presence 
indicates either a failure in the 
I/O supervisor (DMKIOS) , or that 
the status field in the lOBLOK 
(lOBSTAT) has been destroyed. 

Examine BALR14 for the address of 
the module that issues the call. 
The probable cause of error is 
that the VMBLOK has been over- 
laid. Examine the CP trace ta- 
ble entries and determine when 
the VMBLOK was overlaid. 

The SHRTABLE may have been over- 
laid or the shared page that was 
changed was altered by another 
virtual machine. If the SHRTABLE 
was not overlaid find out which 
virtual machine altered the 
shared page and why it was not 
detected. 

A shared page was alterd by an- 
other virtual machine and went by 
undetected. Investigate system 
routines that could allow the 
undetected alteration of a shared 
page. 

A shared page was altered by 
another virtual machine without 
being detected. Investigate the 
system routines that could allow 
an undetected alteration of a 
shared page. 

Verify that the unit address 
(lOBVADD) in the lOBLOK is valid. 
If the address is valid, the in- 
tegrity of the virtual I/O con- 
figuration has probably been de- 
stroyed. If the address is not 
valid, the lOBLOK has been al- 
tered or was built incorrectly. 
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CMS RETURN CODES 



If a condition arises during execution of a 
comnand which types out a Warning, Error, Severe 
or Terminal error message, the command passes a 
nonzero return code in register 15. These 
return codes have the following values: 



Code 
RC = a: 



RC 



Meaninci 

The user did not specify all the 

conditions to execute the command as 

intended but these conditions did not 

prevent the command from completing 

execution. However, the results are 

unpredictable. 

Device errors for which a warning 
message is issued, or errors have been 
introduced into the output file. 



BC = 12 Errors in input file. 

RC = 20: Invalid character in fileid. The valid 
characters are 0-9, a-z, A-Z, at-sign, 
pound sign, dollar sign. 

RC = 24: The user did not specify the command 
line correctly. 

RC = 28: Error occurred while trying to access, 
or manipulate a user's files. For 
example: file not found. 

RC = 32: The user's file(s) is not in the 
expected format, or the user's file(s) 
does not contain the expected 
information. 



RC = UO: Functional error occurred executing 
the command for which the user is 
responsible, or the user failed to 
supply all the necessary conditions 
for executing the command; or, end of 
file or end of tape occurred (where 
applicable) . 

RC = 88 : A CMS system restriction prevented 
command execution, or the reguested 
function is an unsupported feature, or 
the device reguested is unsupported. 



RC = 100: I/O errors, 
occurred. 



or serious device errors 



RC = 104: A functional error occurred during 
command execution for which the system 
is responsible. 

RC = 256: All unexpected errors for which the 
system is responsible, that is. 
Terminal messages. 



If command execution generates no Warning, 
Error, severe or Terminal error messages, the 
return code passed in register 15 is zero. 

Commands which invoke program products pass 
to the user the return code passed by the 
program in register 15. OS Simulation routines 
indicate return codes within the text of the 
messages. Commands or functions of commands 
passed to CP pass the return code passed by CP 
in register 15. 



RC = 36: Error occurred involving the user's 
devices for which he is responsible. 
For example: disk is read-only. 
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CHS DMSFREX ERROR CODES 



ERROR CODES FROM DMSFREE, DMSFRES, AND DMSFRET 



A nonzero return code upon return from DMSFRES, 
DMSFREE or DMSFRET indicates that the request 
could not be satisfied. Register 15 contains 
this return code, indicating which error has 
occurred. The codes below apply to the DMSFRES, 
DMSFREE and DMSFRET macros, described on the 
following pages. 



Code Error 

1 (DMSFREE) Insufficient storage space is 

available to satisfy the request for free 
storage. In the case of a variable 
request, the minimum request could not be 
satisfied. 

2 (DMSFREE or DMSFRET) User storage pointers 
destroyed. 



3 (DMSFREE or DMSFRET) 
pointers destroyed. 



Nucleus storage 



(DMSFREE) An invalid size was requested. 
This error exit is taken if the requested 
size is not greater than zero. In the 
case of variable requests, this error exit 
is taken if the minimum request is greater 
than the maximum request. However, the 
error is not detected if DMSFREE is able 
to satisfy the maximum request. 



Code Error 

5 (DMSFRET) An invalid size was passed to the 

DMSFRET macro. This error exit is taken 
if the specified length is not positive. 

6 (DMSFRET) The block of storage that is being 

released was never allocated by DMSFREE. 
This error occurs if one of the following 
errors is found: 

a. The block is not entirely inside either 
the low-core free storage area or the 
user program area between FREELOHE and 
FREEUPPR. 

b. The block crosses a page boundary that 
separates a page allocated for USER 
storage from a page allocated for 
NUCLEUS storage. 

c. The block overlaps another block 
already on the free storage chain. 

7 (DMSFRET) The address given for the block 

being released is not a doubleword 
boundary address. 

8 (DMSFRES) An illegal request code was passed 

to the DMSFRES routine. Because the 
DMSFRES macro generates all codes, this 
error code should never appear. 

9 (DMSFRE, DMSFRET, or DMSFRES) Unexpected 
internal error. 
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CMS ABEND CODES 



ABEND RECOVERY 



U. 



Mo^!ji§s Used: DMSABN 

OE§E§iioii of the Abend Routine, DMSABN 

When the abend recovery routine is entered, it 
types out the abend message, followed by the 
line 'CMS', to indicate to the user that he may 
type in his next command. 



At this point, there are 
available to the user. 



two options 



All link blocks allocated by the OS macros 
simulation routine DMSSLN are freed. 



5. If VSAM or Access Method Services are still 
active, call DMSVSR for cleanup. 

6. All FCB and DOSCB pointers are zeroed out. 

7. All user storage is released. 

8. The amount of system free storage that 
should be allocated is computed. This 
figure is compared against the amount of 
free storage that is actually allocated. 
If the two are equal, then storage recovery 
can be considered successful. If they are 
unequal, then a message is sent to the 
user. 



First, he ma 
this case, DMSA 
make the facili 
DEBUG's PSW and 
the time that 
invoked. From D 
or registers, a 
continue process 
DMSABN, so that 



y type the DEBUG command. In 
BN passes control to DMSDBG, to 
ties of DEBUG available to him. 
registers are as they were at 
the abend recovery routine was 
EBUG, the user may alter the PSW 
s he wishes, and type GO to 
ing, or type RETURN to return to 
abend recovery can continue. 



The second option available is to type in any 
other command. If this is done, DMSABN performs 
its abend recovery function and passes control 
to DMSINT to execute the command that has been 
typed in. 

The abend recovery function consists of the 
following steps: 



1. 



The SVC handler, DMSITS, is reinitialized, 
and all stacked save areas are released. 



2. "FINIS * * *•• is invoked by means of SVC 
202, to close all files, and to update the 
user file directory. 

3. If the EXEC interpreter (EXECTOR module) is 
in storage, it is released. 



Unrecoverable Termination — The HAIjT Option of 
DMSERR 



There are certain times, such as when the SVC 
handler's pointers are modified, that the system 
can neither continue processing nor try to 
recover. In these cases, DMSERR with the option 
HALT=YES is specified to cause a message to be 
typed out, after which a disabled wait state PSW 
is loaded. 



In CP mode, the programmer can examine the 
PSW, whose address field contains the address of 
the instruction following the call to the DMSERR 
macro. He can also examine all the registers, 
which are as they were when the DMSERR macro was 
invoked. 

Figure 65 lists the CMS ABEND codes and 
describes the cause of the ABEND and the action 
required. 
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1 A6ENDI Nodule | | 1 
1 Code 1 Name | Cause of ABEND | Action | 


1 001 1 DHSSCT 1 The problem program encoun- | Message DMSSCT120S | 
1 1 1 tered an input/output error | indicates the possible | 
1 1 1 processing an OS macro. | cause of the error. | 
1 1 1 Either the associated DCB | Examine the error | 
1 1 1 did not have a SYNAD rou- | message and take the | 
1 1 1 tine specified or the I/O | action indicated. | 
1 1 1 error was encountered | 1 
1 1 1 processing an OS CLOSE | I 
1 1 1 macro. | I 

1 OS** 1 DMSVIP 1 The problem program encoun- | Refer to the DOS/VS | 
1 1 1 tered an I/O error while | Messages Seference, | 
1 1 1 processing a VSAM action | Order No. GC33-5379, | 
1 1 1 macro under DOS/VS for | to determine the cause | 
1 1 1 which there is no OS egui- | of the VSAM error. | 
1 1 1 valent. An internal error | 1 
1 1 1 occurred in a DOS VSAM rou- | I 
1 1 1 tine. 1 1 


1 OCX 1 DMSITP 1 The specified hardware ex- | Type DEBUG to examine | 
1 1 1 ception occurred at a spe- | the PSW and registers | 
1 1 1 cified location. "x" is | at the time of the | 
1 1 1 the type of exception: | exception. | 
1 1 1 X T2£e 1 1 
1 1 1 IMPRECISE 1 1 
1 1 1 1 OPERATION 1 1 
1 1 1 2 PRIVILEGED OPERATION | | 
1 1 1 3 EXECUTE 1 1 
1 1 I a PROTECTION 1 1 
1 1 1 5 ADDRESSING | | 
1 1 1 6 SPECIFICATION | | 
1 1 1 7 DECIMAL DATA | | 
1 1 1 8 FIXED-POINT OVERFLOW | | 
1 1 1 9 FIXED-POINT DIVIDE | | 
1 1 1 A DECIMAL OVERFLOW | | 
1 1 1 B DECIMAL DIVIDE | | 
1 1 1 C EXPONENT OVERFLOW | | 
1 1 1 D EXPONENT UNDERFLOW | i 
1 1 1 £ SIGNIFICANCE | | 
1 1 1 F FLOATING-POINT DIVIDE | I 


1 OFO 1 DMSITS 1 Insufficient free storage | If the ABEND was | 
1 1 1 is available to allocate a | caused by an error in | 
1 1 1 save area for an SVC call. | the application pro- | 
III 1 gram, correct it; if I 
III 1 not, use the CP DEFINE i 
III 1 command to increase | 
III 1 the size of virtual | 
III 1 storage and then re- | 
III 1 start CMS. i 


1 0F1 1 DMSITS 1 An invalid halfword code is | Enter DEBUG and type | 
1 1 1 associated with SVC 203. | GO. Execution conti- | 
III 1 nues. 1 



Figure 65. CMS ABEND Codes (Part 1 of 3) 
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r — --- - ___ — „_ — _ _ _, ._... — , 

1 ABEND 1 Nodule | Cause of ABEND | Action | 
1 Code II 1 1 


1 0F2 1 DMSITS 1 The CMS nesting level of 20 | None. ABEND recovery I 
1 1 j has been exceeded. | takes place when the | 
III 1 next coDDand is en- | 
III 1 tered. | 

1 0F3 1 DMSITS 1 CMS SVC (202 or 203) in- | Enter DEBOG and type | 
1 1 1 struction was executed and | GO. Control returns to | 
1 1 1 provision was made for an | the point to which a | 
1 1 1 error return from the rou- | normal return would | 
1 1 1 tine processing the SVC | have been made. | 
1 1 1 call. 1 1 


1 OFU 1 DMSITS 1 The DMSKEY key stack over- | Enter DEBUG and type | 
1 1 1 flowed. 1 GO. Execution conti- | 
III 1 nues and the DMSKET | 
III 1 macro is ignored. | 


1 0F5 1 DMSITS 1 The DMSKEY key stack under- | I 
1 1 1 flowed. 1 1 

1 0F6 1 DMSITS 1 The DMSKEY key stack was | Enter DEBUG and type | 
1 1 1 not empty when control re- | GO. Control returns | 
1 1 1 turned from a command or | from the command or | 
1 1 1 function. | function as if the key | 
III 1 stack had been empty. | 


1 0F7 1 DMSFRE | Occurs when TYPCALL=SVC | When a system ABEND | 
1 1 1 (the default) is specified | occurs, use DEBUG to | 
1 1 1 in the DMSFREE or DMSFRET | attempt recovery. | 
1 1 1 macro. | I 


1 0F8 1 DHSFBE | Occurs when TYPCALL=BALR is | When a system ABEND | 
1 1 1 specified in the DMSFREE or | occurs, use DEBUG to | 
1 1 1 DMSFRET Macro devices. | attempt recovery. | 


1 101 1 DMSSVN 1 The wait count specified in | Examine the program | 
1 1 1 an OS WAIT macro was larger | for excessive wait | 
1 1 1 than the number of ECBs | count specification. | 
1 1 1 specified. | I 


1 104 1 DMSVIB 1 The OS interface to DOS/VS | See the additional er- | 
1 1 1 VSAM is unable to continue | ror message accompany- | 
1 1 1 execution of the problem | ing the ABEND message, | 
1 1 1 program. | correct the error, and | 
III 1 reexecute the program. | 


1 155 1 DMSSLN | Error during LOADMOD after | See the last LOADMOD | 
1 1 1 an OS LINK, LOAD, XCTL, or | (DMSMOD) error message | 
1 1 1 ATTACH. The compiler switch | for error description. | 
1 1 1 is on. 1 In the case of an I/O | 
III 1 error, recreate the | 
III 1 module. If the module | 
III 1 is missing, create it. | 


1 15A 1 DMSSLN | Severe error during load | See last LOAD error | 
1 1 1 (phase not found) after an | message (DMSLIO) for | 
1 1 1 OS LINK, LOAD, XCTL, or | the error description. | 
1 1 1 ATTACH. The compiler switch | In the case of an I/O | 
1 1 1 is on. 1 error, recreate the | 
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ABENDI Module | | | 
Code 1 Name | Cause of ABEND | Action | 


15A 1 1 1 text deck or TXTLIB. | 

cont.l 1 1 If either is missing, | 

1 1 1 create it. | 

174 1 DMSVIB 1 The OS interace to DOS/VS | See the additional er- | 
1 1 VSAM is unable to continue | ror message accompany- | 
1 1 execution of the problem | ing the ABEND message, | 
1 1 program. | correct the error, and | 
1 1 1 reexecute the program. | 


177 1 DMSVIB 1 The OS interface to DOS/VS | See the additional er- | 
1 DHSVIP 1 VSAM is unable to continue | ror message accompany- | 
1 1 execution of the problem | ing the ABEND message, | 
1 1 program. | correct the error, and | 
1 1 1 reexecute the program. | 

240 1 DMSSVT | NO work area was provided | Check RDJFCB specifi- | 
1 1 in the parameter list for | cation. I 
1 1 an OS RDJFCB macro. | | 


UOO 1 DMSSVT 1 An invalid or unsupported | Examine program for I 
1 1 form of the OS XDAP macro | unsupported XDAP macro | 
1 1 has been issued by the | or for SVC 0. | 
1 1 problem program. | | 

704 1 DMSSMN | An OS GETMAIN macro (SVC U) | Change the program so | 
1 1 was issued specifying the | that it specifies | 
1 1 LC or LU operand. These | allocation of only one | 
1 1 operands are not supported | area at a time. | 
1 1 by CMS. 1 1 


705 1 DMSSMN | An OS FREEMAIN macro | Change the program so | 
1 1 (SVC 5) was issued specify- | that it specifies the | 
1 1 ing the L operand. This | release of only one | 
1 1 operand is not supported by | area at a time. | 
1 1 CMS. 1 1 


80a 1 DMSSMN 1 An OS GETMAIN macro (804 - | Check the program for | 

BOA 1 1 SVC 4, BOA - SVC 10) was | a valid GETMAIN re- | 

1 1 issued that reguested ei- | guest. If more storage | 

1 1 ther zero bytes of storage, | was requested than was | 

1 1 or more storage than was | available, increase | 

I 1 available. I the size of the virtu- | 

II 1 al machine and retry. | 


905 1 DMSSMN | An OS FREEMAIN macro (905 - j Check the program for | 
90A 1 1 SVC 5, 90A - SVC 10) was | a valid FREEMAIN re- j 
1 1 issued specifying an area j guest; the address may | 
1 1 to be released whose ad- | have been incorrectly | 
1 1 dress was not on a double- | specified or modified. | 
1 1 word boundary. j i 


A05 1 DMSSMN | An OS FREEMAIN macro (A05 - | Check the program for | 
AOA 1 1 SVC 5, AOA - SVC 10) was | a valid FREEMAIN re- | 
1 1 issued specifying an area | quest; the address j 
1 1 to be released which over- | and/or length may have j 
1 1 laps an existing free area. | been incorrectly spec- | 
1 1 1 ified or modified. j 
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BSCS MESSAGE-TO-LABEL CROSS REFERENCE 



Message 
Code 



DMTAXS101I 
DMTAXS102I 
DBTAXS103E 
DMTAXS104I 

DMTAXS105I 
DMTAXS106I 

DMTAXS107I 
DMTAXS108E 
DMTAXS520I 
DMTAXS521I 
DMTAXS522I 
DMTAXS523I 

DMTAXS524E 



DMTAXS525E 



DMTAXS526E 



DHTAXS640I 
DMTCMX001I 
DMTCMX003I 
DMTCMX200I 
DMTCMX201E 



DMTCMX202E 
DMTCMX203E 



DMTCMX20UE 



DMTCMX205E 



Generated 
at Label 



TAGPEMD 
ACCEPEND 
ACCEPUBG 
CLOOSCAN 

CLOIPURG 

FILSTRY 

OPENPOOF 

UNPECHEK 

OPENRDER 

CHANGE 

CHANHO 

CHANNOH 

CHANSCAN 

ORDENEXT 

CHANGE 

ORDBCHEK 

PURGCHEK 

CHANGE 

ORDECHEK 

PURGCHEK 

CHANGE 

ORDECHEK 

PURGCHEK 

FURGDONE 

CMXFINXT 

CMXM003 

CMXLGOT 

CMXHIT 

CMXLGOT 

CHXMISS 

DEFNOLNK 

HSGNOLMK 

A1FLKG0T 

A1FST0W 

CHALKGOT 

L2FLKG0T 

QYOFILE 

QYOFNULL 

CHALKGOT 

CHANTERM 

CHASCAN 

FLUMORE 

LOTERM 

L1TERM 

QYTOOMCH 

QYOFILE 

QYOLINK 

QYOSYSTM 

ROSCAN 

CHACLASS 

CHACOPY 



Message Text 



FILE 'spoolld' ENQUEUED ON LINK 'linkid' 

FILE 'spoolid' PENDING FOR LINK 'linkid' 

FILE 'spoolid' REJECTED — INVALID DESTINATION ADDRESS 

FILE SPOOLED TO 'userid2' — ORG 'locidi' ('useridi') 

mm/dd/yy hh:iniB:ss 

FILE 'spoolid' PURGED 

FILE 'spoolid'MISSING — DEQUEUED PROM LINK 'linkid' 

nn PENDING FILES FOR LINK 'linkid' MISSING 
SYSTEM ERROR READING SPOOL FILE 'spoolid' 
File 'spoolid' CHANGED 
FILE 'spoolid' HELD FOR LINK 'linkid' 
FILE 'spoolid' RELEASED FOR LINK 'linkid' 
LINK 'linkid' QUEUE REORDERED 

FILE 'spoolid' ACTIVE — NO ACTION TAKEN 



FILE 'spoolid' IS FOR LINK 'linkid' — NO ACTION TAKEN 
FILE 'spoolid' NOT FOUND -- NO ACTION TAKEN 



nn FILE(S) PURGED ON LINK 'linkid' 

FREE STORAGE = nn PAGES 

LINK 'linkid' EXECUTING: (conmand line) 

RSCS 

INVALID COMMAND 'command' 



INVALID LINK 'linkid' 

INVALID SPOOL FILE ID 'spoolid' 



INVALID KEYWORD 'keyword' 



CONFLICTING KEYWORD 'keyword' 
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Message 


Generated 


1 


Code 


at Label 


Message Text | 


DMTC11X205E 


CHAHOLD 




(cont.) 


CHANOHOL 

CHAPRIOR 

FLUKEYWD 

LCTKEYHD 

ROCLASS 

ROKEEP 

ROLINE 

BOTASK 

ROTYPE 




DMTCMX206E 


CHACLASS 

CHACOPY 

CHADIST 

CHANAHB 

CHAPRIOR 

LOHOLD 

LOTRACE 

L1FLKG0T 

QUERY 

ROCLASS 

ROCLMULT 

ROKEEP 

ROLINE 

ROTASK 

BOTYPE 


INVALID OPTION 'keyword* 'option' | 


DMTCflX208E 


DISCONN 

HSGNCLNK 

MSGNOUSR 


INVALID USER ID • userid • I 


DMTCMX300I 


CMXALRDY 


ACCEPTED BY TASK 'task' | 


DMTCMX301E 


CHXALRDY 


REJECTED BY TASK 'task' ~ PREVIOUS COMMAND ACTIVE | 


DMTCMX302E 


HSGNOLNK 


LINK 'linkid' IS NOT DEFINED | 


DMTCMX303E 


CMD 

LOFLKGOT 

L1FLKG0T 

L2FLKG0T 

HSG 


LINK 'linkid' IS NOT ACTIVE I 


DMTCMX304E 


CMXALRDY 


REJECTED BY TASK 'task' NOT RECEIVING | 


DMTCMX540I 


DEFLKNEW 


NEW LINK 'linkid' DEFINED | 


DMTCHX541I 


DEFLKNEW 


LINK 'linkid' REDEFINED | 


DflTCMX5U2E 


DEFINE 


LINK 'linkid' ACTIVE — NOT REDEFINED | 


DMTCMX543E 


DEFNEXT 
DEFNOLNK 


LINK 'linkid' NOT DEFINED ~ LINK LIMIT REACHED | 


DMTCHXSaUE 


DEFLKNEW 


LINK 'linkid' NOT DEFINED— LIMIT REACHED | 


DMTCMX550I 


DELDELET 


LINK 'linkid' NOW DELETED I 


DMTCMX551E 


DELETE 


LINK 'linkid' ACTIVE — NOT DELETED | 


DMTCMX552E 


DELETE 


LINK 'linkid' HAS A FILE QUEUE — NOT DELETED | 


DMTCHX560I 


DISCHARG 


RSCS DISCONNECTING | 


DHTCMX561E 


DISCONN 


USERID 'userid' NOT RECEIVING I 


DMTCHX651I 


QY1STAT 


LINK 'linkid' INACTIVE I 


DMTCMX652I 


QY1SN0D 


LINK 'linkid' ACTIVE 'type' 'vaddr' c {HO|NOH) (DR|NOD)| 
{TRA|TRE|NOT)Q=in P=n I 


DMTCMX653I 


QY1DEF 


LINK 'linkid' DEFAULT 'task' 'type' 'vaddr' c R=ii | 


DHTCHX654I 


QY1QUEUE 


LINK 'linkid' Q = ib P=n I 


DMTCMX655I 


QY1INACT 


FILE 'spoolid' 'locid' 'userid' CL a PR mo REC nnnnnn | 


DMTCMX660I 


QY2STAT 


FILE 'spoolid' INACTIVE ON LINK 'linkid' | 


DMTCHX661I 


QY2STAT 


FILE 'spoolid' ACTIVE ON LINK 'linkid' | 


DHTCHX662I 


QY2RSS 


FILE 'spoolid' ORG 'locid' 'userid' mm/dd/yy hh:mm:ss | 
zzz TO 'locid' 'userid' VIA 'linkid' | 


DMTCMX663I 


QY2VN0H 


FILE 'spoolid' PR am CL a CO nn (HO|NOH) DI 'distcode',| 
NA ('fn ft' I'dsnane') | 
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Message 
Code 

DWTCMXeeUE 



DBTCMX670I 
DMTCMX671I 
DMTCHX672I 
DMTCMX673I 
DMTCMX700I 
DMTCHX701E 

DMTCMX702E 

DMTCMX703E 

DMTCMX70aE 

DMTCMX705E 

DMTCMX706E 

DMTCMX707E 

DMTCMX708E 

DHTCMX709E 

DMTCMX710E 
DMTCMX750E 
DMTCMX751I 

DMTINI402T 
DMTINI407R 
DHTINI408B 
DMTINia09R 
DMTIHIU10R 
DMTINiaaiS 
DMTINia79E 
DMTINiaSOE 

DMTINiaSIE 
DMTIHI482E 
DMTINia83E 
DMTIIPT070E 
DHITNPT108E 
DMTNPTIUII 
DMTNPT1U2I 
DMTNPTIUSI 

DMTNPTiam 

DMTNPT145I 

DMTNPT146I 
DMTNPT147I 
DBTNPT149I 

DMTNPT190E 
DMTNPT510I 
DWTNPT511E 



Generated 
at Label 

QY2RSS 

QY2STAT 

QY2VM 

QY2VN0H 

QYSYACT 

QYM671 

QYSYNEXT 

QYM673 

STALNGOT 

STACREAT 

STACREAT 

STACREAT 

STACREAT 

STACRERR 

STACRERR 

STACRERR 

STACRERR 

STACRERR 

STAHAXER 
STAHOTCL 
CHXALRDY 

INIEXIT 

ASKQUEST 

IPLDISK 

NUCCYLN 

IPLZERO 

NRERROR 

BINERR1 

DECERR1 

RDORWRT 

IPLZERO 

BADIPLD 

NUCCYLN 

lOERRPRT 

VMSGET 

NPTEINIT 

NPTEINIT 

LINEDIS2 

LINEDROP 

PUTOPEN 

PUTCLS1 

GETG0T2 
GET PURGE 
TRPRT 

VMSP1 

GTBKHSG 

SBKFWDN 



Message Text 
FILE 'spoolid' NOT POUND 



LINK 'linkid' ACTIVE — LINE 'vaddr' (HO|NOH) 

LINK •linkid* INACTIVE 

NO LINK ACTIVE 

NO LINK DEFINED 

ACTIVATING LINK 'linkid' 'task' 'type' 'vaddr* 

NO SWITCHED LINE AVAILABLE — LINK 'linkid* NOT 

ACTIVATED 
LINE 'vaddr' IS IN USE BY LINK 'linkidl' — LINK 

'linkid2' NOT ACTIVATED 
DEV 'cuu' IS NOT A LINE PORT — LINK 'linkid' NOT 

ACTIVATED 
LINE 'vaddr' CC=3 NOT OPERATIONAL — LINK 'linkid' NOT 

ACTIVATED 
DRIVER 'type' NOT FOUND ON DISK 'vaddr' ~ LINK 

'linkid' NOT ACTIVATED 
FATAL ERROR LOADING FROM 'vaddr' — LINK 'linkid' NOT 

ACTIVATED 
DRIVER 'type' FILE FORMAT INVALID — LINK 'linkid' NOT 

ACTIVATED 
VIRTUAL STORAGE CAPACITY EXCEEDED — LINK 'linkid' NOT 

ACTIVATED 
TASK NAME 'task' ALREADY IN USE — LINK 'linkid' NOT 

ACTIVATED 
MAX (nn) ACTIVE — LINK 'linkid' NOT ACTIVATED 
LINK 'linkid' ALREADY ACTIVE — NO ACTION TAKEN 
LINK 'linkid' ALREADY ACTIVE ~ NEW CLASS (ES) SET AS 

REQUESTED 
IPL DEVICE READ I/O ERROR 
REWRITE THE NUCLEUS? Y OR N 
IPL DEVICE ADDRESS = ecu 
NUCLEUS CYL ADDRESS = nnn 
ALSO IPL CYLINDER 0? Y OH N 
IPL DEVICE WRITE I/O ERROR 
INVALID DEVICE ADDRESS - REENTER 
INVALID CYLINDER NUMBER - REENTER 

INVALID REPLY - ANSWER YES OR NO 

IPL DEVICE ERROR - REENTER 

NUCLEUS OVERLAYS CMS FILES - RECOMPUTE 

ERROR cuu SIOCC cc CSW csw SENSE sense CCW ccw 

SYSTEM ERROR READING SPOOL FILE 'spoolid' 

LINE 'vaddr' READY FOR CONNECTION TO LINK 'linkid' 

LINK 'linkid' LINE 'vaddr' CONNECTED 

LINK 'linkid' LINE 'vaddr' DISCONNECTED 

RECEIVING: FILE FROM 'locidi' ('namel') FOR 'locid2' 

('name2') 
RECEIVED: FILE FROM 'locidi' ('namel') FOR 'locid2' 

('name 1 ') 
SENDING: FILE 'spoolid' ON LINK 'linkid', REC nnnnnn 
SENT: FILE 'spoolid' ON LINK 'linkid' 
LINK 'linkid' LINE ACTIVITY: TOT= mmm; ERRS= nnn; 

TMOUTS= ppp 
INVALID SPOOL BLOCK FORMAT ON FILE 'spoolid' 
FILE 'spoolid' BACKSPACED 
NO FILE ACTIVE ON LINK 'linkid' 
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1 Message 


Generated 




'l 


1 Code 


at Label 




Message Text | 


1 DHTNPT570I 


ISETDRAIN 


LINK 


'linkid" NOB SET TO DEACTIVATE | 


1 DMTNPT571E 


ISETDRER1 


LINK 


linkid" ALREADY SET TO DEACTIVATE | 


1 DMTNPT580I 


GETFLUSH 


FILE 


spoolid" PROCESSING TERMINATED | 


1 DMTNPT581E 


ISETFLUSH 
GETFLSHE 


FILE 


•spoolid" NOT ACTIVE | 


1 DMTNPT590I 


SETFREE 


LINK 


•linkid" RESUMING FILE TRANSFER | 


1 DMTNPT591E 


SETFHER1 


LINK 


linkid" HOT IN HOLD STATUS | 


1 DMTNPT600I 


GDGODNE 


FILE 


spoolid' FORWARD SPACED | 


1 DMTNPT610I 


SETHOLD 
GETFILE 


LINK 


linkid" TO SUSPEND FILE TRANSMISSION | 


1 DMTNPT611I 


SETHLDIM 
GETFILE 


LINK 


linkid" FILE TRANSMISSION SUSPENDED | 


1 DMTNPT612E 


SETHLDE1 


LINK 


linkid" ALREADY IN HOLD STATUS | 


1 DMTNPT750E 


SETSTRT1 


LINK 


linkid' ALREADY ACTIVE — NO ACTION TAKEN | 


1 DMTNPT752I 


SETSTART 


LINK 


linkid" STILL ACTIVE — DRAIN STATUS RESET | 


1 DMTNPT801I 


SETTR1 


LINK 


linkid" ERROR TRACE STARTED | 


1 DMTNPT802I 


SETTR2 


LINK 


linkid" TRACE STARTED | 


1 DMTNPT803I 


SETTRftCE 


LINK 


linkid" TRACE ENDED | 


1 DKTNPT810E 


SETTRE1 


LINK 


linkid" TRACE ALREADY ACTIVE | 


1 DMTNPT811E 


SETTRE2 


LINK 


linkid" TRACE NOT ACTIVE | 


1 DMT1IPT902E 


C0NFCK1 


NON-SIGNON CARD READ ON LINK (linkid) | 


1 DMTNPT903E 


SPASS 


PASSWC 


DRD (password) on LINK (linkid) IS INVALID | 


1 DMTNPT904E 


SGNERR 


SIGNOl 


i KEYWORD (keyword) INVALID | 


1 DMTNPT905I 


NPTGETX 


SIGNOI 


i OF LINK "linkid" COMPLETE | 


1 DKTNPT934E 


PUTCLOSE 


ID MISSING ON LINK "linkid* ~ INPUT FILE PURGED | 


1 DMTNPT936E 


GETG0T1 


NO REMOTE PUNCH AVAILABLE ON LINK "linkid' ~ FILE | 








"spoolid" PURGED I 


1 DMTREXOOOI 


REXICGOT 


RSCS 


(VER V, LEV 1, mm/dd/yy) READY | 


1 DMTREX002I 


TERLHIT 


LINK 


linkid" DEACTIVATED | 


1 DMTREX080E 


TERLHIT 


PROGRJ 


^M CHECK — "linkid" DEACTIVATED | 


1 DMTREX090T 


REXPTERM 


PHOGR] 


KK CHECK IN SUPERVISOR ~ RSCS SHUTDOWN | 


1 DMTREX091T 


REXITERM 


INITIALIZATION FAILURE - RSCS SHUTDOWN | 


1 DHTSML070E 


lOEHBPET 


I/O ERROR — SIOCC ~ CSW — SENSE ~ CCH ~ | 


1 DMTSML108E 


VMSPGET 


SYSTEl 


5 ERROR READING SPOOL FILE 'spoolid" | 


1 DMTSML141I 


ISIO 


LINE 


vaddr" READY FOR CONNECTION TO LINK "linkid" | 


1 DMTSMLU2I 


SIGNOK 


LINK 


linkid" LINE "vaddr" CONNECTED | 


1 DMTSHL1U3I 


EOJ 


LINK 


linkid" LINE "vaddr" DISCONNECTED | 


1 DMTSML144I 


JOUTPUT 


RECEI\ 


fING: FILE FROM "locidl" ("namel") FOR "locid2" | 




PCONT 




(•name2") I 




UOUTPUT 






1 DMTSML1U5I 


JCL0SE1 


RECEn 


rED: FILE FROM "locidi" ("namel") FOR 'locid2" | 




PCLOSE 




('namG2') | 




UCLOSE 






1 DHTSML146I 


RL0C1 


SENDII 


JG: FILE 'spoolid' ON LINK "linkid", REC nnnnnn | 


1 DMTSML147I 


RDEOF 


SENT: 


FILE "spoolid" ON LINK "linkid" | 


1 DHTSML149I 


TBPRT 


LINK « 


linkid" LINE ACTIVITY: TOT= mmm; ERRS= nnn; | 
TMOUTS= ppp 1 


1 DMTSML170I 


WGET2 


FROM • 


linkid' : (MSG message text) | 


1 DHTSML190E 


VMSP1 


INVAL] 


:d spool block format on file 'spoolid' 1 


1 DMTSML510I 


RDBKMSG 


FILE ' 


spoolid' BACKSPACED I 


1 DMTSML511E 


SBKFHDN 


NO FII 


.E ACTIVE ON LINK "linkid" | 


1 DHTSML530I 


SETCMD 


COMMAl 


JD FORWARDED ON LINK "linkid" | 


1 DMTSML570I 


SETDRAIN 
$OSRNPUN 


LINK ' 


linkid" NOW SET TO DEACTIVATE | 


1 DMTSML571E 


SETDRER1 


LINK ' 


linkid" ALREADY SET TO DEACTIVATE | 


1 DHTSML580I 


RDFLOSH 


PILE ' 


spoolid" PROCESSING TERMINATED | 


1 DMTSML581E 


SETFLUSH 
RDFLSHER 


FILE ' 


spoolid" NOT ACTIVE | 


1 DMTSML590I 


SETFREE 


LINK ' 


linkid" RESUMING FILE TRANSFER | 


1 DMTSML591E 


SETFBER1 


LINK ' 


linkid" NOT IN HOLD STATUS | 
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Message 
Code 

DMTSML600I 
DHTSML610I 
DMTSML611I 

DMTSML612E 
DMTSKL750E 
DMTSML752I 
DWTSML801I 
DHTSML802I 
DMTSML803I 
DMTSML810E 
DMTSML811E 
DMTSML901E 

DMTSML902E 
DMTSML903E 
DMTSML905I 
DMTSML906E 

DMTSML93aE 
DMTSML935E 



Generated 
at Label 

BDGODNE 

SETHOLD 

ALLHLD 

SETHLDIM 

SETHLDE1 

SETSTRT1 

SETSTART 

SETTH1 

SETTR2 

SETT RACE 

SETTRE1 

SETTRE2 

SMLIERR1 

MC7ERR 
MC7A 
MC7B 
SMLIERB2 

JCLOSE 
RDNOHLD 



Message Text 



FILE 
LINK 
LINK 



spoolid' FORWARD SPACED 

linkid* TO SUSPEND FILE TRANSMISSION 

linkid" FILE TRANSMISSION SUSPENDED 



LINK 'linkid* ALREADY IN HOLD STATUS 

LINK 'linkid* ALREADY ACTIVE — NO ACTION TAKEN 

LINK "linkid' STILL ACTIVE — DRAIN STATUS RESET 

LINK 'linkid' ERROR TRACE STARTED 

LINK "linkid' TRACE STARTED 

LINK 'linkid* TRACE ENDED 

LINK 'linkid* TRACE ALREADY ACTIVE 

LINK 'linkid' TRACE NOT ACTIVE 

INVALID SML MODE SPECIFIED — LINK 'linkid' NOT 

ACTIVATED 
NON-SIGNON CARD READ ON LINK (linkid) 
PASSWORD (password) ON LINK (linkid) is INVALID 
SIGNON OF LINK 'linkid' COMPLETE 
INVALID SML BUFFER PARAMETER ~ LINK 'linkid' NOT 

ACTIVATED 
ID CARD MISSING ON LINK 'linkid' — INPUT FILE PURGED 
LINK 'linkid' IN RJE MODE — PRINT FILE 'spoolid' 

PURGED 
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CMS COMMANDS FOB DEBUGGING 



The SVCTRACE command records information for 
all SVC calls. When the trace is terminated, 
the information recorded up to that point is 
printed at the system printer. 



DEBUGGING WITH CMS 



This section describes the debug tools that CMS 
provides. These tools can be used to help you 
debug CMS or a problem program. In addition, a 
CHS user can use the CP commands to debug. 
Information that is often useful in debugging is 
also included. The following topics are 
discussed in this section: 



• CMS debugging commands 

• DASD dump restore program 



CMS DEBUGGING COMMANDS 



In addition, several CMS commands produce or 
print load maps. These load maps can locate 
storage areas while debugging programs. 



DEBUG 



The DEBUG command provides support for debugging 
programs at a terminal. The virtual machine 
operator can stop the program at a specified 
location and examine and alter virtual storage, 
registers, and various control words. Once CMS 
is in its debug environment, the virtual machine 
operator can request the various DEBUG options. 
However, in the debug environment, all of the 
other CMS commands are considered invalid. 



CMS provides two commands that are useful in 
debugging: DEBUG and SVCTBACE. Both commands 
execute from the terminal. 



Any DEBUG subcommand may be entered if CMS is 
in the debug environment and if the keyboard is 
unlocked. The following rules apply to DEBUG 
subcommands: 



The debug environment is entered whenever: 

• The DEBUG command is issued 

• A breakpoint is reached 

• An external or program interruption occurs 



CMS does not accept other commands while in 
the debug environment. However, while in the 
debug environment, the options of the DEBUG 
command can: 

• Set breakpoints (address stops) that stop 
program execution at specific locations. 

• Display the contents of the CAW (channel 
address word) , CSW (channel status word) , old 
PSW (program status word) , or general 
registers at the terminal. 

• Change the contents of the control words 
(CAW, CSW and PSW) and general registers. 

• Dump all or part of virtual storage at the 
printer. 

• Display the contents of up to 56 bytes of 
virtual storage at the terminal. 

• Store data in virtual storage locations. 

• Allow an origin or base address to be 
specified for the program. 

• Assign symbolic names to specific storage 
locations. 

• Close all open files and I/O devices and 
update the master file directory. 

• Exit from the debug environment. 



1. No operand should be longer than eight 
characters. All operands longer than eight 
characters are left justified and truncated 
on the right after the eighth character. 

2. You must use the DEFINE subcommand to 
create all entries in the DEBUG symbol 
table. 

3. The DEBUG subcommands can be truncated. 
The following is a list of all valid DEBUG 
subcommands and their minimum truncation. 





Minimum 


Subcommand 
BREAK 


Truncation 
BR 


CAW 


CAW 


CSW 


CSW 


DEFINE 


DEF 


DUMP 


DU 


GO 


GO 


GPR 


GPR 


HX 


HX 


ORIGIN 


OR 


PSW 


PSW 


RETURN 


RET 


SET 


SET 


STORE 


ST 


X 


X 



One way to enter the debug environment is to 
issue the DEBUG command. The message 

DMSDBG728I DEBUG ENTERED 

appears at the terminal. Any of the DEBUG 
subcommands may be entered. To continue normal 
processing, issue the RETURN subcommand. 

Whenever a program check occurs, the DMSABN 
routine gains control. Issue the DEBUG command 
at this time if you want CMS to enter its debug 
environment. 
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whenever a breakpoint is encountered, a 
program check occurs. The message 

DHSDBG728I DEBUG ENTERED 
BBEAKPOINT lY AT XXXXX 

appears on the terminal. Follow the same 
procedure to enter subcommands and resume 
processing as with a regular program check. 



An external interrupt, which occurs when the 
CP EXTERNAL command is issued, causes CMS to 
enter its debug environment. The message 

DNSDBG728I DEBUG ENTERED 
EXTERNAL INTERRUPT 



appears on the console. Any 
subcommands may be issued. To 
debug environment after 
interruption, use GO. 



of the DEBUG 
exit from the 
an external 



Hhile CMS is in its debug environment, the 
control words and low storage locations contain 
the debug program values. The debug program 
saves the control words and low storage contents 
(X»00« - XMOO") of the interrupted routine at 
location X'CO'. 

The following is a detailed discussion of the 
possible DEBUG subcommands. 



BREAK 



Use the BREAK subcommand to set breakpoints 
which stop execution of a program or module at 
specific instruction locations, called 
breakpoints. Issuing the BREAK subcommand 
causes a single breakpoint to be set. A 
separate BREAK subcommand must be issued for 
each breakpoint desired. A maximum of 16 
breakpoints (with identification numbers 
through 15) may be in effect at one time; any 
attempt to set more than 16 breakpoints is 



rejected, 
is: 



The format of the BREAK subcommand 



I BReak | id /symbol \ 
I I (1 



hexloc/ 



where: 



id is a decimal number, from 
identifies the breakpoint. 



to 15, which 



symbol 

is a name assigned to the storage location 
where the breakpoint is set. The symbolic 
name must be previously assigned to the 
storage address using the DEF subcommand of 
the DEBUG command. 

hexloc 

is the hexadecimal storage location (relative 
to the current origin) where the breakpoint 
is set. 



Sgtting Break£oints 



Breakpoints should be set after a program is 
loaded, but before it executes. When a 
breakpoint is encountered during program 
execution, execution stops and the debug 
environment is entered. You can then use the 
other DEBUG subcommands to analyze the program 
at that particular point. Registers, storage, 
and control words can be examined and altered. 
After you finish analyzing the program at this 
point in its execution, issue the GO subcommand 
to resume program execution. 



Breakpoints are set before the program 
executes. They are set on instruction 
(halfword) boundaries at locations that contain 
operation codes. After setting all the desired 
breakpoints, issue the RETURN subcommand to exit 
from the debug environment. Then issue the CBS 
START command to begin program execution. 



The first operand of the BREAK subcommand 
(id) assigns an identification number (0-15) to 
the breakpoint. If the identification number 
specified is the same as a currently set 
breakpoint, the previous breakpoint is cleared 
and the new one is set. 



The second operand of the BREAK subcommand 
(symbol or hexloc) indicates the storage 
location of the breakpoint. If the operand 
contains any nonhexadecimal characters, the 
DEBUG symbol table is searched for a matching 
symbol entry. If a match is found, the 
breakpoint is set at the storage address 
corresponding to that symbol, provided that the 
storage address is on an even (halfword) 
boundary. If no match is found in the DEBUG 
symbol table (and the operand is a valid 
hexadecimal number), the second operand is 
treated as the hexadecimal representation of the 
storage address. When the second operand is a 
valid hexadecimal number, this number is added 
to the program origin. If the resulting storage 
address is on a halfword boundary and is not 
greater than the user's virtual machine's 
storage size, the breakpoint is set. 



How Break£ointina Works 



When the debug program sets a breakpoint, it 
saves the contents of the halfword at the 
location specified by the second operand of the 
BREAK subcommand. This halfword is replaced by 
B2Ex, where x is the hexadecimal equivalent of 
the identification number, specified in, the 
first operand of the BREAK subcommand. The 
storage location specified for a breakpoint must 
contain an operation code. It is your 
responsibility to see that breakpoints are set 
only at locations containing operation codes. 
After breakpoints are set and during program 
execution, the value B2E0 through B2EF is 
encountered at a location where an operation 
code should appear. A program check occurs 
because all values B2E0 through B2EF are invalid 
operation codes and control is transferred to 
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the debug environaent. DEBUG recognizes the 
invalid operation code as a breakpoint. The 
original operation code replaces the invalid 
operation code, and a nessage 

DMSDBG728I DEBUG ENTERED 
BREAKPOIMT yy AT XXXXXX 

appears at the terminal. "yy" is the breakpoint 
identification number and xxxxxx is the storage 
address of the breakpoint. After the message is 
displayed, the keyboard is unlocked to accept 
any DEBUG subcommands except RETURN. A 
breakpoint is cleared when it is encountered 
during program execution. 



It is your responsibility to ensure that 
breakpoints are set only at operation code 
locations. Otherwise, the breakpoint is not 
recognized; data or some part of the instruction 
other than the operation code is overlaid. 
Thus, errors may be generated if breakpoints are 
set at locations that do not contain operation 
codes. 



l£E2E Messages 



The following error messages may appear 
entering the BREAK subcommand. 



while 



INVALID OPERAND 

This message indicates that the breakpoint 
identification number specified in the first 
operand is not a decimal number between and 
15 inclusive, or the second operand cannot be 
located in the DEBUG symbol table and is not 
a valid hexadecimal number. If the second 
operand is intended to be a symbol, a DEF 
subcommand must have been previously issued 
for that symbol; if not, the operand must be 
a valid hexadecimal storage location. 

INVALID STORAGE REFERENCE 

The location indicated by the second operand 
is uneven (not on a halfword boundary) or the 
sum of the second operand and the current 
origin value is greater than the virtual 
machine's virtual storage size. If the 
current origin value is unknown, it may be 
reset to the desired value by issuing the 
ORIGIN subcommand. 

MISSING OPERAND 

The minimum number of operands has not been 
supplied. 

TOO MANY OPERANDS 

You entered more than two operands. 
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CAW 



Use the CAN subcommand anytime the virtual 
machine is in the debug environment. Issue the 
CAW subcommand to check that the command address 
field contains a valid CCW address, or to find 
the address of the current CCW so that you can 
examine it. Issuing the CAW subcommand causes 
the contents of the CAW (channel address word) , 
as it existed at the time the debug environment 
was entered, to appear at the terminal. The CAW 
located at storage location X'48' is saved at 
the time the debug environment is entered and 
displayed on the terminal whenever the CAW 
subcommand is issued. If the subcommand is 
issued correctly, the contents of the CAW are 
displayed in hexadecimal representation at the 
terminal. 



The format of the CAW subcommand is: 



I 

L_. 



CAW I 



The CAW subcommand has no operands. 
The format of the CAW is: 



where : 

Bits 
0-3 



Contents 

The protection key for all commands 

associated with START I/O. The protection 

key in the CAW is compared with a key in 

storage whenever a reference is made to 

storage. 



1-7 This field is not 
binary zeros. 



used and must contain 



8-31 The command address field contains the 
storage address (in hexadecimal 
representation) of the first CCW (channel 
command word) associated with the next or 
most recent START I/O. 

The three low-order bits of the command 
address field must be zeros for the CCW to be on 
a doubleword boundary. If the CCW is not on a 
doubleword boundary or if the command address 
specifies a location protected from fetching or 
outside the storage of a particular virtual 
machine, START I/O causes the status portion of 
the CSW to be stored with the program check or 
protection check bit on. In this event, the I/O 
operation is not initiated. 



l££2I M§§a3SS 



I KEY I 0000 I Command Address 
3 4 7 8 



31 



The following error message may appear while 
entering the CAW subcommand. 

TOO HANY OPERANDS 

An operand was entered on the command line; 
the CAW subcommand has no operands. 
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csw 



where ; 



Use the CSH subcommand any time the virtual 
machine is in the debug environment. Issue the 
CSH subcommand whenever an I/O operation 
abnormally terminates. The status and residual 
count information in the CSH is very useful in 
debugging. Also, use the CSH to calculate the 
address of the last executed CCH (subtract 8 
bytes from the command address to find the 
address of the last CCH executed) . Issuing the 
CSH subcommand causes the contents of the CSH 
(channel status word) , as it existed at the time 
the debug environment was entered, to appear at 
the terminal. The CSH indicates the status of 
the channel or an input/output device, or the 
conditions under which an I/O operation 
terminated. The CSH is formed in the channel 
and stored in storage location X'40' when an I/O 
interrupt occurs. If I/O interruptions are 
suppressed, the CSH is stored when the next 
Start I/O, Test I/O, or Halt I/O instruction is 
executed. The CSH is saved when DEBUG is 
entered. 



Bits 
0-3 



If the subcommand is issued correctly, 
contents of the CSH are displayed at 
terminal in hexadecimal representation. 



The format of the CSH subcommand is; 



the 
the 



«-7 



8-31 



32-47 



18-63 



Contents 

The protection key is moved to the CSH 
from the CAH. It indicates the 
protection key at the time the I/O 
started. The contents of this field are 
not affected by programming errors 
detected by the channel or by the 
condition causing termination of the 
operation . 



This field is not used and 
binary zeros. 



must contain 



I CSH I 



The command address contains a storage 
address (in hexadecimal representation) 
eight bytes greater than the address of 
the last CCH executed. 

The status bits indicate the conditions 
in the device or channel that caused the 
CSH to be stored. 

The residual count is the difference 
between the number of bytes specified in 
the last executed CCH and the number of 
bytes that were actually transferred. 
Hhen an input operation is terminated, 
the difference between the original count 
in the CCH and the residual count in the 
CSH is egual to the number of bytes 
transferred to storage; on an output 
operation, the difference is egual to the 
number of bytes transferred to the I/O 
device. 



The CSH subcommand has no operands. 
The format of the CSH is: 



l££2£ Messages 



The following error message may appear when you 
enter the CSH subcommand. 



|KEY|0000| Command Address | Status | Byte Count | 
3 4 7 8 



31 32 47 48 



63 



TOO HAMY OPERANDS 

An operand was entered on the command line; 
the CSH subcommand has no operands. 
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DEFINE 



Use the DEFINE subcoBiand to assign syabollc 
names to a specific storage address. Once a 
synbolic nane is assigned to a storage address, 
that synbolic nane can refer to that address in 
any of the other DEBUG subcoanands. However, 
the symbol is valid only in the debug 
environment. 



bytecount 

is a decimal number, from 1 through 56, which 
specifies the length in bytes of the field 
whose name is specifed by the first operand 
(symbol) and whose starting location is 
specified by the second operand (hexloc) . 
nhen the bytecount operand is not specified, 
a default bytecount of H is assumed. 



Issuing the DEFINE subcommand creates an 
entry in the DEBUG symbol table. The entry 
consists of the symbol name, the storage 
address, and the length of the field. & maximum 
of 16 symbols can be defined in the DEBUG symbol 
table at a given time. 

When a DEFINE subcommand specifies a symbol 
that already exists in the DEBUG symbol table, 
the storage address derived from the current 
request replaces the previous storage address. 
Several symbols may be assigned to the same 
storage address, but each of these symbols 
constitutes one entry in the DEBUG symbol 
table. The symbols remain defined until a new 
DBF is issued for them or until an IPL request 
loads a new copy of CHS. 

The format of the DEFINE subcommand is: 



I DEFine | symbol hexloc 



I bytecounti 

t 1 I 

I. J 



where: 



symbol 
is the 
address 
hexloc. 
long. 



name to be assigned to the storage 
derived from the second operand. 
Symbol may be from 1 to 8 characters 
It must contain. . at least one 
nonhexadecimal character. Any symbolic name 
longer than eight characters is 
left-justified and truncated on the right 
after the eighth character. 

hexloc 

is the hexadecimal storage location, in 
relation to the current origin, to which the 
name specified in the first operand (symbol) , 
is assigned. Hexloc, a hexadecimal number, 
is added to the current origin established by 
the OBIGIN subcommand. The sum of the second 
operand (hexloc) and the origin is the 
storage address to which the symbolic name is 
assigned. To assign the symbolic name to the 
correct location be sure to know the current 
origin. The existing DEBUG symbol table 
entries remain unchanged when the OBIGIN 
subcommand is issued. 



j££2£ i!S§§§3§§ 



The following error messages may appear when the 
DEFINE subcommand is issued: 

INVALID OPERAND 

This message indicates that the name 
specified in the first operand contains all 
numeric characters, the second operand is not 
a valid hexadecimal number, or the third 
operand is not a decimal number between 1 and 
56 inclusive. 

INVALID STORAGE ADDRESS 

The sum of the second operand and the current 
origin is greater than the virtual machine^s 
storage size. If the current origin size is 
unknown, reset it to the desired value by 
issuing the OBIGIN subcommand and then 
reissue the DEF subcommand. 

16 SYMBOLS ALREADY DEFINED 

The DEBUG symbol table is full and no new 
symbols may be defined until the current 
definitions are cleared by obtaining a new 
copy of CMS. However, an existing symbol may 
be assigned to a new storage location by 
issuing another DEF subcommand for that 
symbol. 

HISSING OPERAND 

The DEFINE subcommand requires at least two 
operands and less than two were entered. 

TOO MANY OPERANDS 

Three is the maximum number of operands for 
the DEFINE subcommand and more than three 
were entered. 
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DOHP 



Use the DOHP subcommand to print part or all of 
a virtual machine's storage on the printer. 

The format of the DUMP subcommand is: 



DUmp 



I symboll | | symbol2 | 

I hexloci I I hexloc2 | [ident] 

I II * I 

•■ -« I 32 I 






where : 

symboll 

is the name assigned (via the DEFINE 
subcommand) to the storage address that 
begins the dump. 

hexloci 

is the hexadecimal storage location, in 
relation to the current origin, that begins 
the dump. 

symbol2 

is the name assigned (via the DEFINE 
subcommand) to the storage address that ends 
the dump. 

hexloc2 

is the hexadecimal storage location, in 
relation to the current origin, that ends the 
dump. 

* indicates that the dump ends at the user's 
last virtual storage address. 

ident 

is the name (up to eight characters) that 
identifies this particular printout. 



The reguested information is printed offline 
as soon as the printer is available. First, a 
heading: 

ident FBOM starting location TO ending 
location 

is printed. Next, the general registers 
through 7 and 8 through 15, and the 
floating-point registers through 6 are 
printed. Then the specified portion of virtual 
storage is printed with the storage address of 
the first byte in the line printed at the left, 
followed by the alphameric interpretation of 32 
bytes of storage. 



The first and second operands specify the 
starting and ending addresses, respectively, of 
the area of storage to be dumped. If you issue 
DUMP without the first and second operands, 32 
bytes of storage are dumped starting at the 
current origin. If you issue DUMP without the 
second operand, 32 bytes of storage are dumped 
starting at the location indicated by the first 
operand. 

If you specify the first and second operands, 
they must be valid symbols or hexadecimal 
numbers. When you specify a symbol, the DEBUG 
symbol table is searched. If a match is found, 
the storage location corresponding to that 
symbol is the starting or ending address for the 
dump. Hhen a hexadecimal number is specified, 
it is added to the current origin to calculate 
the starting or ending storage address for the 
dump. The first and second operands must 
designate storage addresses that are not greater 
than the virtual machine's storage size. Also, 
the storage address derived from the second 
operand must be greater than the storage address 
derived from the first operand. An asterisk may 
be specified for the second operand. In this 
case, all of storage from the starting address 
(first operand) to the end of storage is printed 
on the printer. 



lEE^E flessaaes 



The following error messages may appear when you 
issue the DUMP subcommand. 



INVALID OPERAND 

This message is i 
specified by the seco 
that specified by th 
the first or secon 
located in the DEBUG 
valid hexadecimal num 
is intended to be 
subcommand must prev 
for that symbol; if 
specify a valid hexad 

INVALID STORAGE ADDRESS 



ssued if the 
nd operand is 1 
e first operand 
d operands ca 
symbol table and 
bers. If either 
a symbol, a 
iously have bee 
not, the opera 
ecimal location. 



address 

ess than 

, or if 

nnot be 

are not 

operand 

DEFINE 

n issued 

nd must 



The hexadecimal number specified in the first 
or second operand, when added to the current 
origin, is greater than the user's virtual 
storage size. If the current origin value is 
unknown, reset it to the desired value by 
issuing the ORIGIN subcommand and then 
reissue the DUMP subcommand. 

TOO MANY OPERANDS 

Three is the maximum number of operands for 
the DUMP subcommand; more than three operands 
were entered. 
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GO 



Use the GO subcommand to exit from the debug 
environment and begin execution in the CMS 
environment. The old PSW for the interruption 
that caused the debug environment to be entered 
is saved and later loaded to resume processing. 
Issuing the GO subcommand loads the old PSW. 

The format of the GO subcommand is: 



I symbol | 
I hexloc I 



I GO 
I 

I 

I _ 

where: 



symbol 

is the name, already assigned by the DEFINE 
subcommand, to a storage location where 
execution begins. 

hexloc 

is the hexadecimal location, in relation to 
the current origin, where execution begins. 

When the GO subcommand is issued, the general 
registers, CAW (channel address word) , and CSW 
(channel status word) are restored either to 
their contents upon entering the debug 
environment, or, if they have been modified 
while in the debug environment, to their 
modified contents. Then the old PSW is loaded 
and becomes the current PSW. Execution begins 
at the instruction address contained in bits 
40-63 of the PSW. 

By specifying an operand with the GO 
subcommand, you can alter the address where 
execution is to begin. This operand must be 
specified whenever the GO subcommand is issued 
if the debug environment is entered by issuing 
the DEBUG command. 

The operand may be a symbol or a hexadecimal 
location. When a symbol is specified, the DEBUG 
symbol table is searched. If a match is found, 
the storage address corresponding to the symbol 
replaces the instruction address in the old PSW. 
When a hexadecimal number is specified, it is 
added to the current origin to calculate the 
storage address that replaces the instruction 
address in the old PSW. In either case, the 
derived storage address must not be greater than 
the virtual machine's storage size. Further, it 
is your responsibility to make sure that the 
address referred to by the operand of the GO 
subcommand contains an operation code. 



If the debug environment was entered due to a 
breakpoint, external interruption, or program 
interruption, then the GO subcommand does not 
need an operand specifying the starting 
address. 



MEE2E Mess ag es 



The following error messages may appear while 
entering the GO subcommand. 

INVALID OPERAND 

An operand specified in the GO subcommand 
cannot be located in the DEBUG symbol table 
and is not a valid hexadecimal number. If 
the operand is intended to be a symbol, a 
DEFINE subcommand must have been previously 
issued for that symbol; if not, the operand 
must specify a valid hexadecimal storage 
location. 

INVALID STORAGE ADDRESS 



The address at w 
not on a halfwo 
an operation co 
address) or the 
current origin 
virtual machine 
current value is 
the desired va 
subcommand. 



hich execution is to begin is 
rd boundary (indicating that 
de is not located at that 
sum of the GO operand and the 

value is greater than the 
's storage size. If the 

unknown, it may be reset to 
lue by issuing the ORIGIN 



INCORRECT DEBUG EXIT 

The GO subcommand without an operand has been 
issued when DEBUG had not been entered due to 
a breakpoint or external interruption. The 
RETURN subcommand must be issued if DEBUG had 
been entered via the DEBUG command. 

TOO MANY OPERANDS 

The GO subcommand has a maximum of one 
operand; more than one operand was entered. 
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GPR 



Use the GPR subcommand to print the contents of 
one or more general registers at the terminal. 

The format of the GPR subcommand is: 



the register indicated by the second operand are 
typed at the terminal. Both operands must be 
decimal numbers from through 15 inclusive, and 
the second operand must be greater than the 
first. 



I GPR I regl 



[reg2] 






where: 



j££2£ Messages 



The following error messages may appear on the 
terminal when the GPR subcommand is entered. 



regl 

is a decimal number (from through 15) 
indicating the first or only general register 
whose contents are to be typed. 

reg2 

is a decimal number (from through 15) 
indicating the last general register whose 
contents are to be typed. This operand is 
optional and is only specified when more than 
one register's contents are to be printed. 

Hhen only one operand is specified, only the 
contents of that general register are typed at 
the terminal. When two registers are specified, 
the contents of all general registers from the 
register indicated by the first operand through 



IHViLID OPERAND 

The operand (s) specified are not decimal 
numbers from through 15, or the second 
operand is less than the first. 

MISSING OPERAND 

The GPR subommand requires at least one 
operand, and none was entered. 

TOO MANY OPERANDS 

The GPR subcommand has a maximum of two 
operands, and more than two operands were 
entered. 
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Ml 3I.E2L J9§ssaaes 

Use the HX subcomaand to close all open files The following error nessage aay appear on the 
and I/O devices, and to update the master file terainal while entering the HX subcomaand. 
directory. This subcomaand aay be issued 

whenever the keyboard is unlocked in the debug TOO MANY OPERANDS 
environment, regardless of the reason the debug 

environaent was entered. The HX subcoaaand has no operands, and one or 

more operands were entered. 
The format of the HX subcoaaand is: 

r 

I HX 

The HX subcommand has no operands. 
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OBIGIN 



Use the ORIGIN subconnand to set the origin 
equal to the program load point. The ORIGIN 
subcomiBand sets an origin or base address to be 
used in the debug environment. In all debug 
subcomnands, you can specify instruction 
addresses in relation to the program load point, 
rather than to 0. The hexadecimal location 
specified in DEBUG subcommands then represents a 
specific location within a program, the origin 
represents the storage location of the beginning 
of the program; and the two values added 
together represent the actual storage location 
of that specific point in the program. 

The format of the OBIGIN subcommand is: 



Any origin set by an remains in effect until 
another ORIGIN subcommand ORIGIN subcommand is 
issued, or until you obtain a new copy of CMS. 
Whenever a new ORIGIN subcommand is issued, the 
value specified in that subcommand overlays the 
previous origin setting. If you obtain a new 
copy of CMS (via IPL) , the origin is set to 
until a new ORIGIN subcommand is issued. 



l££OJE l!§ssa3es 



The following error messages may appear 
you enter the ORIGIN subcommand. 

INVALID OPERAND 



while 



I ORigin | / symbol \ 
I I \ hexloc ) 



where: 



The operand specified in the ORIGIN 
subcommand cannot be located in the DEBUG 
symbol table and is not a valid hexadecimal 
number. If the operand is intended to be a 
symbol, a DEFINE subcommand must have been 
previously issued for that symbol; if not, 
the operand must specify a valid hexadecimal 
location. 



symbol 

is a name that was previously assigned (via 
the DEFINE subcommand) to a storage address. 



hexloc 

is a hexadecimal location within 
of the virtual machine's storage. 



the limits 



When the ORIGIN subcommand specifies a 
symbol, the DEBUG symbol table is searched. If 
a match is found, the value corresponding to the 
symbol becomes the new origin. Hhen a 
hexadecimal location is specified, that value 
becomes the origin. In either case, the operand 
cannot specify an address greater than the 
virtual machine's storage size. 



INVALID STORAGE ADDRESS 

The address specified by the ORIGIN operand 
is greater than the user's virtual storage 
size. 

MISSING OPERAND 

The ORIGIN subcommand requires one operand, 
and none was entered. 

TOO MANY OPERANDS 

The ORIGIN subcommand requires only one 
operand, and more than one was entered. 
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PSH 



Use the PSW subcommand to type the contents of 
the old PSH (program status word) for the 
Interruption that caused DEBUG to be entered. 

The format of the PSH subcommand is: 



PSH 



The PSH subcommand has no operands. 

If DEBUG was entered due to an external 
interrupt, the PSH subcommand causes the 
contents of the external old PSH to be typed at 
the terminal. If a program interrupt caused 
DEBUG to be entered, the contents of the program 
old PSH are typed. If DEBUG was entered for any 
other reason, the following is typed in response 
to the PSH subcommand: 

01000000 xxxxxxxx 



where the 1 in the first byte means that 

external interruptions are allowed and xxxxxxxx 

is the hexadecimal storage address of the DEBUG 
program. 



The PSH contains some information not 
contained in storage or registers but required 
for proper program execution. In general, the 
PSH controls instruction sequencing and holds 
and indicates the status of the system in 
relation to the program currently executing. 



j££2£ li£§§lS£§ 



The following error message may appear while 
entering the PSH subcommand. 

TOO MAMY OPERANDS 

The PSH subcommand has no operands and one or 
more was entered. 



Section t. Diagnostic Aids 579 



RETURN 



Use the RETURN subcommand to exit from the debug 
environment to the CMS command environment. 
RETURN should be used only when DEBUG is entered 
by issuing the DEBUG command. 

The format of the RETURN subcommand is: 



ready message followed by a carriage return and 
an unlocked keyboard indicates that the RETURN 
subcommand has successfully executed and that 
control has transferred from the DEBUG 
environment to the CMS command environment. 



Error Messages 



I RETurn 



The RETURN subcommand has no operands. 



When RETUB 
contained in 
DEBUG was en 
information w 
environment, 
restored. In 
error code reg 
is then made 
register ^H, t 
DEBUG is ente 
register 14 c 
CMS service 
directly to t 



N is issued, the information 
the general registers at the time 
tered is restored or, if this 
as changed while in the debug 

the changed information is 
either case, register 15, the 
ister, is set to zero. a branch 
to the address contained in 
he normal CMS return register. If 
red by issuing the DEBUG command, 
ontains the address of a central 

routine and control transfers 
he CMS command environment. The 



The following error messages may appear while 
entering the RETURN subcommand. 

TOO MANY OPERANDS 

The RETURN subcommand has no operands, and 
one or more were specified. 



INCORRECT DEBUG EXIT 

If DEBUG is entered due to a program or 
external interruption, a breakpoint or an 
unrecoverable error, this message is 
displayed in response to the RETURN 
subcommand. To exit from the DEBUG 
environment under the above circumstances, 
issue GO. 
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SET 

Use the SET subconaand to change the contents of 
the control words and general registers that are 
saved when the debug environment is entered. 
The contents of these registers are restored 
when control transfers from DEBUG to another 
environment. If register contents were modified 
in DEBUG, the changed contents are stored. 

The format of the SET subcommand is: 



I SET I /CAN 

I I JCSH 

I I S PSW 

I I ( GPR 

where: 



hexinf o 

hexinfo [ hexinfo] 

hexinf o [hexinfo] 

reg hexinfo 



[hexinfo] 



CiW hexinfo 

indicates that the specified information 
(hexinfo) is stored in the CAN (channel 
address word) that existed at the time DEBUG 
was entered. 

CSH hexinfo [hexinfo] 

indicates that the specified information 
(hexinfo [hexinfo]) is stored in the CSW 
(channel status word) that existed at the 
time DEBUG was entered. 

PSW hexinfo [hexinfo] 

indicates that the specified information 
(hexinfo [hexinfo]) is stored in old PSW 
(program status word) for the interruption 
that caused DEBUG to be entered. 



The SET subcommand can change the contents of 
one or two general registers each time it is 
issued. Hhen four or less bytes of information 
are specified, only the contents of the 
specified register are changed. When more than 
four bytes of information is specified, the 
contents of the specified register and the next 
seguential register are changed. For example, 
the SET subcommand: 

SET GPR 2 xxxxxxxx 

changes only the contents of general register 
2. But, the SET subcommand: 

SET GPR 2 xxxxxxxx xxxxxxxx 

changes the contents of general registers 2 
and 3. 

The number of bytes that can be stored using 
the SET subcommand varies depending on the form 
of the subcommand. With the CAR form, up to 
four bytes of information may be stored. With 
the CSW, GPR, and PSW forms, up to eight bytes 
of information may be stored, but these bytes 
must be represented in two operands of four 
bytes each. When two operands of information 
are specified, the information is stored in 
consecutive locations (or registers) , even if 
one or both operands contain less than four 
bytes of information. 

The contents of registers changed using the 
SET subcommand are not displayed after the 
subcommand is issued. To inspect the contents 
of control words and registers, the CAW, CSW, 
PSW, or GPR subcommands must be issued. 



GPR reg hexinfo [hexinfo] 

indicates that the specified information 
(hexinfo [hexinfo]) is stored in the 
specified general register (reg) . 



j££5£ Messages 



Each hexinfo operand s 
four bytes long. If an 
four bytes and contains 
hexadecimal digits (re 
information) , the informat 
and the left half of the 
zero. If more than eight 
specified in a single ope 
is left-justified and tr 
after the eighth digit. 



hould be from one to 
operand is less than 
an uneven number of 
presenting half-byte 
ion is right- justified 
uneven byte is set to 
hexadecimal digits are 
rand, the information 
uncated on the right 



The SET subcommand can only change the 
contents of one control word at a time. For 
example, the SET subcommand must be issued three 
times: 

SET CAW hexinfo 

SET CSW hexinfo [hexinfo] 

SET PSW hexinfo [ hexinfo] 

to change the contents of the three control 
words. 



The following error messages 
entering the SET subcommand. 

INVALID OPERAND 



may appear while 



The first operand is not CAW, CSW, PSW, or 
GPR, or the first operand is GPR and the 
second operand is not a decimal number 
between and 15 inclusive, or one or more of 
the hexinfo operands does no,t contain 
hexadecimal information. 

MISSING OPERAND 

The minimum number of operands has not been 
entered. 

TOO MANY OPERANDS 

More than the reguired number of operands 
were specified. 
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STORE 



Use the STORE subcofflnand to store up to 12 bytes 
of hexadecimal infornatlon in any valid virtual 
storage address. The information is stored 
starting in the location derived from the first 
operand (symbol or hexloc) . 

The format of the STORE subcommand is: 



STore I (symbol) hexinfo [ hexinf o [ hexinf o ] ] 
I (hexloc/ 



where: 



The STORE subcommand can store a maximum of 
12 bytes at one time. By specifying all three 
information operands, each containing four bytes 
of information, the maximum 12 bytes can be 
stored. If less than four bytes are specified 
in any or all of the operands, the information 
given is arranged into a string of consecutive 
bytes, and that string is stored starting at the 
location derived from the first operand. Stored 
information is not typed at the terminal. To 
inspect the changed contents of storage after a 
STORE subcommand, issue an X subcommand. 



^LE2E Messages 



symbol 

is the name assigned (via the DEFINE 
subcommand) to the storage address where the 
first byte of specified information is 
stored. 

hexloc 

is the hexadecimal location, relative to the 
current origin, where the first byte of 
information is stored. 

hexinfo 

is any hexadecimal information, four bytes or 
less in length, to be stored. 



The following error messages nay appear on the 
terminal while entering the STORE subcommand. 



If 

nonhexad 
table is 
If a mat 
or if 
hexadeci 
added to 
storage 
greater 
size. 



the first 

ecimal chara 

searched for 

ch is found i 

the first 

mal character 

the specified 

address is u 

than the v 



operand contains any 
cters, the DEBUG symbol 

a matching symbol entry, 
n the DEBUG symbol table, 

operand contains only 
s, the current origin is 

operand and the resulting 
sed, provided it is not 
irtual machine's storage 



INVALID OPERAND 

The first operand cannot 
DEBUG symbol table and 
hexadecimal number, or 
specified in the second. 



be located in the 
is not a valid 
the information 
third, or fourth 
operands is not in hexadecimal format. If 
the first operand is intended to be a symbol, 
a DEFINE subcommand must have been previously 
issued for that symbol; if not, the operand 
must specify a valid hexadecimal storage 
location. 

INVALID STORAGE ADDRESS 

The current origin value, when added to the 
hexadecimal number specified as the first 
operand, gives an address greater than the 
user's virtual storage size. If the origin 
value is unknown, reset it to the desired 
value using the ORIGIN subcommand and reissue 
the STORE subcommand. 



The information to be stored is specified in 
hexadecimal format in the second through the 
fourth operands. Each of these operands is from 
one to four bytes (that is, two to eight 
hexadeciaml digits) long. If an operand is less 
than four bytes long and contains an uneven 
number of hexadecimal digits (representing 
half-byte information) , the information is 
right- justified and the left half of the uneven 
byte is set to zero. If more than eight 
hexadecimal digits are specified in a single 
operand, the information is left- justified and 
truncated on the right after the eighth digit. 



HISSING OPERAND 

Less than two operands were specified. 
TOO MANY OPERANDS 

More than four operands were specified, 
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Use the X subcommand to examine and display the 
contents of specific locations in virtual 
storage. The information is displayed at the 
terminal in hexadecimal format. 

The format of the X (examine) subcommand is: 







r 


T 


1 X 


I symbol 


1 n 

1 i§nat^ 


1 
1 




< 


L 


J 






r 


1 




hexloc 


1 n 

1 a 


1 
1 


1 


\ 


L 


J 



where: 

symbol 

is the name assigned (via the DEFINE 
subcommand) to the storage address of the 
first byte to be examined. 

hexloc 

is the hexadecimal location, in relation to 
the current origin, of the first byte to be 
examined. 



is a decimal number from 1 th 
specifies the number of bytes t 
If a symbol is specified wit 
operand, the length attribute a 
that symbol in the DEBUG 
specifies the number of bytes t 
If a hexadecimal location 
without a second operand, fo 
examined. 



rough 56 that 
o be examined, 
hout a second 
ssociated with 

symbol table 
o be examined. 

is specified 
ur bytes are 



The second operand of the X subcommand is 
optional. If specified, it indicates the 
number of bytes (up to a maximum of 56) whose 
contents are to be displayed. If the second 
operand is omitted and the first operand is a 
hexadecimal location, a default value of four 
bytes is assumed. If the second operand is 
omitted and the first operand is a symbol, 
the length attribute associated with that 
symbol in the DEBUG symbol table is used as 
the number of bytes to be displayed. 



l££2£ H^ssa^es 



The following error messages may appear on the 
terminal when the X subcommand is entered. 

INVALID OPERAND 



be located in the 
is not a valid 
second operand is 

1 through 56. If 



The first operand cannot 

DEBUG symbol table and 

hexadecimal number, or the 

not a decimal number from 

the first operand is intended to be a symbol, 

it must have been defined in a previous 

DEFINE subcommand; otherwise, the operand 

must specify a valid hexadecimal number. 



INVALID STORAGE ADDRESS 

The hexadecimal number specified in the first 
operand, when added to the current origin, is 
greater than the storage size of the machine 
being used. If the current origin value is 
unknown, reset it to the desired value by 
issuing the ORIGIN subcommand and reissue the 
X subcommand. 



The first operand of the subcommand 
specifies the beginning address of the 
portion of storage to be examined. If the 
operand contains any nonhexadecimal 
characters, the DEBUG symbol table is 
searched for a matching symbol entry. If a 
match is found, the storage address to which 
that symbol refers is the location of the 
first byte to be examined. If no match is 
found, or if the first operand contains only 
hexadecimal characters, the current origin as 
established by the ORIGIN subcommand is added 
to the specified operand and the resulting 
storage address is the location, of the first 
byte to be examined. The derived address 
must not be greater than the virtual 
machine's storage size. 



HISSING OPERAND 

No operands were entered; at least one is 
required. 



TOO MANY OPERANDS 

More than the maximum of two operands were 
entered. 
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SVCTRACE 



llli§IEE®*ili3 the Output 



Use the SVCTRACE command to trace internal 
transfers of information resulting from SVC 
(supervisor call) instructions. Issuing the 
SVCTRACE command causes switches to be set. 
These switches, in turn, cause information to be 
recorded at appropriate times. When the trace 
is terminated, the recorded information is 
printed at the system printer. 

The information recorded for a normal SVC 
call is: 

• Storage address of the SVC calling 
instruction 

• Name of the program being called 

• Contents of the SVC old PSW 

• Storage address of the return from the called 
program 

• The general registers and floating-point 
registers 

• The parameter list at the time the SVC is 
issued. 



The format of the SVCTRACE command is: 



ISVCTrace 
I 



fCN I 
lOFFj 



w her e : 

ON indicates tracing for all SVC calls. 

OFF discontinues all SVC tracing. 

The trace information is: 

• The general registers both before the 
SVC-called program is given control and after 
a return from that program. 

• The floating-point registers both before the 
SVC-called program is given control and after 
a return from that program. 

• The parameter list, as it existed when the 
SVC was issued. 

To terminate tracing set by the SVCTRACE 
command, issue the HO or SVCTRACE OFF command. 
Both SVCTRACE OFF and HO cause all trace 
information recorded up to the point they are 
issued to be printed at the system printer. 
SVCTRACE OFF can be issued only when the 
keyboard is unlocked to accept input to the CMS 
command environment. To terminate tracing at 
any other point in system processing, HO must be 
issued. If a HX subcommand to the DEBOG 
environment or a logout from the control program 
is issued before terminating SVCTRACE, the 
switches are cleared automatically and all 
recorded trace information is printed at the 
system printer. 



A variety of information is printed whenever the 

SVCTRACE ON 

command is issued. 

The first line of trace output starts with a 
minus sign (-) , a plus sign (+) , or an asterisk 
(*) . The format of the first line of trace 
output is: 



N/D = xxx/dd name FROM loc OLDPSW = pswl 
GOPSH = psw2 [RC = re] 



where: 



indicates information 
processing the SVC. 



recorded before 



+ indicates information recorded after 
processing the SVC, unless * applies. 

* indicates information recorded after 
processing a CMS SVC which had an error 
return. 

N/D is an abbreviation for SVC Number and Depth 
(or level) . 

XXX is the number of the SVC call (they are 
numbered sequentially) . 

dd is the nesting level of the SVC call. 

name is the macro or routine being called. 

loc is the program location from which the SVC 
was issued. 

psw1 is the PSW at the time the SVC was called. 

psw2 the PSW with which the routine (for 
example, RDBDP) being called is invoked, if 
the first character of this line is a minus 
sign (-) . If the first character of this 
line is a plus sign (+) or asterisk {*) , 
PSW2 represents the PSW which returns 
control to the user. 

re is the return code passed from the SVC 
handling routine in general register 15. 
This field is omitted if the first 
character of this line is a minus sign (-) , 
or if this is an OS SVC call. For a CMS 
SVC, this field is zero if the line begins 
with a plus sign (+) , and nonzero for an 
asterisk (*) . Also, this field equals the 
contents of Register 15 in the "GPRS AFTER" 
line. 
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The next two lines of output are the contents 
of the general registers when control is passed 
to the SVC handling routine. This output is 
identified at the left by "•GPHSB". The format 
of the output is: 

•GPRSB =hhhhhhhh *dddddddd* 
=hhhhhhhh *dddddddd* 



where: 



represents the contents of a general 
register in hexadecimal format. 



d represents the EBCDIC translation of 
contents of a general register. 



the 



The contents of general registers 0-7 are 
printed on the first line, with the contents of 
8-F on the second line. The hexadecimal contents 
of the registers registers are printed first, 
following by the EBCDIC. The EBCDIC translation 
translation is preceded and followed by an 
asterisk (*) . 

The next line of output is the contents of 
general registers 0, 1 and 15 when control is 
returned to the user's program. The output is 
identified at the left by "•GPRS AFTER :". The 
format of the output is: 



The next line of output is the contents of 
the caller's floating-point registers. The 
output is identified at the left by "•FPRS." The 
format of the output is: 



•FPRS = f f f f *gggg* 

where : 

f represents the hexadecimal contents of a 
floating-point register. 

£ is the EBCDIC translation of a 

floating-point register. 

Each floating-point register is a doubleword: 
each f and q represents a doubleword of data. 
The EBCDIC translation is preceded and followed 
by an asterisk (*) . 

The next line of output is the contents of 
floating-point registers when the SVC-handling 
routine is finished processing. The output is 
identified by "•FPRSS" at the left. The format 
of the output is: 



•FPRSS = f f f f *gggg* 
where: 



•GPRS AFTER : R0-R1 = h h *dd* R15 = h *d* 



where: 



represents the hexadecimal contents of a 
general register. 



is the EBCDIC translation of 
of a general register. 



the contents 



The only general registers that CHS routines 
alter are registers 0, 1, and 15 so only those 
registers are printed when control returns to 
the user program. The EBCDIC translation is 
preceded and followed by an asterisk (*) . 

The next two lines of output are the contents 
of the general registers when the SVC handling 
routine is finished processing. This output is 
identified at the left by "•gpRSS". The format 
of the output is: 



•GPRSS =hhhhhhbh *dddddddd* 
=hhhhhhhh ♦dddddddd* 

where : 

h represents the hexadecimal contents of a 
general register. 

d represents the EBCDIC translation of the 
contents of a general register. 



General registers 0-7 are printed on the first 
line with registers 8-F on the second line. The 
EBCDIC translation is preceded and followed by 
an asterisk (*) . 



f represents the hexadecimal contents of a 
floating-point register. 

g is the EBDCIC translation. 

Each floating-point register is a doubleword and 
each f and 3 represents a doubleword of data. 
The EBCDIC translation is preceded and followed 
by an asterisk (*) . 

The last two lines of output are only printed 
if the address in Register 1 is a valid address 
for the virtual machine. If printed, the output 
is the parameter list passed to the SVC. The 
output is identified by "•PARM" at the left. 
The output format is: 



•PARM =hhhhhhhh *dddddddd* 
=hhhhhhhh *dddddddd* 

w her e : 

h represents a word of hexadecimal data 

d is the EBCDIC translation. 

The parameter list is found at the address 
contained in register 1 before control is passed 
to the SVC-handling program. The EBCDIC 
translation is preceded and followed by an 
asterisk (♦) . 

Figure 66 summarizes the types of SVC trace 
output. 
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Identification | Comments 

+ 
♦ 



N/D 



The SVC and the routine which 
issued the SVC. 



•GPHSB 



•GPRS AFTER 



•GPRSS 



'FPRS 



•FPRSS 



• PARK 



[Contents of general registers 
when control passed to the 
SVC handling routine. 

IContents of general registers 
0, 1, and 15 when control 
is returned to the user 
program. 

[Contents of the general 
registers when the SVC 
handling routine is finished 
processing. 

[Contents of floating-point 
register before the 
SVC-called program is given 
control and after returning 
from that program. 

IContents of the floating- 
point registers when the SVC 
handling routine is finished 
processing. 

The parameter list, when one 
is passed to the SVC. 



Figure 66. Summary of SVC Trace Output Lines 



DASD DUMP RESTORE SERVICE PROGRAM AND HOW TO USE 
IT 



Use the DASD Dump Restore (DDR) service program 
to dump, restore, copy, display, or print VM/370 
user minidisks. The DDR program may run as a 
standalone program, or under CMS via the DDE 
command. 



INVOKING DDR UNDER CMS 



The format of the DDR command is: 



DDR 



[filename [filetype Ifilemode 
I * I 



I ] I 



where : 

filename filetype [filemode] 

is the identification of the file 
containing the control statements for the 
DDR program. If no file identification is 
provided, the DDR program attempts to 
obtain control statements from the 
console. The filemode defaults to ♦ if a 
value is not provided. 



INVOKING DDR AS A STANDALONE PROGRAM 



TO use DDR as a standalone program, load it from 
a real or virtual IPL device as you would any 
other standalone program. Then indicate where 
the DDR program is to obtain its control 
statements by responding to prompting messages 
at the console. 

see the "DDR Control Statements" discussion 
in the "CP Commands for Debugging" section. The 
control statements for running standalone and 
under CMS are identical, except that CMS ignores 
the SYSPRINT control statement. 
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SECTION 5. APPENDIXES 



Section 5 has nine appendixes: 

"Appendix A: VM/370 Coding Conventions" 

"Appendix B: CP and RSCS Equate Symbols" 

"Appendix C: CMS Equate Symbols" 

"Appendix D: DASD Record Formats" 

"Appendix E: VM/370 Restrictions" 

"Appendix F: Virtual Devices used in CMS" 

"Appendix G: Function Codes for DIAGNOSE Instructions" 

"Appendix H: CMS ZAP Service Program" 

"Appendix I: Applying PTFs" 
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APPENDIX A: VM/370 CODING CONVENTIONS 



CP CODING CONVENTIONS 



The following are coding conventions used 
by CP modules. This information should 
prove helpful if you debug, modify, or 
update CP. 



FOBMAT 

Column 

1 
10 
16 
31, 



36, 41, etc. 



Contents 
Labels 

Operation Code 
Operands 
Comments 



COMMENT 



Approximately 75 percent of the source 
code contains comments. sections of 
code performing distinctly separate 
functions are separated from each other 
by a comment section. 



CONSTANTS 

Constants fol 
precede the 
that contain 
Constants ar 
followed by 
initialized w 
working stora 
is identifie 
possible for 
than a page 
storage are 
which they ar 



low the executable 
copy files and/o 
DSECTs or system 

e defined in a 
a section c 

orking storage, fo 

ge. Each of these 

d by a comment, 
a module that is 

, constants and 
within the same 

e referenced. 



code and 

r macros 

equates. 

section 

ontaining 

llowed by 

sections 

Wherever 

greater 

working 

page in 



HO program modifies its own instructions 
during execution. 



own unlabeled 



No program uses its 
instructions as data. 

REGISTER USAGE 



- For CP: 

l^cfister Use 

6 ~ RCHBLOK, VCHBLOK 

7 RCUBLOK, VCUBLOK 

8 RDEVBLOK, VDEVBLOK 

10 lOBLOK 

11 VMBLOK 

12 Base register for modules 

called via SVC 

13 SAVEAREA for modules 

called via SVC 
1U Return linkage for modules 
called via BALR 



^ec[ister Use 

15 Base address for modules 
called via BALR 

For Virtual -to-Real address 
translation: 



E^^ister Use 

1 Virtual address 

2 Real address 



When describing an area of storage in 
mainline code, a copy file, or a macro, 
DSECT is issued containing DS 
instructions. 



Meaningful names are used instead of 
self-defining terms, for example 5, 
X'02', or CI' represent a quantity 
(absolute address, offset, length, 
register, etc.). All labels, 
displacements, and values are symbolic. 
All bits should be symbolic and defined 
by EQU. For example: 

VMSTATUS EQU X'02' 

- To set a bit, use: 

01 BYTE, BIT 

where BYTE = name of field, BIT is an 
EQU symbol. 

- To reset a bit, use: 

NI BYTE, 255-BIT 

- To set multiple bits, use: 

01 BYTE,BIT1+BIT2 

- All registers are referred to as: 

RO, R1, ... , R15 

- All lengths of fields or blocks are 
symbolic, that is, length of VMBLOK 
is: 

VMBLOKSZ EQU *-VMBLOK 



Avoid absolute relative addressing in 
branches and data references, (that is, 
location counter value (*) or symbolic 
label plus or minus a self -defining term 
used to form a displacement) . 
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When using a single operation to 
reference multiple values, specify each 
value referenced, for example: 

LM R2,RU,C0NT SET R2=C0N1 
SET R3=CON2 
SET R4=CON3 



C0N1 DC FM« 
C0N2 DC F»2» 
C0N3 DC F»3' 



For all RX instructions use ',' to 
specify the base register when indexing 
is not being used, that is: 

L R2,AB(,R4) 

To determine if your program is 
executing in a virtual machine or a real 
machine, issue the Store CPU ID (STIDP) 
instruction. If STIDP is issued from a 
virtual machine, the version number (the 
first byte of the CPUID field) returned 
will be X«FF« . 



Do not use PRINT NOGEN or PRINT OFF in 
source code. 



MODULE NAMES 

Control section names and 
references are as follows: 



external 



- The first three letters of the name 
are the assigned component code. 

Example: DMK 

- The next three letters of the module 
name identify the module and must be 
unique. 

Example: DSP 

- The preceding three-letter, unique 
module identifier is the label of the 
TITLE card. 

Each entry point or external reference 
must be prefixed by the six-letter 
unique identifier of the module. 

Example: DMKDSPCH 

TITLE Card Example: 



DSP TITLE 'DMKDSP 
VERSION v LEVEL 1' 



VM/370 DISPATCHER 



PTF Card Example: 

CP/CMS: PUNCH 'XXXXXXXX APPLIED' 

where xxxxxxxx = APAR number response 

ERROR MESSAGES 

There should not be any insertions into 
the message at execution time and the 
length of the message should be resolved 
by the assembler. If insertions must be 
made, the message must be assembled as 
different DC statements, and the insert 
positions are to be individually 
labeled. 



CP LOADLIST REQUIREMENTS 



The CP loadlist EXEC contains a list of CP 
modules used by the VMFLOAD procedures when 
punching the text decks that make up the CP 
system. All modules following DMKCPE in 
the list are pageable CP modules. Each UK 
page in this area may contain one or more 
modules. The module grouping governs the 
order in which they appear in the 
loadlist. An SPB* (Set Page Boundary) card 
is a loader control card which forces the 
loader to start this module at the next 
higher UK boundary. An SPB card is 
required only for the first module 
following DMKCPE. If more than one module 
is to be contained in a UK page, only the 
first can be assembled with an SPB card. 
The second and subsequent modules for a 
multiple module UK page must not contain 
SPB cards. 

If changes are made to the loadlist, 
care must be taken to ensure that any 
modules loaded together in the pageable 
area do not exceed the UK limit. Page 
boundary crossover is not allowed in the 
pageable CP modules. 

The position of two modules in the 
loadlist is critical. All modules 
following DMKCPE must be reenterable and 
must not contain any address constants 
referring to anything in the pageable CP 
area. DMKCKP must be the last module in 
the loadlist. 



lA 12-2-9 multipunch must be in column 1 of 
an SPB card. 
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IPPENDIX B: CP AND RSCS EfiOATE SYfiBOLS 



This appendix contains assembler language eguate symbols that reference CP and RSCS data 
for: 

• VM/370 Device Classes, Types, Models and Features 

• VM/370 Machine Usage 

• VM/370 Extended Control Registers 

• VM/370 CP Osage 

• VM/370 Registers 
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IMZ370 DEVICE CLASSES, TYPES, MODELS AND FEATURES 



CLASTERM 


EQU 


X«80» 


TYP2700 


EQU 


X«40» 


TYP2955 


EQU 


TYP2700 


TYPTELE2 


EQU 


X»20» 


TYPTTY 


EQU 


X»20» 


TYPIBM1 


EQU 


XMO» 


TYP2741 


EQU 


X«18' 


TYP1050 


EQU 


X» 1U» 


TYPUHDBF 


EQU 


X' 1C« 


TYPBSC 


EQU 


X«80« 


TYP3210 


EQU 


X'OO' 


TYP3215 


EQU 


TYP3210 


TYP2150 


EQU 


TYP3210 


TYP1052 


EQU 


TYP3210 


CLASGRAF 


EQU 


X'40' 


TYP2250 


EQU 


X«80» 


TYP2260 


EQU 


X«40» 


TYP2265 


EQU 


X»20' 


TYP3066 


EQU 


XMO« 


TYP1053 


EQU 


X«08« 


TYP3277 


EQU 


X«04» 


TYP3284 


EQU 


X«02» 


TYP3286 


EQU 


TYP3284 


TYP3158 


EQU 


TYP3277 


FTROPRDR 


EQU 


X'80» 


CLASDRI 


EQU 


X«20« 


TYPRDR 


EQU 


X»80' 


TYP2501 


EQU 


X«81» 


TYP2540R 


EQU 


X«82' 


TYP3505 


EQU 


X«84« 


TYP1U42R 


EQU 


X«88' 


TYP2520R 


EQU 


X • 9 • 


TYPTIMER 


EQU 


X«40« 


TYPTR 


EQU 


X'20« 


TYP2495 


EQU 


X'21» 


TYP2671 


EQU 


X«22' 


TYP1017 


EQU 


X«24' 


CLASORO 


EQU 


XMO' 


TYPPUN 


EQU 


X'80' 


TYP2540P 


EQU 


X«82» 


TYP3525 


EQU 


X'8a' 


TYP1442P 


EQU 


X'88« 


TYP2520P 


EQU 


X«90« 


TYPPRT 


EQU 


X»40» 


TYP1403 


EQU 


X»41' 


TYP3211 


EQU 


X'42' 


TYP1443 


EQU 


X'44' 


TYPTP 


EQU 


X'20» 


TYP1018 


EQU 


X»2tt' 


FTRUCS 


EQU 


X'01' 


CLASTAPE 


EQU 


X'08' 


TYP2U01 


EQU 


X«80» 


TYP2415 


EQU 


X»40' 


TYP2420 


EQU 


X'20' 


TYP3420 


EQU 


XMO' 


TYP3410 


EQU 


X'08' 


TYP3U11 


EQU 


TYP3410 


FTR7TRK 


EQU 


X'80' 


FTRDLDNS 


EQU 


X«40' 


FTRTRANS 


EQU 


X«20« 


FTRDCOMV 


EQU 


XMO" 


CLASDASD 


EQU 


X'04' 


TYP2311 


EQU 


X»80' 


TYP2311 


EQU 


X'40« 


TYP2 319 


EQU 


TYP2314 



Teriminal Device Class 

2700 Bisync Line 

2955 Communications Line 

Telegraph Terminal Control Type II 

TELETYPE Terminal 

IBM Terminal Control Type I 

2741 Communications Terminal 

1050 Communications Terminal 

Terminal device type is undefined 

Bisync Line for 3270 Remote Stations 

3210 Console 
3215 Console 
2150 Console 

1052 Console 
Graphics Device Class 
2250 Display Unit 
2260 Display Station 
2265 Display station 
3066 Console 

1053 Printer 

3277 Display Station 

3284 Printer 

3286 Printer 

3158 Console 

Operator ID Card Reader 

Unit Record Input Device Class 

Card Reader Device 

2501 Card Reader 

2540 Card Reader 

3505 Card Reader 

1442 Card Reader/Punch 

2520 Card Reader/Punch 

Timer Device 

Tape Reader Device 

2495 Magnetic Tape Cartridge Reader 

2671 Paper Tape Reader 

1017 Paper Tape Reader 

Unit Record Output Device Class 
Card Punch Device 
2540 Card Punch 
3525 Card Punch 

1442 Card Punch 
2520 Card Punch 
Printer Type Device 
1403 Printer 

3211 Printer 

1443 Printer 
Tape Punch Device 

1018 Paper Tape Punch 
UCS Feature 

Magnetic Tape Device Class 
2401 Tape Drive 
2415 Tape Drive 
2420 Tape Drive 
3420 Tape Drive 

3410 Tape Drive 

3411 Tape Drive 
7-track Feature 
Dual Density Feature 
Translate Feature 

Data Conversion Feature 

Direct Access Storage Device Class 

2311 Disk Storage Drive 

2314 Disk Storage Facility 

2319 Disk Storage Facility 
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151/370 Device Classes, Tj£es, Models angl Features (continued) 



TrP2321 


EQU 


TYP2311 


TYP3330 


EQU 


X«10» 


TYP3333 


EQU 


TYP3330 


TYP3350 


EQU 


X«08» 


TYP2301 


EQU 


TYP2311 


TYP2303 


EQU 


TYP2311 


TYP2305 


EQU 


X»02» 


TYP3340 


EQU 


X'OT 


FTRRPS 


EQU 


X'80' 


FTREXTSN 


EQU 


X»40» 


FTR2311T 


EQU 


X«20« 


FTR2311B 


EQU 


X« 10« 


FTR35MB 


EQU 


X«08« 


FTR70MB 


EQU 


X«04» 


FTRRSRL 


EQU 


X«02» 


CLASSPEC 


EQU 


X'02' 


TYPCTCA 


EQU 


X'80» 


TYP3704 


EQU 


X»40« 


TYP3705 


EQU 


TYP3704 


TYPRSV1 


EQU 


X'02« 


TYPONSUP 


EQU 


X«01» 


FTRTYP1 


EQU 


X» 10* 


FTRTYP2 


EQU 


X«20« 



2321 Data Cell Drive 

3330 Disk Storage Facility 

3333 Disk Storage Facility 

3350 Disk Storage Facility 

3201 Parallel Drum 

2303 Serial Drum 

2305 Fixed Head Storage Device 

3340 Disk Storage Facility 

Rotational Positional Sensing (RPS) 
Installed (3340) 

Extended Sense Bytes (24 bytes) 
(= VDEV231T) Top half of 2314 used as 2311 
(= VDEV231B) Bottom half of 2314 used as 2311 

35 HB Data Module mounted (3340) 

70 HB Data Module mounted (3340) 

RESERVE/RELEASE are valid CCH op codes 

Special device class 

Channel-to-channel adapter 

3704 Programmable Communication control Unit 

3705 Programmable communications control unit 
Reserved by IBM 

Device unsupported by VM/370 

Type 1 Channel Adapter (3704/3705) 

Type 2 Channel Adapter (3704/3705) 
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VHZ370 MACHINE USAGE 



Bits Defined in Standard/Extended PSW 



EXTMODE EQU X«08' 

BCHEK EQU X'OU' 

WAIT EQU X«02« 

PROBMODE EQU X'01' 

lits fi^fined in Extended PSW 

PERMODE EQU X'40' 

TRAKMODE EQU X»04» 

lOMASK EQU X«02« 

EXTMASK EQU X'01' 



Bit 12 - Extended mode 

Bit 13 - Machine check enabled 

Bit 14 - Wait state 

Bit 15 - Problem state 



Bit 01 - PER enabled 

Bit 05 - Translate mode 

Bit 06 - Summary I/O mask 

Bit 07 - Summary external mask 



Bits Defined in Channel Status Word - CSW 



ATTN 

SM 

CUE 

BUSY 

CE 

DE 

UC 

UE 

PCI 

IL 

PRGC 

PRTC 

CDC 

CCC 

IFCC 

CHC 



EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 



X' 


80' 


X 


'40' 


X' 


20' 


X 


10' 


X" 


08' 


X 


•04' 


X' 


02' 


X 


•01' 


X' 


80' 


X 


•40' 


X' 


20' 


X 


•10' 


X' 


08' 


X 


•04* 


X 


02' 


X 


•01' 



Bit 32 - Attention 

Bit 33 - Status modifier 

Bit 34 - Control unit end 

Bit 35 - Busy 

Bit 36 - Channel end 

Bit 37 - Device end 

Bit 38 - Unit check 

Bit 39 - Unit exception 

Bit 40 - Program-control interruption 

Bit 41 - Incorrect length 

Bit 42 - Program check 

Bit 43 - Protection check 

Bit 44 - Channel data check 

Bit 45 - Channel control check 

Bit 46 - Interface control check 

Bit 47 - Chaining check 



Bits Defined in Channel Command Word - CCW 



CD 

CC 

SILI 

SKIP 

PCIF 

IDA 



EQU 
EQU 
EQU 
EQU 
EQU 
EQU 



X'80' 
X'40' 
X'20' 
X'10' 
X'08' 
X»04' 



Bit 32 - Chain data 

Bit 33 - Command chain 

Bit 34 - Suppress incorrect length indicator 

Bit 35 - Suppress Data Transfer 

Bit 36 - Program-control interruption fetch 

Bit 37 - Indirect data address 



Sits Defined in Sense B^te — Common to Most Devices 

Bit - Command reject 

Bit 1 - Intervention reguired 

Bit 2 - Bus out 

Bit 3 - Eguipment check 

Bit 4 - Data check 



CMDREJ 


EQU 


X'80' 


IHTREQ 


EQU 


X'40' 


BUSOUT 


EQU 


X'20' 


EQCHK 


EQU 


X'10' 


DATACHK 


EQU 


X'08' 
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YBZ370 EXTENDED CONTROL REGISTERS 



Bits Def . 


ined 


in CREG 
BYTE 






BLKMPX 


EQU 


X«80» 


Bit 


00 


SSMSUPP 


EQU 


X»40» 
BYTE 1 


Bit 


01 


PAGE4K 


EQU 


X»80' 


Bit 


08 


PAGE2K 


EQU 


X«40« 


Bit 


09 


SEG1H 


EQU 


X'10» 
BYTE 2 


Bit 


11 


CKCMASK 


EQU 


X«08' 


Bit 


20 


CPTMASK 


EQU 


X'04« 
BYTE 3 


Bit 


21 


INTHASK 


EQU 


X'BO' 


Bit 


24 


KEYMASK 


EQU 


X'40» 


Bit 


25 


SIGHASK 


EQU 


X'20' 


Bit 


26 


Bits Def: 


ili§d 


in CREG 9 
BYTE 






PERSUBH 


EQU 


X'80« 


Bit 


00 


PERIFET 


EQU 


X»40" 


Bit 


01 


PERSALT 


EQU 


X»20» 


Bit 


02 


PERGPRS 


EQU 


XMO" 


Bit 


03 


Bits Def: 


Lned 


in CREGJI4 
BYTE 






HARDSTOP 


EQU 


X»80» 


Bit 


00 


SYNCLOG 


EQU 


X'UO* 


Bit 


01 


lOLOG 


EQU 


X«20' 


Bit 


02 


RECOVRPT 


EQU 


X«08' 


Bit 


oa 


CONFGRPT 


EQU 


X'OU' 


Bit 


05 


DAHAGRPT 


EQU 


X«02' 


Bit 


06 


HARNGRPT 


EQU 


X»01» 
BYTE 1 


Bit 


07 


ASYNELOG 


EQU 


X«80« 


Bit 


08 


ASYNFLCG 


EQU 


X'UO' 


Bit 


09 



Enable block multiplexing 
Enable SSH suppression 



Use 4K pages 
Use 2K pages 
Use IH segnents 



Mask on clock comparator interruption 
Mask on CPU timer interruption 



Mask on interval timer interruption 
Mask on operator key interruption 
Mask on external signals 2-7 



Monitor successful branches 
Monitor instruction fetches 
Monitor storage alteration 
Monitor register alteration 



Check stop control 
Synchronous logout control 
I/O logout control 
Recovery report mask 
Configuration report mask 
External damage report mask 
Warning condition report mask 



Asynchronous extended logout control 
Asynchronous fixed logout control 
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l^lllQ. CP USAGE 



Bits Defined for TRANS Macro 



ERING 

DEFER 

LOCK 

lOERETN 

SYSTEM 



EQU 
EQU 
EQU 
EQU 
EQU 



X'80' 
X'40' 
X'20' 
X'lO' 
X»08' 



Bring requested page 

Defer execution until page in storage 

Lock page for I/O operation 

Return I/O errors to caller 

Call to DMKPTRAN for system virtual machine space 



Jauates for FARM Field for Calls to DMKBLDRT/DMKBLDRL 



DELSEGS EQU X»80» 

DELPAGES EQU X«40' 

NEWPAGES EQU X»08» 

NEMSEGS EQU X'04' 

KEEPSEGS EQU X»02' 

OLDVMSEG EQU X'OT 



Release the segment tables 

Release the page/swap tables 

Build new page/swap table 

Build new segment table 

Retain information in old segment table 

VMSEG pointer in VMBLOK valid 



Si.t§ Defined for Terminal 1^0 via DMKQCN 



ERRMSG 


EQU 


X' 


0800* 


NORET 


EQU 


X 


'0400' 


EFRET 


EQU 


X' 


0200' 


OPERATOR 


EQU 


X 


'0100* 


LOGDROP 


EQU 


X 


80" 


LOGHOLD 


EQU 


X 


'40* 


PRIORITY 


EQU 


X' 


20' 


VMGENIO 


EQU 


X 


MO" 


NOAUTO 


EQU 


X 


0U» 


ALARM 


EQU 


X 


'02» 


NOTIME 


EQU 


X' 


01* 


INHIBIT 


EQU 


X 


'08' 


EDIT 


EQU 


X" 


04' 


UCASE 


EQU 


X 


02' 



Output - Control program error message 
Output - Return immediately after call 
Output - Free buffer after queueing 
Output - Message for system operator 
Output - Logoff and drop line after message 
Output - Logoff and hold line after message 
Output - write this message immediately 
I/O request generated by virtual machine 
Output - suppress auto carriage return 
Output - sound the audible alarm 
Output - suppress time stamp on message 
Input - Prevent display of this data 
Input - Edit input data for corrections 
Input - Translate data to upper case 



laSiles for SeooI File Recovery Routine - DMKCKS 



RDRCHN 


EQU 


X'01' 


PCHCHN 


EQU 


X'02' 


PRTCHN 


EQU 


X'04' 


ADDSFB 


EQU 


X'08> 


CHGSFB 


EQU 


X' 10' 


DELSFB 


EQU 


X'20' 


OPNSFB 


EQU 


X'40» 


ACTSFB 


EQU 


X'80' 


CHGRDV 


EQU 


X'OIOO' 


CHGSHQ 


EQU 


X'0200' 


MONITOR 


"lass 


and Code 


MNCLPERF 


EQU 


X«00' 


MNCOSYS 


EQU 


X'OOOO' 


MNCOTH 


EQU 


X»0061' 


MNCOTT 


EQU 


X'0062' 


MNCOSUS 


EQU 


X'0063' 


MNCLRESP 


EQU 


X'OI* 


MNCOBRD 


EQU 


X'OOOO* 


MNCOHRIT 


EQU 


X'OOOI' 


MNCOERD 


EQU 


X'0002' 


MNCLSCH 


EQU 


X'02' 


BNCODQ 


EQU 


X'0002' 


MNCOAQ 


EQU 


X'0003' 


MNCOAEL 


EQU 


X'0004' 


MNCLUSER 


EQU 


X'04' 


MNCOUSER 


EQU 


X'OOOO' 



SFBLOK goes on reader chain 
SFBLOK goes on punch chain 
SFBLOK goes on print chain 
Add new SFBLOK to recovery cylinder 
Change existing SFBLOK 
Delete SFBLOK from checkpoint 
It is an open print-punch file 
File being printed or punched 
Change attributes of real device 
Checkpoint a SHQBLOK 



MONITOR PERFORM class 

PERFORM class; system performance 

MONITOR tape header record 

MONITOR tape trailer record 

MONITOR collection suspension record 

MONITOR RESPONSE class 

RESPONSE class; begin read code 

RESPONSE class; write code 

RESPONSE class; end read code 

MONITOR SCHEDULE class 

SCHEDULE class; drop queue code 

SCHEDULE class; add to queue code 

Schedule class; add to eligable list code 

MONITOR USER class 

USER class; user data 
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MONITOR Class and Code Definitions (continued) 



MHCLINST EQU 
MNCOSIM EQU 
MNCLDAST EQU 
HNCODASH EQU 
HNCODAS EQU 
HNCLSEEK EQU 
MHCOCYL EQU 
MNCLSYS EQU 
MHCODA EQU 



X»05' 

X'OOOO' 

X»06' 

X'OOOO" 

X»0001» 

X'07» 

X'OOOO" 

X"08" 

X"0002" 



MONITOR instruction simulation class 

INST class; instruction simulation code 

MONITOR DASD/TAPE class 

DASTAP class; first record 

DASTAP class; data records 

MONITOR DASD class 

DASD class; SEEKs code 

MONITOR SYSTEM PROFILE class 

SYS class; DASD data 
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YMZ370 REGISTERS 



Symbolic Register Eguates 

RO 

R1 

R2 

R3 EQU 3 I 

R4 EQU 1» I 

R5 EQU 5 I 

R6 

B7 EQU 7 General 

R8 EQU 8 Register 

R9 EQU 9 Definitions 

RIO 

R11 EQU 11 I 

R12 EQU 12 I 

R13 EQU 13 I 

RIU EQU U I 

R15 EQU 15 I 

YO EQU float in^ 

¥2 EQU 2 Point 



EQU 





EQU 


1 


EQU 


2 


EQU 


3 


EQU 


4 


EQU 


5 


EQU 


6 


EQU 


7 


EQU 


8 


EQU 


9 


EQU 


10 


EQU 


11 


EQU 


12 


EQU 


13 


EQU 


U 


EQU 


15 


EQU 





EQU 


2 


EQU 


4 


EQU 


6 


EQU 





EQU 


1 


EQU 


2 


EQU 


3 


EQU 


4 


EQU 


5 


EQU 


6 


EQU 


7 


EQU 


8 


EQU 


9 


EQU 


10 


EQU 


11 


EQU 


12 


EQU 


13 


EQU 


14 


EQU 


15 



Y4 EQU 4 Reaistei 

Y6 EQU 6 Defi ait ions 

CO EQU I 

CI EQU 1 I 

C2 EQU 2 I 

C3 EQU 3 I 

C4 EQU 4 I 

C5 

C6 

C7 EQU 7 Control 

C8 EQU 8 Register 

C9 EQU 9 Definitions 

CIO 

C11 

C12 

C13 EQU 13 I 

C14 EQU 14 I 

CIS EQU 15 I 
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APPEHDIX C: CMS EQUATE SlfilfiLS 



This appendix contains Assembler language equate synbols used in CBS to reference data 
for: 

• CMS Usage 

• CMS Registers 



CMS USAGE EQUATES 



Field 
Name 



Field Description 



li*.s Defined in the Program Status Hord (^SW) 



CHAHO 


EQU 


X»80' 


CHAN1 


EQU 


X»40« 


CHAN2 


EQU 


X»20' 


CHAN 3 


EQU 


X«10' 


CHAN4 


EQU 


X»08» 


CHANS 


EQU 


X'04« 


CHANM 


EQU 


X'02' 


EXTM 


EQU 


X'01* 


ECMM 


EQU 


X«08' 


MCKM 


EQU 


X«04» 


NAIT 


EQU 


X«02' 


PROB 


EQU 


X'01» 


FOFM 


EQU 


X'OB* 


DOFM 


EQU 


X'04' 


EUFM 


EQU 


X»02' 


SIGM 


EQU 


X»01« 



Bit 00 - Channel mask 
Bit 01 - Channel 1 mask 
Bit 02 - Channel 2 mask 
Bit 03 - Channel 3 mask 
Bit 04 - Channel H mask 
Bit 05 - Channel 5 mask 
Bit 06 - Input/output mask 
Bit 07 - External mask 

Bit 12 - Extended control mode mask 
Bit 13 - Machine check mask 
Bit 14 - Wait state mask 
Bit 15 - Problem state mask 

Bit 36 - Fixed-point overflow mask 
Bit 37 - Decimal overflow mask 
Bit 38 - Exponent underflow mask 
Bit 39 - significance mask 



J4:^§ DGJined in the Channel Status Word (£SH) 



ATTN 


EQU 


X'80' 


SH 


EQU 


X'40' 


CUE 


EQU 


X'20» 


BUSY 


EQU 


X»10« 


CE 


EQU 


X«08» 


DE 


EQU 


X'04» 


UC 


EQU 


X»02' 


UE 


EQU 


X'01* 


PCI 


EQU 


X«80» 


ICL 


EQU 


X»40' 


PGC 


EQU 


X«20« 


PTC 


EQU 


X»10» 


CDC 


EQU 


X«08» 


CCC 


EQU 


X«04« 


ICC 


EQU 


X'02« 


CHC 


EQU 


X'01' 



Bit 32 ,- Attention 

Bit 33 - Status modifier 

Bit 34 - Control unit end 

Bit 35 - Busy 

Bit 36 - Channel end 

Bit 37 - Device end 

Bit 38 - Unit check 

Bit 39 - Unit exception 

Bit 40 - Program-controlled interruption 

Bit 41 - Incorrect length 

Bit 42 - Program check 

Bit 43 - Protection check 

Bit 44 - Channel data check 

Bit 45 - Channel control check 

Bit 46 - Interface control check 

Bit 47 - Chaining check 
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Field 






Mame 






Comion 


Channel 


Command Codes 


WRITE 


EQU 


X»01» 


BEAD 


EQU 


X'02« 


NOP 


EQU 


X«03» 


SENSE 


EQU 


X«04« 


HRDATA 


EQU 


X«05' 


BDDATA 


EQU 


X"06» 


SEEK 


EQU 


X»07« 


TIC 


EQU 


X«08' 


HRITE1 


EQU 


X'09« 


RDCONS 


EQU 


X'OA' 


SETS EC 


EQU 


X'23' 


SEARCH 


EQU 


X'31« 



Field Description 



Write 

Read 

No operation 

Sense 

Write data 

Read data 

Seek 

Transfer in channel 

Write and space 1 

Read from console 

Set sector 

Search ID equal 



iiis Defined in a Channel Command Word (CCW) 



CD 


EQU 


X'80' 


CC 


EQU 


X'UO' 


SILI 


EQU 


X'20« 


SKIP 


EQU 


XMO» 


PCIF 


EQU 


X'08' 


IDA 


EQU 


X«04« 



Bit 32 - Chain data 

Bit 33 - Command chain 

Bit 34 - Suppress incorrect length 

Bit 35 -■ Suppress data transfer 

Bit 36 - Cause program control interruption 

Bit 37 - Indirect data address 
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CMS REGISTER EQUATES 



Field 




JB.^ .=—:=_ 


Nane 






General 


Pur£Os 


e Registers 


RO 


EQU 





R1 


EQU 


1 


R2 


EQU 


2 


R3 


EQU 


3 


R4 


EQU 


4 


R5 


EQU 


5 


R6 


EQU 


6 


R7 


EQU 


7 


R8 


EQU 


8 


R9 


EQU 


9 


RIO 


EQU 


10 


R11 


EQU 


11 


R12 


EQU 


12 


R13 


EQU 


13 


R14 


EQU 


14 


R15 


EQU 


15 


Ploatina 


-Point 


Registers 


FO 


EQU 





F2 


EQU 


2 


FU 


EQU 


4 


F6 


EQU 


6 


Extended 


Control Registers 


CO 


EQU 





CI 


EQU 


1 


C2 


EQU 


2 


C3 


EQU 


3 


ct\ 


EQU 


4 


C5 


EQU 


5 


C6 


EQU 


6 


C7 


EQU 


7 


C8 


EQU 


8 


C9 


EQU 


9 


CIO 


EQU 


10 


C11 


EQU 


11 


C12 


EQU 


12 


CIS 


EQU 


13 


C1U 


EQU 


14 


C15 


EQU 


15 
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APPENDIX D: DASD RECORD FORMATS 



RECORD TRACK CYLINDER ONLY 

Record (8 bytes long) of all tracks other than track is initialized 
to X'OO*. 

32 Pages/cylinder 2314,2319 

• T — T r 1 1 r — I 1 

*|E0 00 00 00 00 00 00 OOj 

t L L IL 1 I. 1. .. .K J 

I 

11100000 



57 pages/cylinder 3330 

I 1 r r 1 r — r — r 1 

|E0 00 00 00 00 00 00 00| 

I L L 1. 1 1 I l__J 



24 pages/cylinder 2305 
|E0 00 00 00 00 00 00 00| 



120 pages/cylinder 3350 (native mode) 
|F0 00 00 00 00 00 00 00| 

t L L L 1 1.. I. J. J 



Aii R^2§. Records, 4096 Bytes Each 

2314 and 2319 32 pages/cylinder 

3330 series 57 pages/cylinder 

2305 and 3340 24 pages/cylinder 

3350 120 pages/cylinder 

Cylinder contains less pages because this area is used by CP 



♦The first three pages of cylinder are always flagged in use. On all 
other cylinders, the first byte is a hexadecimal •OO" unless the disk 
area is flagged as bad. Record of all tracks other than track is 
initialized to hexadecimal 'OO*. 
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RECORD J (24 BYTES) 

IPL record — Puts system into wait state if storage device is initial 
program loaded. 

100020000 OOOOOOOC 03000000 20000000 00000000 000000001 



RECORD 2, 4096 BYTES 

Checkpoint record — This is the checkpoint program load at CP IPL time 
to retrieve and save control information for a warm start. 



RECORD 3 

4 byte key of VOLl 
80 byte data record 

Key 

I VOLl I 

Record 

~1-20 IE5D6D3F1 xx >xxF000 00000005 00000000| 

i I 

21-40 10040 >40| 

I I 

41-60 14000 >OOC3D7 F3F7F040 40404040 40 >40| 

I I 

where : 

xx->xx is a 6-byte label 

Bytes 13-16 contain a pointer to the VTOC 

Bytes 46-50 identify the system 

Bytes 52-55 contain a pointer to the active directory 
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RECORD 4 

1024 bytes Track Cylinder 

Allocation byte map - used to identify cylinder 1 usage. Each byte 
identifies one cylinder. 

r-> all 0<-T 

100000100 040200 >FF 0000 >0000| 

* 

* FF defines the last cylinder + 1 that can be allocated. This varies 
depending on the device. 

00 = temporary 

01 = permanent 

02 = T-disJc 

04 = directory 



RECORD 5 



44 bytes key Track 0, Cylinder 
96 bytes data area 

Format 4 OS DSCB type label - used to be compatible with OS. 



44 Key 96 Byte Data 



RECORD 6 



44 bytes key Track 0, Cylinder 
96 bytes data area 

Format 5 OS DSCB type label for compatibility with OS, 

I 05|05|05|05|00 | | OS FORMAT 5 LABEL | 

L 1 __!__!_ I J I 1 

44 Byte Key 96 Byte Data Area 



RECORD F3 

4096 bytes - 1 page, track or track 1 

F3 Record is reserved for CP system use. Referred to as filler record. 
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RECORD F4 



1624 bytes. Track 1 (2314, 2319 only) 



F4 used only on 2314 and 2319 devices to align Record 4 in proper 
position on track. 



RECORD 4 

824 bytes track 1, cylinder (2314, 2319 only) 
First segment of Record 4 to be used for paging, 

2314 RECORD LAYOUT 
CYLINDER 0, TRACK 



RO R1 R2 Key R3 R4 Key R5 Key 



R6 



|Page|I | Check| V |VOLl |Alloc| 
(Bit IP |Point|0|Label|Byte I 
IMap |L I |L| I Map I 

III 111 I I 

I 8 |24| 4096|4| 80 | 1024|44| 96 |44| 



IFormatj |Format| 
I 4 I I 5 I 
I II I 
I II I 
96 I 



Cylinder 0, Track ^ 



RO 



RF3 



RF4 



R4 



I 8 



I II PAGEI 

I — I I 
I I 4096 I 
J I I 



I FILLER I I 

I I — I 

I 1624 I 1824 



hhk CYLINDERS EXCEPT 0, TRACK 



RO 



R1 



R2 



I I 



{Page | | 

IBit Mapl—I I— I I 

I 8 I I 4096 I I 2472 | 

I 1 L I I i 

These records appear as above formats if cylinder is 0. 
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Track 1 



RO 



R2 



R3 



R4 



I I — I l~l I — I I 

I 8 II 162a I I 4096 I I 824 | 



Track 2 



RO 



R4 



R5 



I I — I ~|— I I 
I 8 I I 3272 I I 3296 | 



Track 3 




R6 



R7 



I—I I 
I 4096 I 11648 I 



Track 4 



RO 



R7 



R8 



I 1 — 1 I— I I 
I 8 I I 2448 I I 4096 | 

Note: Tracks to 4 are repeated for tracks 5 to 9 (R9-R16), 10 to 14, 
(R17-R24), and 15 to 19 (R25-R32) . The last record is R32. 



3330 SERIES RECORD LAYOUT 



CYLINDER 0, TRACK 



RO R1 R2 Key R3 R4 Key R5 Key 



R6 



RF3 



|Page|I | Check| V | V0L1 |Byte| |Forinat| 
IBit IP IPoint |0|Label|Map I I 4 | 

IHap |L I |L| I II I 

III 111 III I 



I 8 |24| 4096|4| 80 |1024|44| 96 | 44 | 



IFormat j 1 | 
I 5 I Page I 

I I I 

I I I 

96 14096} 



Section 5. Appendixes 



607 



AHY CYLINDEB EXCEPT 



Track 



RO 

I Page | 
IBit Mapl 



8 



R1 



I I 4096 I 



R2 



I I 



I 4096 



R3 



I I I 

1 — 1 I 

i I I 

I I 4096 I 



Track_J8 

RO 
I 



H55 



R56 



R57 



I — I 1—1 I — I I 
I II II II I 

I 8 I I 4096 I I 4096 | | 4096 ( 



2305 MODEL 1 AMD MODEL 2 



CILINDER 0, TRACK 



RO R1 R2 Key R3 R4 Key R5 Key 



R6 



RF3 



-.J , ., , ^ — ^ ^ 

|Page|I |Check | V | VOLl |Byte| | Format! | Format | 1 | 



IBit IP |Point|0|Label|Map | I 4 I I 5 

IHap |L I |L| III II 

III lil III 11 

I 8 |24| 4096|4| 80 |1024|44| 96 |44| 



IPagel 

t I 

I I 

96 140961 



AHY CYLINDER EXCEPT 



Track 



RO 

I Page | | 
IBit Mapl — I 

I I i 
I 8 I 

Track_7 
RO 



R1 



R2 



R3 



II II I 

I — I I — I I 

i II II I 

I 4096 I I 4096 | | 4096 | 



R22 



I 

I 
I 
I 8 



I 
I 
I 
V 

T r 
I— I 



R23 



R24 



I — I 

II II 

I I 4096 I I 4096 



I— I I 
I I I 
I I 4096 I 
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3340 SERIES RECORD LAYOUT 



CILINDER 0, TRACK 



RO R1 R2 Key R3 R4 Key R5 Key 



R6 



|Page|I |Check | V | VOLI |Byte| |Format| |Forniat| 
I Bit |P I Point I C| Label I Map 114 I I 5 | 

IMap |L I |L| III II I 

III lil III 11 I 

i 8 |24| U096|4| 80 |102U|4U| 96 | 44 | 96 | 



ANY CYLINDER EXCEPT 



Track 



RO 

{Page | 
|Bit Mapl- 
I I 
I 8 I 



R1 



R2 



I I I 
I I— I 
I II 

I 4096 I I 4096 



R3 

I I 
I — I 
I t 

I I 4096 



Track_JJ 


1 


RO 


1 

V 
R23 


1 1- 


1 

-1 


1 1 

1 8 1 

L,,. J 


1 

1 4096 

L 



R24 



I — I I 
I I I 
I I 4096 I 
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APPENDIX E: VM^370 RESTRICTIONS 



CP RESTRICTIONS 

A virtual machine created by VM/370 is capable of running an IBM 
Systejn/360 or Systein/370 operating system as long as certain VM/370 
restrictions are not violated. If your virtual machine produces 
unexpected results, be sure that none of the following restrictions are 
violated . 



DIMHICALLY MODIFIED CHANNEL PROGRAMS 

In general, virtual machines may not execute channel programs that are 
dynamically modified (that is, channel programs that are changed between 
the time the START I/O (SIO) is issued and the time the input/output 
ends, either by the channel program itself or by the CPU). However, 
some dynamically modified channel programs are given special 
consideration by CP: specifically, those generated by the Indexed 
Sequential Access Method (ISAM) running under OS/PCP, OS/MFT, and 
OS/MVT; those generated by ISAM running in an OS/VS virtual=real 
partition; and those generated by the OS/VS Telecommunications Access 
Method (TCAM) Level 5, with the VM/370 option. 

The self-modifying channel programs that ISAM generates for some of 
its operations receive special handling if the virtual machine using 
ISAM has that option specified in its VM/370 directory entry. There is 
no such restriction for DOS ISAM, or for ISAM if it is running in an 
OS/VS virtual=virtual partition. If ISAM is to run in an OS/VS 
virtual=real partition, you must specify the ISAM option in the VM/370 
directory entry for the OS/VS virtual machine. 

Virtual machines using OS/VS TCAM (Level 5, generated or invoked with 
the VM/370 option) issue a DIAGNOSE instruction when the channel program 
is modified. This instruction causes CP to reflect the change in the 
virtual CCW string to the real CCW string being executed by the channel. 
CP is then able to execute the dynamically modified channel program 
properly. 

The restriction against dynamically modified channel programs does 
not apply if the virtual machine has the virtual=real performance option 
and the NOTRANS option has been set on. 



i3INiPISK RESTRICTIONS 

The following restrictions exist for minidisks: 

1. In the case of read home address with the skip bit off, VM/370 
modifies the home address data in user storage at the completion of 
the channel program because the addresses must be converted for 
minidisks; therefore, the data buffer area may not be dynamically 
modified during the input/output operation. 
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2. On a minidisk, if a CCW string uses multitrack search on 
input/output operations, subsequent operations to that disk must 
have preceding seeks or continue to use multitrack operations. 
There is no restriction for dedicated disks. 

3. OS/PCP, MFT, and MVT ISAM or OS/VS ISAM running virtual=real may be 
used with a minidisk only if the minidisk is located at the 
beginning of the physical disk (that is, at cylinder zero) . There 
is no such restriction for DOS ISAM or OS/VS ISAM running 
virtual= virtual. 

4. VM/370 does not return an end-of-cylinder condition to a virtual 
machine that has a virtual 2311 mapped to the top half (that is, 
tracks through 9) of 2314 or 2319 cylinders. 

5. If the user's channel program for a minidisk does not perform a 
seek operation, then to prevent accidental accessing, VM/370 
inserts a positioning seek operation into the user's channel 
program. Thus, certain channel programs may generate a condition 
code (CC) of zero on a SIO instead of an expected CC of one, which 
is reflected to the virtual machine. The final status is reflected 
to the virtual machine as an interrupt. 

6. A DASD channel program directed to a 3330, 3340, or 3350 device may 
give results on dedicated drives which differ from results on 
minidisks having non-zero relocation factors if the channel program 
includes multiple-track operations and depends on a search ID high 
or a search ID equal or high to terminate the program. This is 
because the record count fields on the 3330, 3340, and 3350 must 
contain the real cylinder number of the track on which they 
reside. Therefore, a search ID high, for example, based on a low 
virtual cylinder number may terminate prematurely if a real record 
is encountered. 

Note: Minidisks with non-zero relocation factors on 3330, 3340, and 

3350 devices are not usable under OS and OS/VS systems. This is 

because the locate catalog management function employs a search ID 
equal or high CCH to find the end of the VTOC. 

7. The IBCDASDI program cannot assign alternate tracks for a 333 0, 
3340, or 3350 minidisk. 

8. If the DASD channel programs directed to 3330/3340/3350 devices 
include a write record R (0) , results differ depending on whether 
the 3330/3340/3350 is dedicated (this includes a minidisk defined 
as the entire device) or nondedicated. For a dedicated 
3330/3340/3350, a write R (0) is allowed, but the user must be aware 
that the track descriptor record may not be valid from one 
3330/3340/3350 to another. For a nondedicated 3330/3340/3350, a 
write record R (0) is replaced by a read record R (0) and the skip 
flag is set on. This could result in a command reject condition 
due to an invalid command sequence. 

9. When performing DASD I/O, if the record field of a search ID 
argument is zero when a virtual Start I/O is issued, but the search 
ID argument is dynamically read by the channel program before the 
search ID CCH is executed, then the real search ID uses the 
relocated search argument instead of the argument that was read 
dynamically. To avoid this problem, the record field of a search 
ID argument should not be set to binary zero if the search argument 
is to be dynamically read or if a search ID on record is not 
intended. 
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TIMING DEPENDENCIES 

Timing dependencies in input/output devices or programming do not 
function consistently under VM/370: 

1. The following telecommunication access methods (or the designated 
option) violate the restriction on timing dependency by using 
program-controlled interrupt techniques and/or the restriction on 
dynamically modified channel programs: 

• OS Basic Telecommunications Access Method (BTAM) with the 
dynamic buffering option. 

• OS Queued Telecommunications Access Method (QTAM) . 

• DOS Queued Telecommunications Access Method (QTAM). 

• OS Telecommunications Access Method (TCAM) . 

• OS/VS Telecommunications Access Method (TCAM) Level 4 or 
earlier, and Level 5 if TCAM is not generated or invoked with 
the VM/370 option. 

These access methods may run in a virtual=real machine with CCW 
translation suppressed by the SET NOTRANS ON command. Even if SET 
NOTRANS ON is issued, CCH translation will take place if one of the 
following conditions is in effect: 

• The channel program is directed at an a nondedicated device 

(such as a spooled unit record device, a virtual CTCA, a 
minidisk, or a console) . 

• The channel program starts with a SENSE operation code. 

• The channel program is for a dialed terminal. 

• START I/O tracing is in effect. 

• The CAW is in page zero or beyond the end of the virtual=real 
area. 

(OS BTAM can be generated without dynamic buffering, in which case 
no virtual machine execution violations occur. However, the BTAM 
reset poll macro will not execute under VM/370 if issued from third 
level storage. For example, a reset poll macro has a NOP effect if 
executed from a virtual=virtual storage under VSI which is running 
under VM/370.) 

2. Programming that makes use of the PCI channel interrupt for channel 
program modification or processor signalling must be written so 
that processing can continue normally if the PCI is not recognized 
until I/O completion or if the modifications performed are not 
executed by the channel. 

3. Devices that expect a response to an interrupt within a fixed 
period of time may not function correctly because of execution 
delays caused by normal VM/370 system processing. An example of 
such a device is the IBM 1419 Magnetic Character Header. 

4. The operation of a virtual block multiplexer channel is timing 
dependent. For this reason, the channel appears available to the 
virtual machine operating system, and channel available interrupts 
are not observed. However, operations on virtual block-multiplexing 
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devices should use the available features like Rotational Position 
sensing to enhance utilization of the real channels. 



(CPU MODEL-DEPENDENT FUNCTIONS 

On the System/370 Model 158 only, the Virtual Machine Assist feature 
cannot operate concurrently with the 7070/7074 compatibility feature 
(Feature #7117) . 

Programs written for CPU model-dependent functions may not execute 
properly in the virtual machine under VM/370. The following points 
should be noted: 

1. Programs written to examine the machine logout area do not have 
meaningful data since VM/370 does not reflect the machine logout 
data to a virtual machine. 

2. Programs written to obtain CPU identification (via the Store CPU ID 
instruction, STIDP) receive the real machine value. When the STIDP 
instruction is issued by a virtual machine, the version code 
contains the value 255 in hexadecimal ("FF") to represent a virtual 
machine. 

3. Programs written to obtain channel identification (via the Store 
Channel ID instruction, STIDC) receive information from the virtual 
channel block. Only the virtual channel type is reflected; the 
other fields contain zeroes. 

4. No simulation of other CPU models is attempted by VM/370. 

VIRTUAL MACHINE CHARACTERISTICS 

Other characteristics that exist for a virtual machine under VM/370 are 
as follows: 

1. If the virtual=real option is selected for a virtual machine, 
input/output operations specifying data transfer into or out of the 
virtual machine's page zero, or into or out of storage locations 
whose addresses are greater than the storage allocated by the 
virtual=real option, must not occur. The storage-protect-key 
mechanism of the IBM System/370 CPU and channels operates in these 
situations but is unable to provide predictable protection to other 
virtual machines. In addition, violation of this restriction may 
compromise the integrity of the system. The results are 
unpredictable. 

2. VM/370 has no multiple path support and, hence, does not take 
advantage of the two-channel switch. However, a two-channel switch 
can be used between the IBM System/370 running a virtual machine 
under VM/370 and another CPU. 

3. The DIAGNOSE instruction cannot be issued by the virtual machine 
for its normal function. VM/370 uses this instruction to allow the 
virtual machine to communicate system services requests. The 
Diagnose interface requires the operand storage addresses passed to 
it to be real to the virtual machine issuing the DIAGNOSE 
instruction. For more information about the DIAGNOSE instruction in 
a virtual machine, see the YM/370: System Proc[rammer^s Guide. 
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4. A control unit normally never appears busy to a virtual machine. 
An exception exists when a forward space file or backward space 
file command is executed for a tape drive. Subsequent I/O 
operations to the same virtual control unit result in a control 
unit busy condition until the forward space file or backward space 
file command completes. If the real tape control unit is shared by 
more than one virtual machine, a control unit busy condition is 
reflected only to the virtual machine executing the forward space 
file or backward space file command. When a virtual machine 
attempts an I/O operation to a device for which its real control 
unit is busy, the virtual machine is placed in I/O wait 

(nondispatchable) until the real control unit is available. If the 
virtual machine executed a SIOF instruction (rather than SIO) and 
was enabled for block-multiplexing, it is not placed in I/O wait 
for the above condition. 

5. The CP IPL command cannot simulate self-modifying IPL sequences off 
dedicated unit record devices or certain self-modifying IPL 
sequences off tape devices. 

6. The VM/370 spooling facilities do not support punch-feed-read, 
stacker selection, or column binary operations. Detection of 
carriage control channels is supported for a virtual 3211 only. 

7. VM/370 does not support count control on the virtual 1052 
operator's console. 

8. Programs that use the integrated emulators function only if the 
real computing system has the appropriate compatibility feature. 
VM/370 does not attempt simulation. The DOS emulator running under 
OS or OS/VS is not supported under VM/370. 

9. The READ DIRECT and WRITE DIRECT instructions are not supported for 
a virtual machine. 

10. The System/370 SET CLOCK instruction cannot be simulated and, 
hence, is ignored if issued by a virtual machine. The System/370 
STORE CLOCK instruction is a nonprivileged instruction and cannot 
be trapped by VM/370; it provides the true TOD clock value from the 
real CPU. 

11. The 1050/1052 Model 2 Data Communication system is supported only 
as a keyboard operator's console. Card reading, paper tape I/O, 
and other modes of operation are not recognized as unique, and 
hence may not work properly. This restriction applies only when 
the 1050 system is used as a virtual machine operator's console. 
It does not apply when the 1050 system is attached to a virtual 
machine via a virtual 2701, 2702, or 2703 line. 

12. The pseudo-timer (usually device address OFF, device type TIMER) 
does not return an interrupt from a Start I/O; therefore, do not 
use EXCP to read this device. 

13. A virtual machine device IPL with the NOCLEAR option overlays one 
page of virtual machine storage. The IPL simulator uses one page 
of the virtual machine to initiate the IPL function. The starting 
address of the overlayed page is either the result of the following 
formula: 

virtual machine size 

= starting address of the overlayed page 

2 

or the hexadecimal value 20,000, whichever is smaller. 
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14. To maintain system integrity, data transfer sequences to and from a 
virtual system console are limited to a maximum of 2032 bytes. 
Channel programs containing data transfer sequences that violate 
this restriction are terminated with an interrupt whose CSW status 
indicates incorrect length and a channel program check. 

Note: A data transfer sequence is defined as one or more read or 
write CCWs connected via chain data. The introduction of command 
chaining defines the start of a new data transfer sequence. 

15. When an I/O error occurs on a device, the System/370 hardware 
maintains a contingent connection for that device until a SENSE 
channel command is executed and sense data is recorded. That is, no 
other I/O activity can occur on the device during this time. Under 
VM/370, the contingent connection is maintained until the SENSE 
command is executed, but I/O activity from other virtual machines 
can begin on the device while the sense data is being reflected to 
the virtual machine. Therefore, the user should be 'aware that on a 
shared disk, the access mechanism may have moved during this time. 

16. The mode setting for 7-track tape devices is maintained by the 
control unit. Therefore, when a virtual machine issues the SET 
MODE channel command to a 7-track tape device, it changes the mode 
setting of all 7-track tape devices attached to that control unit. 

This has no effect on virtual machines (such as OS or DOS) that 
issue SET MODE each time a CCW string is to be executed. However, 
it can cause a problem if a virtual machine fails to issue a SET 
MODE with each CCW string executed. Another virtual machine may 
change the mode setting for another device on the same control 
unit, thereby changing the mode setting of all 7-track tape devices 
attached to that control unit. 

17. 0S/VS2 is supported in uniprocessor mode only. 

18. A shared system or one that uses discontiguous saved segments 
cannot be loaded (via IPL) into a virtual machine running in the 
virtual=real area. 

19. The DUMMY feature for VSAM data sets is not supported and should 
not be used at program execution time. Specifying this option on 
the DLBL command will cause an execution-time OPEN error. See 
XM/370: System Messaaes for additional information. 



CMS KESTRICTIONS 

The following restrictions apply to CMS, the conversational subsystem of 
VM/370: 

1. CMS executes only on a virtual IBM System/370 provided by VM/370. 

2. The maximum sizes in cylinders of CMS minidisks are as follows: 



Disk 
2314/2319 


Maximum Cylinders CMS/VSAM 
203 200 


3330 Series 


246 404 


3340 Model 35 


349 348 


3340 Model 70/3344 


682 696 


3350 Series 


115 not supported in native mode 
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3. CMS employs the spooling facilities of VM/370 to perform unit 
record I/O. However, a program running under CMS can issue its own 
SIOs to attached dedicated unit record devices. 

4. Only those OS and DOS facilities that are simulated by CMS can be 
used to execute OS and DOS programs produced by language processors 
under CMS. 

5. Many types of object programs produced by CMS (and OS) languages 
can be executed under CMS using CMS's simulation of OS supervisory 
functions. Although supported in OS and DOS virtual machines under 
VM/370, the writing and updating of non-VSAM OS data sets and DOS 
files are not supported under CMS. 

6. CMS can read sequential and partitioned OS data sets and sequential 
DOS files, by simulating certain OS macros. 

The following restrictions apply when CMS reads OS data sets that 
reside on OS disks: 

• Read -password-protected data sets are not read. 

• BDAM and ISAM data sets are not read. 

• Multivolume data sets are read as single-volume data sets. 
End-of-volume is treated as end-of-file and there is no 
end-of -volume switching. 

• Keys in data sets with keys are ignored and only the data is 
read. 

• User labels in user- labeled data sets are bypassed. 

The following restrictions apply when CMS reads DOS files that 
reside on DOS disks: 

• Only DOS sequential files can be read. CMS options and operands 
that do not apply to OS sequential data sets (such as the MEMBER 
and COSCAT options of FILEDEF and the PDS option of MOVEFILE) 
also do not apply to DOS sequential files. 

• The following types of DOS files cannot be read: 

— DOS DAM and ISAM files. 

— Files with the input security indicator on. 

--DOS files that contain more than 16 user label and/or data 

extents. (If the file has user labels, they occupy the 

first extent; therefore the file must contain no more than 
15 data extents.) 

• Multivolume files are read as single-volume files. 
End-of-volume is treated as end-of-file. There is no 
end-of-volume switching. 

• User labels in user-labeled files are bypassed. 

• Since DOS files do not contain BLKSIZE, RECFM, or LRECL 
parameters, these parameters must be specified via FILEDEF or 
DCB parameters; otherwise, defaults of BLOCKSIZE=32760 and 
RECFM=U are assigned. LRECL is not used for RECFM=U files. 
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• CMS does not support the use of OS/VS DUMMY VSAM data sets at 
program execution time, since the CMS/DOS implementation of the 
DUMMY statement corresponds to the DOS/VS implementation. 
Specifying the DUMMY option with the DLBL command will cause an 
execution-time error. 

7. Assembler program usage of VSAM and the ISAM Interface Program 
(IIP) is not supported. 



MISCELLANEOUS RESTRICTIONS 

1. If you intend to run VM/370 Release 1 and pre-PLC 9 Release 2 
systems alternately, apply Release 1 PLC 14 or higher (APAR V1 179) 
to your Release 1 system, to provide compatibility and to prevent 
loss of spool files in case of a warm start. Changes to the spool 
file format in PLC 9 of Release 2 require a cold start when 
switching between pre-Release 2 PLC 9 and post-Release 2 PLC 9 
systems. 

2. The number of pages used for input/output must not exceed the total 
number of user pages available in real storage. violation of this 
restriction causes the real computing system to be put into an 
enabled wait state. 

3. If you intend to define more than 73 virtual devices for a single 
virtual machine, be aware that any single request for free storage 
in excess of 512 doublewords (a full page) may cause the VM/370 
system to abnormally terminate (ABEND code PTR007) if the extra 
storage is not available on a contiguous page. Therefore, two 
contiguous pages of free storage must be available in order to log 
on a virtual machine with more than 73 virtual devices (three 
contiguous pages for a virtual machine with more than 146 virtual 
devices, etc.) . Contiguous pages of free storage are sure to be 
available only immediately after IPL, before other virtual machines 
have logged on. Therefore, a virtual machine with more than 73 
devices should be the first to log on after IPL. The larger the 
real machine size, the lesser the possibility of this occurring. 

4. For remote 3270s, VM/370 supports a maximum of 16 binary 
synchronous lines, minus the number of 3704/3705 Communications 
Controllers in NCP mode minus one (if there are any 3704/3705 
Communications Controllers in emulation mode) . 

5. If an I/O device (such as a disk or tape drive) drops ready status 
while it is processing virtual I/O activity, any virtual machine 
users performing I/O on that device are unable to continue 
processing or to log off. Also, the LOGOFF and FORCE commands are 
not effective because they do not complete until all outstanding 
I/O is finished. The system operator should determine which I/O 
device is involved and make that device ready once more. 
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APPENDIX F: VIRTUAL DEVICES USED IN CMS 



Figure 67 indicates those devices that are supported by a CMS machine. 



Virtual 


Virtual 


Symbolic | 


IBM Device 


Address* 


Name | 


3210, 3215, 


1052, 


ecu 


C0N1 1 


3066, 3270 








2314, 3330, 


3340 


190 


DSKO 1 


3350 








2314, 3330, 


3340 


1912 


DSK1 1 


3350 








2314, 2319, 


3330, 


ecu 


DSK2 1 


3340, 3350 








2314, 2319, 


3330, 


ecu 


DSK3 1 


3340, 3350 








2314, 2319, 


3330, 


192 


DSK4 1 


3340, 3350 








2314, 2319, 


3330, 


ecu 


DSK5 1 


3340, 3350 








2314, 2319, 


3330, 


ecu 


DSK6 1 


3340, 3350 








2314, 2319, 


3330, 


ecu 


DSK7 1 


3340, 3350 








2314, 2319, 


3330, 


19E 


DSK8 1 


3340, 3350 








2314, 2319, 


3330, 


ecu 


DSK9 1 


3340, 3350 








1403, 3211, 


1443 


OOE 


PRN1 1 


2540, 2501, 


3505 


OOC 


RDR1 1 


2540, 3525 




OOD 


PCH1 1 


2415, 2420, 


3410, 


181-4 


TAP1-TAP4I 


3420 









Device Type 

System console 

System disk (read-only) 

Primary disk (user files) 

Disk (user files) 

Disk (user files) 

Disk (user files) 

Disk (user files) 

Disk (user files) 

Disk (user files) 

Disk (user files) 

Disk (user files) 

Line printer 
Card reader 
Card punch 
Tape drives 



iThe device addresses shown are those that are preassembled into the 
CMS resident device table. These need only be modified and a new 
device table made resident to change the addresses. 

2The virtual device address (ecu) of a disk for user files can be 
any valid System/370 device address, and can be specified by the 
CMS user when he activates a disk. If the user does not activate 
a disk immediately after loading CMS, CMS automatically activates 
the primary disk at virtual address 191. 

Figure 67. Devices Supported by a CMS Virtual Machine 
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APPENDIX G: FUNCTION CODES FOR DIAGNOSE INSTRUCTIONS 



Figure 68 indicates the DIAGNOSE codes used in VM/370 and gives a brief explanation of 
its use. 



Function 

Store extended identification code. 

Examine data from real storage. 

Execute VM/370 CP command. 

Pseudo-timer facility. 

Release virtual storage pages. 

Manipulate input spool files. 

Standard DASD I/O. 

Clear I/O and MC recording areas. 

General virtual I/O interruptions. 

Virtual device type inquiry. 

Dynamic TIC modification. 

Get DASD address of error recording 
areas. 

Read a page of error recording data. 

Function Codes for DIAGNOSE Instruction (Part 1 of 2) 



1 Function 




1 Code 




Class 1 


1 000 




G 1 


1 004 




CrE 1 


1 008 




G 1 


1 OOC 




G 1 


1 010 




G 1 


1 014 




G 1 


1 018 




G 1 


1 01C 




F 1 


1 020 




G i 


1 024 




G 1 


1 028 




G 1 


1 02C 




C,E,F| 


1 030 




C,E,F| 


t, ., 






Figure 


68. 


Func 



1 DMKHVC 


DMKHVD 1 


1 Label 


Label 1 




1 HVDSTIDX 1 




READCPC 1 


1 HVCONFN 




1 HVCHRON 




1 HVCPGRL 






HCDSPRD 1 


1 HVCDISK 






HVDLRER 1 


1 HVCFAKE 






HVDDTYP 1 


1 HVCDCPM 






HVDEREP1 1 




HVDEREP2 1 
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Function 
Code 

034 

038 

3C 

040 
044 
048 
04C 
050 
054 

058 
05C 

060 

064 

TOO 

Flgare 68 



Class I Function 

C,F I Beads the system dump spool file. 

C,E I Reads the system symbol table. 

A,B,C| Dynamically updates the VH/370 
directory. 

Reserved for IBM use. 

Reserved for IBM use. 

Reserved for IBM use. 

any | Generate accounting cards. 

A,BrC| Saves 3704/3705 control program image. 

Enable or disable external 
interruptions . 

Virtual console interface for 3270. 

Edit message according to EMSG 
settings. 

Provide virtual machine storage size. 

Load, find, or purge a named system. 

Start of functions specified by a user. 

Function Codes for DIAGNOSE Instruction (Part 



DMKHVC 
Module 



HVCEXIT 
HVCEXIT 
HVCEXIT 



HVCGRAF 
HVCEMSG 

HVCSTOR 
HVCSYS 
HVCOSER 
2 of 2) 



DMKHVD 
Module 

HVDRSDF 

HVDRDSYM 

HVDDIRCT 



HVDACCT 
HVD3705 
HVDEXPA 
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APPENDIX H: CMS ZAP SERVICE PROGRAM 



ZAP is a CMS command that modifies or dumps MODULE, LOADLIB, or TXTLIB 
files. It may be used to modify either fixed or variable length MODULE 
files. It is for use by system support personnel only. 

Input control records control ZAP processing. They can be submitted 
either from the terminal or from a disk file. Using the VER and REP 
control records, you can verify and replace data or instructions in a 
control section (CSECT) . Using the DUMP control record, you can dump 
all or part of a CSECT, or an entire member of a LOADLIB or TXTLIB file, 
or an entire module of a MODULE file. 



The format of the ZAP command is: 



ZAP 



MODULE 

LOADLIB 

TXTLIB 



[ libnamel 



libname3][ (option... [) ]] 



options: 

r T r T 

I TERM I I PRINT I 

IINPUT filenamel INOPRINTI 

L J L J 



where : 



MODULE 

LOADLIB 

TXTLIB 



indicates the type of file that is to be modified or dumped. 



libname is the library name containing the member to be modified or 
dumped. You can specify one to three library names. The 
libname is valid only for LOADLIB and TXTLIB files. 

0£t ions : 

r T 

TERM IPRINT | 
I NOPRINTI 

L J 

indicates that input to the ZAP service program is submitted 
through the terminal. If you specify TERM, the prompting 
message ENTER: is issued, and you can then enter input control 
records up to 80 characters long. If you specify PRINT with 
TERM, all output prints on the printer, but only error 
messages display at the terminal. If you specify NOPRINT with 
TERM, nothing prints on the printer. All output except 
control records displays at the terminal. 



INPUT filename 



IPRINT I 
INOPRINTI 

L J 

specifies that input is submitted from a disk file, filename. 
This file must have a filetype of ZAP, and must be a fixed 
80— byte seguential file residing on any accessible device. If 
you specify PRINT with INPUT filename, all output produced by 
the ZAP service program prints on the printer. In addition. 
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commands and control records in error and error messages 
display at the terminal. If you specify NOPRINT with INPUT 
filename, nothing prints on the printer. All output displays 
at the terminal. 

The following table shows the resulting output of valid option 
combinations: 

OPTIONS I PRINT I NOPRINT 



I Commands and control records | Everything on the 

I in error and error messages | terminal. Nothing on 

INPUT I on the terminal. Everything I the printer. 

I to printer. | 



I Only error messages on the | Everything except control 
TERM I terminal. Everything on the | records on the terminal. 
I Printer. | Nothing on the printer. 



ZAP INPUT CONTROL RECORDS 

Seven types of ZAP control records exist: NAME, DUMP, BASE, VER or 
VERIFY, REP, comment, and END. 

ZAP control records are free form and need not start in position one 
of the record but the ZAP program can accept only 80 characters of data 
for each control record. Separate all information by one or more 
blanks. All address fields including disp (displacement) fields in VER 
and REP control records must contain an even number of hexadecimal 
digits, to a maximum of six digits (OD, 02C8, 014318) . Data fields in 
VER and REP control records must also contain an even number of 
hexadecimal digits, but are not limited to six digits. 

If you wish, you may separate the data anywhere by commas (for 
example, 83256482 or 8325,6482). The commas have no effect on the 
operation. 

The program sets the NOGO switch on if a control record is found to 
be in error. A file cannot be modified once the NOGO switch is turned 
on. The next valid NAME record turns the NOGO switch off. This means 
that if the control record is the NAME record, all succeeding records 
are ignored until the next NAME, DUMP, or END record. For any other 
error, only REP control records that follow are ignored. 

JDUMP Control Record 

The DUMP control record resets the NOGO switch off. The DUMP control 

record must not immediately precede a BASE, VER, or HEP control record. 

A NAME control record must precede the BASE, VER, and REP control 
records (if any) that follow a DUMP control record. 

The DUMP control record allows you to dump a portion or all of a 
specified control section, or the complete member or module. The format 
of the output of the dump is hexadecimal with an EBCDIC translation of 
the hexadecimal data. 
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The DUMP control record is optional. The format of the DUMP control 
record is: 



r t 

DDNP J membernaioe ) (csectname [startaddress [endaddress]] | 

I ALL I 

L J 



/membername \ 
(modulename j 



w her e : 

membername 

is the name of the member to be dumped, or the member that 
contains the CSECT (s) to be dumped. This member must be found 
in one of the libraries specified in the ZAP command line. 
However, if the library is a CMS TXTLIB, its directory does 
not contain member names. Therefore, the program ignores the 
member name (although you must specify it) , and the program 
searches for the csectname (which you must specify) . 

modulename 

is the name of the module to be dumped, or the module that 
contains the CSECT (s) to be dumped. If you specify a module 
that has no loader table, the program dumps the entire 
module. 

csectname is the name of the control section that is to be dumped. If 
you do not specify csectname, the program dumps only the first 
CSECT. The csectname is required for CMS TXTLIBs, optional 
for OS TXTLIBs, LOADLIBs, and MODULE files. (See the 
discussion of csectname under "Name Control Record.") You must 
not specify csectname for a module created with the NOMAP 
option. 

ALL specifies to the program to dump all CSECTs within the 
specified member or module. You can specify ALL for MODULE 
files, LOADLIBs, and OS TEXTLIBs, but not for CMS TXTLIBS. If 
you wish to dump all the CSECTs in a member of a CMS TXTLIB, 
you must issue a separate DUMP control record for each CSECT. 

startaddress 

is the location within the specified CSECT where the dump is 
to begin. This must be two, four, or six hexadecimal digits. 
The start address is the displacement from the beginning of 
the CSECT. For example, if you wish to start dumping at 
address 08 in a CSECT that begins at location 400, you specify 
start address or 08, not 0408. 

endaddress 

is the last address to be dumped. This must be two, four, or 
six hexadecimal digits. If you specify no address, the 
program dumps the rest of the CSECT. Note that start and end 
addresses apply only when you specify a csectname. If the 
file to be dumped contains undefined areas (such as a DS in a 
TXTLIB member) , the hexadecimal portion of the dump contains 
blanks to indicate that the corresponding positions are 
undefined. 
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]iAi?I Control Record 

The NAME control record specifies the member or module and CSECT that 
contain the data to be verified or replaced by the ZAP operation. The 
format of the NAME control record is: 



I I 

I NAME ( membername ) [csectname] | 

I ( modulename j | 

i I 



J 



where: 



( membername ) 
\ fflodulename / 



is the member or module that you want to be searched for the 
desired CSECT. 

csectname is the name of the desired control section. You must 
specify csectname if the CSECT you wish to modify is in a 
CMS TXTLIB (that is, TXTLIB created by the TXTLIB command 
from CMS TEXT decks that do not have a NAME card following 
the END card) . The directory of a CMS TXTLIB contains only 
CSECT names and no member names. The CSECT name specified 
in the NAME record is compared with CSECT names in the 
directory. If a CSECT match is found and no member name 
match is found, the member selected is the one that contains 
the CSECT name. The csectname is optional if the CSECT you 
wish to modify is a LOADLIB or an OS TXTLIB (that is, a 
TXTLIB created by the TXTLIB command from CMS TEXT decks 
that have a NAME card after the END card) . The dictionaries 
of the specified libraries are searched for the member name 
and the member is then searched for the CSECT name, if you 
specified one. If you do not specify csectname for a 
LOADLIB or an OS TXTLIB, the program uses the first control 
section. The csectname is optional for a MODULE file. The 
module named in the NAME control record is located and, if 
you specified csectname, the first record is read to 
determine the number of records in the module and the 
availability of a loader table, which the program can then 
search for the csectname. If you do not specify csectname, 
the program uses the beginning location of the module. You 
are not allowed to specify csectname if the module was 
created with the NOMAP option. The NAME control record must 
precede the BASE, VER, and REP control records. If it does 
not, the program sets the NOGO switch on. 



B^SE Control Record 

The BASE control record adjusts displacement values for subsequent VER 
or REP control records for a CSECT whose starting address is not 
location zero in an assembly listing. The format of the BASE control 
record is: 



626 VH/370: System Logic and Problem Determination Guide 



I I 

I BASE address I 

I I 



where : 

address is the starting address of the CSECT. The address must be 
two, four, or six hexadecimal digits. For example, for a 
CSECT starting at location 400, you would specify the BASE 
0400 in the BASE control record. If a subsequent VER card 
requests verification of location 0408, the BASE of 0400 is 
subtracted from 0408, and the program verifies location 08 in 
the CSECT. This example applies if you specify TXTLIB, 
LOADLIB, or MODULE and the module map is present. However, if 
no module map is present for a MODULE file (that is, the 
module was generated with the NOMAP option) , then all 
operations are performed as if the BASE address is location 0. 
For example, if you specify a BASE of 400 and the address you 
wish to inspect or modify is 408, then you must specify 08 and 
not 408 in REP and VER control records. The address in this 
case is from the start of the module. If you do not specify 
csectname in the NAME control record, you cannot specify any 
BASE value other than 00. The BASE control record is 
optional. See the discussion under "VER or VERIFY Control 
Record." If specified, the BASE control record must follow 
the NAME record, but it need not follow the NAME record 
immediately. For example, you could have the following 
sequence of control records: NAME, VER, REP, BASE, VER, REP. 



115 o£ lERIFY Control Record 

The VER control record requests verification of instructions or data 
within a CSECT. If the verification fails, the program does not perform 
a subsequent REP operation until it encounters another NAME control 
record. 

The VER control record is optional. More than one VER record can 
follow a single NAME record. 

The format of the VER control record is: 



I I 

I / VERIFY ) disp data I 

I \ VER / I 

I I 

where: 

disp is the hexadecimal displacement of the data to be inspected 
from the start of the CSECT, if you did not submit a BASE 
control record for this CSECT. If you did submit a BASE 
control record, then disp is the actual location of the data. 
The disp must be two, four, or six hexadecimal digits. This 
displacement does not have to be aligned on a fullword 
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boundary. If this displacement value is outside the limits of 
the CSECT specified by the preceding NAME control record, the 
VERIFY control record is rejected. 

data is the data against which the data in the CSECT is to be 
compared. This must be an even number of hexadecimal digits. 
For example, if the location you wish to verify is 3CC, and 
the CSECT begins at location 2B0, you can either issue: 

BASE 02B0 
VER 03CC data 

or you can omit the BASE control record, subtract the CSECT 
start address from the address of the data, and issue: 

VER one data 

This also applies to the disp operand of the REP control 
record. 



SIE Control Record 

The REP control record modifies instructions or data at the specified 
location within the CSECT that you specified in a preceding NAME control 
record. The data specified in the REP control record replaces the data 
at the CSECT location specified by the disp operand. This replacement 
is on a "one-for-one" basis; that is, one byte of data defined in the 
control record replaces one byte of data at the location that you 
specified. If the replacement fails, the program does not perform 
additional REP operations until it encounters another NAME control 
record . 

The REP control record is optional. More than one REP record can 
follow a single NAME record. 

The format of the REP control record is: 



I I 

I REP disp data I 

i I 

where : 

disp is the hexadecimal displacement of the data to be replaced 
from the start of the CSECT, if you did not submit a BASE 
control record for this CSECT. If you did submit a BASE 
control record, then disp is the actual location of the data. 
The disp must be two, four, or six hexadecimal digits. This 
displacement need not address a fullword boundary. If this 
displacement value is outside the limits of the CSECT being 
modified, the program does not perform the replacement 
operation. 

data is the data that is to replace the data in the CSECT. This 
must be an even number of hexadecimal digits. 

Note: Although you do not have to verify a location before replacing 
data, you should do so to make sure that the data being changed is what 
you expect it to be. 
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Comment Control Record 

The ZAP program ignores comment control records. If the PBINT option is 
in effect, the program prints the comments. The format of a comment 
record is: 



I I 

I * comment | 

I I 

You must follow the asterisk with at least one blank. 



1M.P Control Record 

The END control record ends ZAP processing. The END record is required 
and must be the last control record. The format of the END control 
record is: 



I 

I END 

I 



SPECIAL CONSIDERATIONS FOR USING THE ZAP SERVICE PROGRAM 

Before you use the ZAP command against MODULE files, you can use the 
MODHAP command to determine whether a module map exists and what it 
contains. 

When a ZAP input file has more than one pair of VER and REP control 
records and a VER control record (other than the first) fails, you must 
remove the records prior to the failing record and correct the error 
before you issue the ZAP command again. Otherwise, the file being 
modified returns to its original status. 

If you issue a REP control record against a file that contains an 

undefined area (for example, a Define Storage area) within the REP data 

field and do not issue a VER control record prior to the HEP control 

record, the bytes prior to the undefined area, if any, are modified and 

all the bytes after the undefined area are not modified. The program 
prints warning message DMSZAP248W. 
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APPENDIX I: APPLYING PTFS 



Appendix I tells you how to apply Program Temporary Fixes (PTFs) and 
updates to an installed VM/370 system. It contains information about the 
following: 

Supporting a VM/370 system 

Updating modules using the VMFASM EXEC procedure 

Using the VMFMAC EXEC procedure to update macro libraries 

using VMFLOAD to generate a new nucleus 

The loader 

Using the GENERATE EXEC procedure to generate a new CP, CMS, or RSCS 
nucleus, or to load IPCS 

Using the VMFBLD EXEC procedure to build a new nucleus 

Using the CMSGEND EXEC procedure to generate a CMS module 

Using the ASMGEHD EXEC procedure to generate the Assembler 

Recommended procedures for updating VM/370 

SUPPORTING A VM/370 SYSTEM 

The multiple virtual machine environment created by VM/370 permits 
support of both hardware and software to be done concurrently with other 
installation work. 

Virtual machines can be used to: 

• Generate and test new systems 

• Apply and test PTFs 

• Run hardware diagnostics 

• Retrieve and examine VM/370 ABEND dumps and error recordings 

• Examine portions of real VH/370 storage 

• Trace the execution of a system in a virtual machine 

Before installing VM/370, you should develop an account support plan 
with the IBM FE representative. Appropriately configured virtual 
machine entries should be included in the VM/370 directory for the 
service representative. Two virtual machines, with userids CE and MAINT, 
are defined for these representatives in the VM/370 directory 
distributed with the starter system. 



Y»Z370 UPDATE PROCEDURES 

Using the VM/370 update facility, you can update files with several 
levels of updates and/or any number of program temporary fixes (PTFs) . 
Procedures are supplied for assembling the updated source code to 
produce a uniguely identifiable text file. The file has a unique 
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filename and records that identify the origin of the updates, macro 
libraries, and source statements. 

Procedures are provided for generating load files from various object 
modules, and for generating MACLIB files from various COPY and MACRO 
files. 

The update procedure involves a file naming convention for update and 
text files, a set of programs to support the processing, and a set of 
EXEC procedures to process the files. 

The update procedures and programs supplied with VM/370 are: 

• VMFASM Incorporates PTFs and/or updates and creates a 

new text file 

• VMFLOAD Generates a new CP, CMS, or RSCS nucleus 

• CMSGEND Generates a new CMS module 

• GENERATE Generates a new VM/370 system (CP, CMS, or RSCS) 

• GENERATE IPLDECK Generates a new standalone version of a service 

program on disk 

• GENERATE SRVCPGM Punches the service programs on cards 

• GENERATE IPCS Loads the IPCS modules onto the IPCS disk 

• VMFMAC Generates a new CP, CMS, or RSCS macro library 

• CMS UPDATE Command Updates modules 

All modules prefaced by the letters DMK are CP modules. There are two 
kinds of CP modules: those that are part of the CP nucleus (these 
modules are contained in the CPLOAD EXEC file) and those that are not 
part of the CP nucleus (service programs that execute either standalone 
or under CMS) . The programs that execute standalone are DMKDDR, DMKDIR, 
and DMKFMT. If you apply a PTF to these modules and create a new text 
deck, use the GENERATE EXEC to create a new standalone file. 
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The service programs that execute under CMS are: 

• DASD Dump Restore Program (module DMKDDR) 

• Directory program (module DMKDIR) 

• VMFDUMP, the virtual dump program (module DMKEDM) 

• NCPDUMP, the 3704/3705 dump program (module DMKRND) . 

If you apply updates to these modules, use the CMSGEND EXEC to create a 
new CMS module. The module name to specify is DDR, DIRECT, NCPDUMP, or 
VMFDUMP, respectively. CHS cannot execute the Format/Allocate program 
(module DMKFMT) and the IBCDASDI Virtual Disk Initialization program 
(module IBCDASDI) . If you apply a PTF to any DMK module other than 
these six service programs, you must reload CP (using the VHFLOAD 
command) . 



UPDATING A MODULE 

The following discussions assume that areas containing the source code 
for CP and CMS are added to the appropriate virtual machine 
configurations. Source code for the CMS system is included on the CMS2 
tape; source code for CP is included on the CP2 tape. These tapes are 
distributed by the Program Information Department (PID) . 

VM/370 has update procedures to incorporate changes (additions, 
deletions, or corrections) into an existing module, macro, or copy file. 
For example, if you apply updates to the DMKVAT module, the VMFASM 
update procedure: 

• Locates the DMKVAT source file. It is the unmodified Assembler 
language source code that is distributed with the VM/370 system. 

• Locates the update control file for DMKVAT. The control file name is 
specified on the VMFASM command. The control file can have any 
filename, but must have a filetype of CNTRL. It contains records 
indicating how to apply the updates. 

• Applies the updates to the specified source (in this case, DMKVAT) 
and gives the updated source a temporary name by concatenating a $ 
(dollar sign) to the first seven characters of the filename (in this 

case, the temporary filename is $DMKVAT) . 

• Puts macro library names specified in the control file into the 
proper Assembler library list. (The macro libraries reguired at 
assembly time are specified in a MACS record in the control file.) 

• Assembles the updated source file ($DMKVAT) and creates an updated 
object deck. The object deck filetype is derived from information 
found in the control file. The filename of the updated object file is 
the same as that of the original source, DMKVAT. 

As the VMFASM update procedure progresses from one step to the next, 
informational or error messages are displayed. To more fully understand 
how the update procedures operate, you need to know what a control file 
contains, and how it is handled. The following discussion provides this 
information. 



Section 5. Appendixes 633 



CONTROL FILES 

The CMS UPDATE command and the VMFASM EXEC procedure use control files. 
You may have one or more control files to specify various combinations 
of updates and macro libraries to be used at different times. A control 
file contains the following types of records: 

• The MACS Record -- This record contains the names of macro libraries 
to be used at assembly time. A MACS record is required for a control 
file used by the CMS UPDATE command; it is optional for a control 
file used by the VMFLOAD EXEC procedure. A control file must not 
contain more than one MACS record. If a MACS record is included, it 
must precede any other records except comments. Up to eight libraries 
may be specified in the MACS record (if space permits) . A MACS record 
has the following format: 

uplevel MACS libl lib2 lib3... 

The uplevel. field is usually TEXT; it is not used to generate th6 
filetype of the updated file. 

• Update identification records--These records identify updates that 
are to be applied to a particular source file, if such a file exists. 
An update identification record has the following format: 

uplevel upid 

where uplevel is an update level identifier that generates a filetype 
for the new file (the new filetype uniquely identifies the updated 
source file) . The field, upid, is the update identification; it can 
be from one to four characters long. This update identification is 
concatenated with the prefix UPDT to identify the filetype of the 
direct update to be applied. The filename must be the same as the 
name of the file to be updated. For example, if an update 
identification record for DMKVAT is: 

TEXT NEW1 

the update file is called DMKVAT UPDTNEWl.The update level identifier 
is TEXT. 

• AUX file identification records--These records contain the names of 
auxiliary files (AUX files) , which in turn contain a list of 
filetypes of update files to be applied to a particular source file. 
An auxiliary file identification record has the following format: 

uplevel AUXnnnn 

where uplevel is an update level identifier that generates the 
filetype of the updated source file. The string, nnnn, is an 
identification string that can be from one to four characters long. 
This identification string, with the prefix AUX, is the filetype of 
the auxiliary file that contains the list of updates to be applied. 
The filename of the auxiliary file is the same as the filename of the 
source file to be updated. For example, if an AUX file identification 
record that contains a list of updates for DMKVAT is: 

TEXT AUXnnnn 

then the auxiliary file called DMKVAT AUXnnnn contains the filetypes 
of the update files that are to be applied. These update files have 
the same filename as the source file to be updated. 

63^1 VM/370: System Logic and Problem Determination Guide 



• Coinments--An asterisk (♦) in the first column of the record 
identifies a comment record. 

Note: Control file records in the format that was used under VM/370 
Release 1 or 2 are still accepted under Release 3. For example, an AUX 
file identification record in the format 

TEXT nnnn AUX 

is still accepted by the update procedures. 

A control file can have many update identification records, AUX file 
identification records, and comments, but can have only one MACS 
record. The control file can have any filename. Note, however, that 
VM/370 updates from IBM normally use the following special control 
files: 

• A control file for CP source, copy, and macro updates is called 
DMKR30 CNTRL. The DMKR30 CNTRL file contains the following records: 

- TEXT MACS DMKMAC CHSLIB OSMACRO 

- TEXT AUXR30 

• A control file for CMS source updates is called DMSR30 CNTRL. The 
DMSR30 CNTRL file contains the following records: 

- TEXT MACS CMSLIB OSMACRO 

- TEXT AUXR30 

• A control file for CMS macro and copy updates is called DMSM30 
CNTRL. The DMSM30 CNTRL file contains the following record: 

- COPY AUXM30 

• A control file for assembling the NCPDUMP source is called NCPR30 
CNTRL. The NCPR30 CNTRL file contains the following records: 

- TEXT MACS OSMACRO DMKMAC CMSLIB 

- TEXT AUXR30 

• A control file for assembling RSCS source, copy, and macro updates is 
called DMTR30 CNTRL. The DMTR30 CNTRL file contains the following 
records: 

- TEXT MACS DMTLOC DMTMAC 

- TEXT AUXR30 



APPLYING PTFS TO VM^JTO 

PTF updates are distributed in card or magnetic tape form, or as AFAR 
answers typed on coding forms. In any case, a CMS file (with the correct 
filename and filetype) must be created on a disk to contain the update. 
The disk must belong to the user (userid MAINT) who is responsible for 
updating VM/370. The disk may be the CP or CMS source disk, but it is 
usually a separate disk. 
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A suggested virtual machine configuration for updating a 2314 system 



is: 



USER MAINT 


CPCMS 720K 16M BCEG 






ACCOUHT 


(installation defined) 






OPTION 


ECMODE REALTIMER 






CONSOLE 009 


3215 






SPOOL 


OOC 


2540 READER A 




SPOOL 


OOD 


2540 PUNCH A 




SPOOL 


OOE 


1403 A 






MDISK 


190 231U 


035 110 CPV3L0 


MR 


READ 


HDISK 


191 2314 


019 010 CPV3L0 


WR 


READ 


MDISK 


194 2314 


145 058 CPV3L0 


MR 


READ 


MDISK 


199 2314 


034 001 CPV3L0 


WR 


READ 


MDISK 


193 2314 


001 050 USERD1 


MR 


READ 


MDISK 


294 2314 


051 050 USERD1 


MR 


READ 


MDISK 


393 2314 


001 110 USERD2 


MR 


READ 


MDISK 


394 2314 


001 110 USERD3 


MR 


READ 


MDISK 


390 2314 


101 003 USERD1 


MW 


READ 


MDISK 


cuu 2314 


000 203 yyyyyy 


HW 





where cuu and yyyyyy are the address and label of your system residence 
volume defined in your DMKSYS module. 



A suggested virtual machine configuration for updating a 3330 system 



is 



USER MAINT 


CPCMS 72( 


3K 16M BCEG 






ACCOUNT 


(installation defined) 






OPTION 


ECMODE REALTIMER 






CONSOLE 009 


3215 






SPOOL 


OOC 


2540 READER i 


\ 




SPOOL 


OOD 


2540 PUNCH A 




SPOOL 


OOE 


1403 A 






MDISK 


190 3330 


030 076 CPV3L0 


MR 


READ 


MDISK 


191 3330 


16 007 CPV3L0 


WR 


READ 


MDISK 


194 3330 


106 044 CPV3L0 


MR 


READ 


MDISK 


199 3330 


029 001 CPV3L0 


WR 


READ 


MDISK 


193 3330 


001 030 USERD1 


MR 


READ 


MDISK 


294 3330 


031 030 USERD1 


MR 


READ 


MDISK 


393 3330 


061 060 USERD1 


MR 


READ 


MDISK 


394 3330 


121 060 USERD1 


MR 


READ 


MDISK 


390 3330 


181 002 USERD1 


MW 


READ 


MDISK 


cuu 3330 


000 404 yyyyyy 


HW 





where cuu and yyyyyy are the address and label of your system residence 
volume defined in your DMKSYS module. 
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A suggested virtual machine configuration for updating a 3340 system 
is: 

USER MAIKT CPCMS 720K 1 6M BCEG 
ACCOUNT (installation defined) 
OPTION ECMODE REALTIMER 
CONSOLE 009 3215 
SPOOL OOC 2540 READER A 
SPOOL OOD 2540 PUNCH A 
SPOOL OOE 1403 A 
MDISK 190 3340 048 203 CPV3L0 MR READ 
MDISK 191 3340 026 015 CPV3L0 WR READ 
MDISK 194 3340 251 098 CPV3L0 MR READ 
MDISK 199 3340 046 002 CPV3L0 WR READ 
MDISK 193 3340 001 090 USERD1 MR READ 
MDISK 294 3340 031 090 USERD1 MR READ 
MDISK 393 3340 061 180 USERD1 MR READ 
MDISK 394 3340 121 180 USERD1 MR READ 
MDISK 390 3340 181 006 USERD1 MW READ 

MDISK cuu 3340 000 348 yyyyyy MW 

where cuu and yyyyyy are the address and label of your system residence 
volume defined in your DMKSYS module. 

The entries in the preceding VM/370 directory, with the exception of 
the 193, 294, 393, 394, and 390 virtual disks, are in the 2314, 3330, 
and 3340 VM/370 directories supplied with the starter system, and should 
be included in your VM/370 directory, because IBM uses them for 
support. 

The contents of the preceding virtual disks are: 

Disk Contents 

190 Current CMS system disk 

191 Work area 

194 CP and RSCS text retention 

199 The 191 minidisk (work area) 

193 CMS PIFs, updates, and updated text decks (object modules) 

294 CP and RSCS PTFs, updates, and updated text decks (object 
modules) 

393 CMS source and macros 

394 CP and RSCS source, macros, and copy files 
390 CMS test nucleus area 

cuu CP system residence device, or a replica of it, for test 
purposes 

These'virtual disks are shown in Figure 69. 

You should apply all distributed updates. Once you create the 
appropriate files, you should access the disks containing the CP, CMS, 
or RSCS source files and update procedures, and apply the updates. 

To apply the IBM distributed updates to an existing source file, use 
the VMFASM EXEC procedure. To apply the IBM distributed updates to a 
copy or macro file, use the VMFMAC EXEC procedure. 

If you update a copy or macro file, you should use the VMFASM EXEC 
procedure to reassemble the module (s) that contain that copy or macro 
file. 
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CP AND RSCS 

SOURCE, 
MACROS, 

AND 

COPY 

FILES 



CP AND RSCS 

RTFS 

AND 

UPDATES 



CP 

TEXT 

RETENTION 



CP 

SYSTEM 

RESIDENCE 



RSCS SYSTEM 
DISK (THE RSCS 

VIRTUAL 

MACHINE'S 191 

DISK, LINKED TO 

MAINT AS 195) 




RSCS 

TEXT 

RETENTION 



Figure 69. System Support Plan 



UPDATING MODULES USING THE VMFASM EXEC PROCEDURE 



Use the VMFASM EXEC procedure to update a specified source file 
according to entries in a control file, and to assemble the updated 
source file. VMFASM invokes the CMS UPDATE command. The format of the 
VMFASM command is: 
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fnl fn2 [ (options. ..[) ]] 

Ogtions: 

r T r i r t 

I DISK I I TERM I I LIST | 
I PHI NT I INOTERMI | NOLIST| 

L J L J L J 

r T r T 

IDECK I IRENT | [EXP] [XREF] 
I NOD ECK I I NOR EN T | 

L J L J 



where: 

£n1 is the filename of the source file to be updated. 

fn2 is the filename of the control file. The control file must have 
a filetype of CNTRL. 

Ogtigns: 

DISK places the LISTING file on a virtual disk. 

writes the LISTIMG file to the printer. 



E5INT 
TERM 



writes the diagnostic information on the SYSTERM data set. The 
diagnostic information consists of the diagnosed statement 
followed by the error message issued. 



NOTERM suppresses the TERM option. 

LIST produces an Assembler listing. 

NOLIST does not produce an Assembler listing. 

DECK writes an object module on the device specified on the FILEDEF 
statement for PUNCH. 

NODECK suppresses the DECK option. 

RENT checks the program for a possible violation of program 
reenterability. Code that makes the program nonreenterable is 
identified by an error message. 

NORENT suppresses the RENT option. 

EXP expands printing of certain macros which check for the SUP 
parameter issued via the SYSPARM option of the assembler. 

XREF causes the XREF (SHORT) option to be invoked when VMFASM 
invokes the assembler. 

Note: VMFASM only accepts the non-defaulted options. All other options 
entered are ignored and the defaults are used. 



USING VMFASM TO APPLY IBM-SUPPLIED UPDATES 



The control file contains records that identify the updates to be 
applied and the macro libraries, if any, needed to assemble the source 
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program. The updates are applied starting with the last update file in 
the control file and in sequence up to the first update file (or the 
update file immediately following the MACS record) . Updates identified 
by auxiliary files are applied starting with the last update in the 
auxiliary file and proceeding in sequence up to the first. 

For example, a control file named UPDATE1 CNTRL contains the 
following two records: 

TEXT MACS DMKMAC CMSLIB OSMACRO 
IBM1 AUX2000 

An Assembler language source file is named DMKVAT ASSEMBLE. 

An auxiliary file named DMKVAT AUX2000 contains a list of filetypes 
(NEW2 and NEW1) with NEH2 the first entry and NEH1 the last. 

The two update files are named DMKVAT NEW1 and DMKVAT NEH2. These 
are the files identified by the auxiliary file, DMKVAT AUX2000. Assume 
these files contain IBM-supplied updates to DMKVAT, such as inserted, 
deleted, or replaced source statements and the appropriate control 
statements. The update control statements are described in the YM/370: 
CMS Command and Macro Reference with the CMS UPDATE command. 

To update DMKVAT, you enter the command: 

VMFASM DMKVAT UPDATEl 

VMFASM does the following: 

• VMFASM locates the DMKVAT ASSEMBLE and UPDATEl CNTRL files. 

• The UPDATEl CNTRL file is processed from the bottom up. The first 
entry found is IBMI AUX2000. 

• VMFASM tries to locate the file named DMKVAT AUX2000 by searching all 
accessed disks. 

• When VMFASM locates the DMKVAT AUX2000 file, it processes it from the 
bottom up. The first entry found is NEWI. 

• VMFASM tries to locate the the update file named DMKVAT NEH1. When it 
finds DMKVAT NEWI, VMFASM applies the updates that are in DMKVAT NEWI 
to the DMKVAT ASSEMBLE file, and creates a new file called $DMKVAT 
ASSEMBLE. 

• Next, VMFASM processes the NEW2 entry in the DMKVAT AUX2000 file. 
When VMFASM locates the update file DMKVAT NEW2, it applies the 
updates to the updated ASSEMBLE file ($DMKVAT) . 

• Because there are no more filetypes listed in the DMKVAT AUX2000 
file, VMFASM reads the next control record in the UPDATEl CNTRL file. 
In this case, it is the MACS record. 
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• After antering the macro library names that are on the MACS record 
into the appropriate Assembler library lists, VMFASM assembles the 
updated ASSEMBLE file ($DMKVAT) . 

• The UPDATE command then stacks in the console read buffer the uplevel 

(update level identifier) associated with the last update applied. If 
there were no updates, it stacks the uplevel associated with the MACS 
control record and the names of the macro libraries specified in the 
MACS record. VMFASM then reads the stacked lines and concatenates the 
uplevel (if it is not TEXT) to the characters TXT to form the 
filetype of the assembled updated source. 

An update level identifier of TEXT causes special handling in the 
VMFASM EXEC procedure, whether or not an update is used with it. A 
name of TEXT is used as the object module filetype without level 
identification concatenation. Thus, TEXT becomes the filetype. 

VMFASM places the macro library names that were specified en the MACS 
record in the Assemble library list (via the CMS GLOBAL command) so 
that those libraries can be used when the updated source file is 
assembled. 

In this example, the last (and only) update applied was identified as 
IBM1 AUX2000. The file identification for the updated source is 
DMKVAT TXTIBM1. The updated source is assembled using the macro 
libraries DMKMAC, CMSLIB, and OSMACRO. 

You may want, on occasion, to have entries in a control file that 
specify an update level identifier but no update. A record of the 
following format, for example, is allowed: 

NAMES 

because the control file is used for loading object modules (text decks) 
as well as for updating input files. 

If updates are not found, a message is issued and processing 
continues, if possible. 



USING VMFASM TO APPLY YOUR OWN UPDATES 

If you wish to apply your own update to VM/370 (for example, if you wish 
to expand the accounting routines) , you follow the same procedure 
described for applying IBM-supplied updates. 

You create the update file. You can name the update file in either of 
two ways. If you are going to identify the update file directly in the 
control file, use the form: 

DMKACO UPDTupid 

where DMKACO is the filename of the accounting module you wish to 
expand, and upid is the identification for the filetype. For example, 
you might call your update file: 

DMKACO UPDTFIXl 
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The second way to identify your update is via an auxiliary file. If 
you use an auxiliary file, you use the following form to name your 
update file; 

DMKACO ft 

where DMKACO is the filename of the accounting routine you wish to 
expand and ft is any filetype. 

For example, you could have two update files called: 

DMKACO NEWI 
DMKACO NEW2 

When you decide to use an auxiliary control file, it must have a name in 
the form 

DMKACO AUXnnnn 

For example, assume you have an auxiliary control file called: 

DMKACO AUX1111 

This AUX file has the following entries (the filetypes of your update 
files) : 

MEW2 
NEH1 

Next, you must create a control file to identify all IBM-supplied 
updates to the module you are changing and your own updates. You must 
apply the IBM-supplied updates first. Assume there are IBM-supplied 
updates in an auxiliary file called: 

DMKACO AUXR30 

and that your own updates are those used as examples in the preceding 
paragraphs. Then, you need your own control file, identified as: 

fn CNTRL 

It can have any filename, but its filetype must be CNTRL. For this 
example, the control file is called: 

LCC CNTRL 

and it has the following records: 

TEXT MACS DMKMAC 
LOCAL FIX1 
SPEC AUX1111 
IBMI AUXR30 

To apply the updates to DMKACO, issue the command: 

VMFASM DMKVAT LOC 

The VMFASM procedure handles the update as follows; it: 

• Locates the source file, DMKACO. 

• Locates the control file, LOC CNTRL. 

• Reads the control file, last line first (IBMI AUXR30) . 
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Locates the IBM-supplied auxiliary file, DMKACO AUXB30. 

Beads the DMKACO AUXR30 auxiliary file from bottom to top and applies 
the IBM-supplied updates to DMKACO, naming the updated source $DMKACO 
ASSEMBLE. 

Reads the next entry in the control file (SPEC AUX1111). 

Locates your own auxiliary file, DMKACO AUX1111. 

Reads the last entry (NEW1), locates the update file DMKACO NEWI , and 
applies the update to the updated source $DMKACO. 

Reads the next entry in your auxiliary file (NEW2) , locates the 
corresponding update file DMKACO NEW2 , and applies it to the updated 
source $DMKACO. Processing for your auxiliary file is now complete. 

Reads the next entry in the control file (LOCAL FIXI) . 

Locates the directly-identified update file, DMKACO UPDTFIXI. 

Applies the DMKACO UPDTFIXI updates to the updated source ($DMKACO) . 

Reads the next control record, the MACS record. 

Issues the GLOBAL command for the macro libraries identified on the 
MACS record (DMKMAC MACLIB) . 

Assembles the updated source file, $DMKACO ASSEMBLE. 

Names the object module DMKACO TXTLOCAL. The filetype is derived by 
concatenating the prefix (TXT) and the uplevel of the last update 
applied (LOCAL) . 

If you create a new object module for a VM/370 module, you must also 
reconstruct the CP, CMS, or RSCS nucleus using the VMFLOAD service 
program. Or, if the file is a part of a CMS command module, use the 
CMSGEND procedure to generate a new module utilizing the new object 
code. See Appendix D to determine whether the CMS nucleus or some other 
MODULE files must be generated again because of your update. 

When you use CMSGEND to create a new module, you must change the 
filetype of the object deck to TEXT (if it is not already TEXT) before 
issuing the CMSGEND command. After the CMSGEND processing is complete, 
you can change the filetype of the object deck back to what it was 
before. 

Note that CMSGEND renames the existing module to "fname MODOLD" 
before creating the updated module. This ensures that any users 
currently using the CMS system do not have their processing interrupted 
by the updating of modules, because the SSTAT (system status table) of 
the loaded system is still pointing to the area on the system disk 
occupied by the renamed module. When the system is reloaded, the SSTAT 
points to the updated module, and the old module can be erased. 
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OTHER FILES PRODUCED BY VMFASM 

VMFASM invokes the UPDATE command, which produces two output files that 
indicate which updates were applied. The file 

fn UPDATES 

lists the names of update files that were applied to the source file 
(fn) and the file 

fn UPDLOG 

lists the actual updates that were applied to the source file (fn) and 
error messages. Both of these files are included in the LISTING file, 
and precede the program source statements. Also, the file (fn UPDLOG) 
precedes the object code in the text file. 
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simulation, virtual 219 
console functions 88 
CP 48 

CP processing 230 
CONTASK data, processing of 222 
CONTASK interrupt, control, processing of 

222 
control block 
CMS 42 
I/O, real 66 
manipulation macros, simulation of, VSAM 

197 
real 37 

RCHBLOK 39 
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processing 
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DOS system control commands 207 

interrupts 184 
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real input 97 
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virtual input 233 
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development, CMS 112 
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user 167 
Program Event Recording (PER) , interaction 

with Virtual Machine Assist feature 50 
program interrupt 52,57 
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processing 217 
program organization 

RSCS 238 

RSCS overview 238 
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programming, remote 3270 73 
protection, storage 5U 
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operation 175 
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validation 231 
PSH keys 

CMS handling of 190 

handling by CMS 124 
PTFs, applying 631 
punch, real, spooling to 233 
punching a card, CMS 183 
PURGESYS function 64 

return codes 65 
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QMSK data block 181 

QUERY command flow 203 

guerying options in the virtual machine 

environment 163 
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R 
reading 

a card, CMS 183 

a DASD page from virtual storage 225 
real 

device 

attaching 87 
spooling commands 98 

input device, spooling to 234 

PSW key 190 

storage key 190 
real spooling manager (DMKRSP) 96 
real storage 

allocation 225 

management 77,94 

page management 225 

reguests for page frames 78 
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record, error, writing 107 
record formats 
CMS 178 
DASD 603 
recovery 

from system failure 100 
MCH 

functional 101 
system 101 
system repair 101 
system-supported restart 101 
System/370 101 

control registers used by MCH 102 
CPO retry 101 
ECC validity checking 101 
Recovery Management Support (see RMS 

(Recovery Management Support)) 
REFADR routine 175 

operation 175 
reflection for the dispatched user 231 
REFTBL 

address field 176 
entry 176 
flagi byte 176 
flag2 byte 176 
info field 176 
name field 176 
value field 176 
register 

contents when called routine starts 

128,167 
restoration by called routine 128,168 
usage, CMS 115 
RELEASE command flow 203 
releasing 

allocated storage 188 
free storage 121 
storage 188 

virtual storage pages 227 
relocation, virtual 82 
remote 

stations, RSCS processing of files from 

153 
3270 

CCH format 73 
data formats 75 
I/O programs for 74 
support error recovery 110 
3270 programming 73 
Remote Spooling Communications Subsystem 
(see RSCS (Remote Spooling Communications 
Subsystem) ) 
REP card routine 172 

operation 172 
reguest handler, 3270 I/O 224 
reguest stack, CP 93 
reguests 

for real storage page frames 78 
I/O 

scheduling 71 
virtual 67 
paging 76 
RSCS 147 
reguirements, RSCS storage 149 
reserved, page frames 49 
resident, executable modules 55 
restart, MCH, system-supported 101 
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Virtual Machine Assist feature 50 
VM/370 613 
return a page of free storage 225 
return codes 
CMS 557 

FINDSYS function 65 
LOADSYS function 64 
PURGESYS function 65 
return location, when returning to caller 

168 
returning 

to caller 167 

register restoration 168 
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to the called routine 126 
REX system service tasks, program 

organization 240 
RLD card routine 173 

operation 173 
RMS (Recovery Management Support) 100,234 
channel check handler (CCH) 100 
machine check handler (MCH) 100 
system initialization 100 
RSCS (Remote Spooling Communications 
Subsystem) 

AXS system service task, program 

organization 241 
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data areas 147 

VM/370 148 
DIAGNOSE instructions 141 
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interrupt handling 142 
introduction 138 
I/O 
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method and techniques 152 
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links 

handling 153 
handling files 153 
transmitting VM/370 files to 153 
management 
I/O 142 
task 141 

virtual storage 142 
message-to-label cross reference 563 
module directory 447 
module entry point directory 455 
module to label cross reference 465 
multitasking supervisor, program 

organization of 239 
network control 140 
commands 140 

CP and CMS commands used 140 
CP instructions used 141 
NPT line driver program 146 

function selector routine 146 
I/O processing routines 146 
line monitor routine 146 
NPT line driver task, program 

organization 243 
overview 138 
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program organization 238 

overview 238 
request elements 147 
REX system service tasks, program 

organization 240 
SML line driver program 144 

buffer routines 145 

function selector routine 145 

I/O handler routine 145 

processors 145 
SML line driver task, program 

organization 242 
spooling, remote 48 
storage requirements 149 
supervisor 141 
TAG file descriptor 147 
task structure 142 
tasks 143 

ALERT task-to-task communication 150 

asynchronous interrupts and exits 
150 

asynchronously requested services 
150 

dispatching 149,150 

GIVE/TAKE task-to-task communication 
151 

posting a synch lock 150 

synchronization locks 149 

synchronizing 149 

wait/post routines 149 
virtual machine 

configuration 139 

locations and links 139, 

nonprogrammable remote stations 139 

programmable remote stations 139 

remote stations 139 
wait state 

disabled 27 

enabled 28 
RSCS commands 140 



saved system 

effect on CMS as a 191 

handling of, CP 190 

initialization 162 

restrictions on CMS as a 191 
saving the 3704/3705 control program image 

236 
scheduler 

functions, other 232 

I/O paging 227 
scheduling 231 

CP I/O operations 221 

interrupt handling 221 

I/O for CP and the virtual machine 218 

I/O requests 71 

support routines 92 

the console 222 

users for execution 232 

virtual machine I/O operations 221 

virtual machines 88 
examples 89 
selector channel, virtual, I/O requests 68 
service program, ZAP, CMS 623 
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DMSFRE 188 
DMSFREE 122 
TSO, support of 198 
SET command (CP) 492 

usage 34 
SET DOS ON command processing, VSAM 163 
SET SYSNAME command processing 163 
setting options in the virtual machine 

environment 163 
shared segment storage management 226 
SHOHCB processing 197 
shutdown, normal 228 
simulation 

CMS, OS data management 130 
of OS by CMS 198 
OS macro, under CMS 130 
virtual console 72 
control routine 72 
invalid operation 72 
read routine 72 
sense operation 72 
TIC operation 72 
write routine 72 
simulation routines, OS (see OS simulation 

routines) 
SIO 

operations, CP 221 
virtual 67 
SLC card routine 169 

operation 169 
SML line driver program 144 
routines 

buffer blocking and deblocking 145 
function selector 145 
I/O handler 145 
processors 145 
SML line driver task, program organization 

242 
soft error, recovery 82 
software problem, debugging 11 
space, allocation, DASD 94 
spool data, format 93 
spool files 

attributes 97 
checkpoint 236 

initialization 236 
commands 97 
CP, closing with VM/VS Handshaking 

feature 51 
DASD, space exhausted 100 
deletion of 234 
error recovery 99 
format 93 

management, commands 99 
real 

input processing 97 
output processing 96 
recovery 236 

recovery of closed checkpointed 237 
virtual 

input processing 95 
output processing 95 
spooling 232 
commands 

for real device 98 
for virtual device 98 
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remote 48 
DASD errors 99 
real, management 96 
remote, via RSCS 48 
to the real input device 234 
to the real printer 233 
to the real punch 233 
virtual, management 94 
virtual console 95 
virtual device to real device 232 
start/stop terminals, interrupt processing 

222 
start-up table, called routine 167 
STATE command flow 204 
status, changes, user 91 
status tables, file, CMS 177 
storage 

allocated by DMSFBEE 188 

allocated by GETMAIN 188 

allocation 225 

constant initialization, CMS 160 

free 

allocation 185 
management of 53 
map 

CMS 117,161 
organization of CMS files 177 
protection 54 
protection keys 189 
releasing of 188 
RSCS, requirements 149 
structure in CMS 116 
storage management 
free 227 

shared segment 226 
temporary disk 226 
storage relationships, DOS-OS-VSAM-user 

program 196 
STORE command 499 
STRINIT macro, format 116 
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channel control 105 
channel error analysis 106 
MCH 102 
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recovery facility mode switching 103 
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storage protect feature (SPF) 
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termination 105 
virtual user termination 104 
summary of, VM/370 debugging tools 29 
supervisor 
I/O 66 
RSCS 141 
supervisor state, SVC interrupts, 

processing of 216 
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support plan, system 638 
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handling by CMS 124 
handling for CMS/DOS 195 
interrupt 53,55 

problem state 216 

supervisor state, processing of 216 
linkage conventions 124 
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DOS 166 

invalid 125,166 

OS and DOS/VS simulation 125 

OS macro simulation 166 
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SVC 202 165 
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terminal 125 

search hierarchy for 125,166 
SVC 203 166 

SVC 76 error recording 235 
SVCTRACE output lines, summary of 586 
system 

dump of 229 

failure, recovery 100 

file, management 177 

functions, CMS 156 

initialition 85,228 
for EMS 100 

save area format 168 

start, warm 228 

table initialition, CMS 160 

termination 85 

virtual machine, attaching to 229 
SYSTEM command 502 
system support modules 55 
system support plan 638 
System/370 

recovery 101 

control registers used by MCH 102 

CPU retry 101 

ECC validity checking 101 
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table entry 
ESDID 176 
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TAG, RSCS file descriptor 147 
tape, error recovery 109 
task management, RSCS 141 
task structure, RSCS 142 
tasks 

RSCS 143 

ALERT task-to-task communications 

150 
asynchronous interrupts and exits 

150 
dispatching 149,150 
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151 
posting a synch lock 150 
synchronation locks 149 
synchroning 149 
using asynchronously requested 

services 150 
wait/post routines 149 
temporary disk storage management 226 
terminals 

disconnecting 87 
permanently 87 
temporarily 87 
display, CMS interface 129 
I/O control 

disabling 222 
enabling 222 
termination 

abnormal (see abnormal termination 

(ABEND)) 
CP 85 

without a dump 16 
of the virtual machine 229 
procedures, CP 228 
system 85 

virtual machine 229 
TESTCB processing 197 
text files 168 
executing 168 
loading 168 
thrashing, VPK of 191 
timer 

interrupt 57 
virtual, maintenance 65 
timing 

facilities 65 
real 65 
virtual 66 
TRACE command 503 
trace table entries, CP 478 
transient program areas 126,167 
TSO service routine, support of 198 
TXT card routine 172 

operation 172 
TYPE and PRINT function, DDR, sample output 
539 
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unexpected results 11,23 

CP 23 

debugging procedures 15 

virtual machine 23 
unlock a page of freee storage 225 
update procedures, VM/370 631 
updating modules with the VMFASM EXEC 

procedure 638 
usage, control register 55 
user 

directory routines 236 

dispatching states 90 

exit routine processing 198 

free storage 

allocating 120 
allocation of 187 
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relationships 195 
user program-VSAM-DOS-OS storage 
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device 

defining 87 

detaching 87 

spooling commands 98 
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disk 

accessing 182 

organization 180 

physical organization 180 
I/O interrupts 70 
I/O reguests 67 
output files, closing of 233 
PSW key 190 
relocation 82 

selector channel I/O reguests 68 
SIO 67 
virtual=real option 49,80 
virtual console 

simulation 72,219 

control routine 72 

invalid operation 72 

read routine 72 

sense operation 72 

TIC operation 72 

write routine 72 
spooling 95 
virtual machine 

abnormal termination (ABEND) 18 
attaching to the system 85,229 
debugging, CP 34 
debugging commands, CP 479 
disabled loop 24 
disconnecting 87 

permanently 87 

temporarily 87 
dispatching 88 

example of 89 
dispatching lists 89 
enabled loop 24 
environment 

guerying options 163 

setting options 163 
error recording, via SVC 76 235 
error recording interface 107 
initialition 229 

CMS 160 
input files, closing of 233 
input processing 233 
interrupt reflection 219 
I/O, scheduling by CP 218 
I/O instruction simulation 219 
I/O operations, scheduling of 221 
IPL of 229 
machine states 89 
management 46 
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time 46 
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output processing 232 
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configuration 139 
locations and links 139 
nonprogrammable remote stations 139 
programmable remote stations 139 
remote stations 139 
scheduling 88 

example of 89 
termination 229 
termination of 229 
unexpected results 23 
wait state, disabled 26 
Virtual Machine Assist feature 49 
control 49 
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with DOS emulator 50 
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restrictions 50 
Virtual Machine Facility/370 (VM/370) 
coding conventions 589 
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CP instructions used to control RSCS 
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debugging 

introduction 1 1 
software problem 11 
summary of tools 29 
restrictions 613 
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timing facilities 65 
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virtual 66 
transmitting files to an RSCS link 153 
update procedures 631 
virtual spooling manager (DMKVSP) 94 
virtual storage 
key 190 

management 77,94 
EC mode 226 
non-EC mode 225 
RSCS 142 
paging, error recovery 82 
releasing pages 227 
VMFASM EXEC procedure 
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updating modules with 638 
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VMFDUMP command 
format 34 
usage 34 
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processing, DMSDOS 195 

SET DOS ON command processing 163 
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codes 27 
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disabled 
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